Weblogs Código

RecorteX

73 usuarios y 244 recortes de código
Usuario

Contraseña
Crear cuenta
asp csharp css fechas Flash html imagenes java javascript linux mysql oracle php sql SQLServer url vbnet web xhtml xml
Top Usuarios
fjmp76 (43)
albin (31)
josuebasurto (31)
juanjo (30)
pedrocaro (9)
stanz (8)
AndiXTRM (7)
Joserra (7)
miiglesi (6)
aplyca (5)
Top Etiquetas
php (38)
vbnet (28)
csharp (26)
javascript (26)
html (25)
java (24)
sql (18)
xml (13)
mysql (13)
css (10)
Flash (7)
imagenes (7)
xhtml (7)
linux (6)
asp (6)
fechas (6)
web (5)
SQLServer (5)
oracle (5)
url (5)

Recursividad

Un ejemplo de recursividad para buscar una cadena en archivos.

 
      Public Sub CheckFiles(ByVal TxtToFind As String, ByVal Path As String, ByRef sb As System.Text.StringBuilder, ByVal Filter As String)
        For Each file As String In Directory.GetFiles(Path, Filter)
            Dim txt As String = ReadFile(file)
            If txt.IndexOf(TxtToFind) <> -1 Then
                sb.AppendLine(file)
            End If
        Next
        For Each dir As String In Directory.GetDirectories(Path)
            CheckFiles(TxtToFind, dir, sb, Filter)
        Next
    End Sub
 
Identifícate para dejar un comentario.
Proyecto: Juanjo Navarro, 2006 - Diseño: Albin