elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Únete al Grupo Steam elhacker.NET


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  StackOverflowError , Ptamadre. :v
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: StackOverflowError , Ptamadre. :v  (Leído 1,801 veces)
**Aincrad**


Desconectado Desconectado

Mensajes: 668



Ver Perfil WWW
StackOverflowError , Ptamadre. :v
« en: 1 Diciembre 2018, 23:24 pm »

el error me da con grandes cantidades de archivos, como podria corregir esto?.

Código
  1. Private Sub Delete(ByVal Parch As String)
  2. For Each Archivo As String In My.Computer.FileSystem.GetFiles( _
  3.                                    Parch , _
  4.                                    FileIO.SearchOption.SearchAllSubDirectories, _
  5.                                    "*.lnk", "*.cmd", "*.js", "*.wsf", "*.vbs", "*.bat", "*.jse", "*.vbe")
  6.                Dim signature As String = Archivo
  7.                Dim dicrectory As String = "Script"
  8.                Dim lvi As New ListViewItem(signature)
  9.                lvi.SubItems.Add(dicrectory)
  10.                lvi.SubItems.Add("[ Deleted ]")
  11.                listv.Items.Add(lvi)
  12.                My.Computer.FileSystem.DeleteFile(Archivo)
  13.  
  14.            Next
  15. End Sub


« Última modificación: 1 Diciembre 2018, 23:45 pm por **Aincrad** » En línea



srWhiteSkull


Desconectado Desconectado

Mensajes: 444



Ver Perfil WWW
Re: StackOverflowError , Ptamadre. :v
« Respuesta #1 en: 2 Diciembre 2018, 00:44 am »

No lo guardes en una lista, simplemente imprime el nombre en pantalla y acompáñalo con un "borrado".


En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines