09/06/2005, 11:23
|
 | | | Fecha de Ingreso: noviembre-2004
Mensajes: 2.344
Antigüedad: 20 años, 5 meses Puntos: 8 | |
| Dim a As System.IO.Directory
Dim archivos As Array = a.GetFiles(path)
dim i as integer = 0
while i < archivos.length
if archivos(i).EndsWith("*.pdf") or archivos(i).EndsWith("*.htm") then
'Aqui lo que quieras
end if
i+=1
end while |