Ver Mensaje Individual
  #3 (permalink)  
Antiguo 28/04/2006, 18:08
Avatar de ElAprendiz
ElAprendiz
 
Fecha de Ingreso: enero-2002
Ubicación: Maipu, Chile
Mensajes: 3.706
Antigüedad: 23 años, 3 meses
Puntos: 2
me falto colocar que estan en una carpeta especifica. lo de los nombres de los archivos no creo que importe mucho ya que fso se puede obtener el nombre de los archivos y por supuesto el contenido de esta.

de hecho ya tenia una pequeña rutina para leer archivo por archivo y las lineas que necesito
Código:
Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder(server.mappath(ruta))
i=1
response.write "<table border=2>"
for each file in folder.files
	Set archivo = fso.OpenTextFile(file, 1)
	archivo.skipline
	archivo.skipline
	archivo.skipline
	archivo.skipline
	archivo.skipline
	archivo.skipline
	archivo.skipline
        archivo.skipline

	linea=archivo.readline	
'	response.write "<tr><td>"&i&"</td><td>"&file&"</td>"
        response.write "<td>"&linea&"</td></tr>"&vbcrlf
	archivo.close
	i=i+1
next
ahora el tema es como inserto?