leer directorio

[yavesnisu]

Hola, tengo un directorio y kiero leer las fotos q hay (se van renovando).
El proceso seria leer la primera imagen y guardar su nombre en una base de datos y mostrarla en pantalla.

Gracias a todos de antemano.

[ToKaTa]

ahora mismo no tengo oportunidad de comprabar este codigo que esta hecho un poco a ojo, pero de todas formas te servira pa coger la idea, veras que es sencillo:

Código:

<%
VarPath= "C:\misImagenes\" 'Directorio donde tienes las imagenes (usa Server.MapPath si es en un servidor)


Set conexion = CreateObject("ADODB.Connection")
conexion.ConnectionString = "miDSN"
conexion.open
	
Set rs = CreateObject("ADODB.Recordset")
		

Set Obj_FSO = createobject("scripting.filesystemobject")
Set Obj_Directorio = Obj_FSO.GetFolder (VarPath)

For Each VarFichero IN Obj_Directorio.Files
	VarContador = VarContador + 1

	Set Obj_File = Obj_FSO.GetFile(VarFichero)
	VarNombreFichero = VarFichero.Name


	sql = "insert into T_MisImagenes (imagen) values ('"&VarNombreFichero&"')"	
	rs.open sql,conexion	

Next
%>

ToKaTa.

[yavesnisu]

mañana lo pruebo porque ya me voy del curro, me voy acomerr, thanks tio

[maestro]

Completo tutorial sobre el FSO.
http://asp.com-e.net/codigo/fso.asp