Hittar inte bilderna...

Denna kod har funkat förut, men nu hittar den inte längre bilderna, någon som kan hitta något fel...

  <%
	lokal = Server.Mappath("..\gey\gif\")

	Set fso = CreateObject("Scripting.FileSystemObject")
	Set fsof = fso.GetFolder(lokal)
	Set fsofi = fsof.files

	dim antal
	antal = fsofi.Count
	ant = antal - 1
	dim arre()
	redim arre(antal-1)
	dim g
	g = 0
	Response.Write ant
		For Each fil in fsofi
      		if right(fil.Name,4) = ".gif" or right(fil.Name,4) = ".GIF" then
         		arre(g) = fil.Name 
				Response.Write(arre(g))
				Response.Write "<img src="&arre(g)&">"
				g = g + 1
      		End if
		Next
		Response.Write(arre(g))
%>

Hur blir utskriften till browsern då? Har du flyttat på scriptet? Ligger det i samma mapp som bilderna?

scriptet ligger där det alltid varit.... i rooten, sen ligger bilderna i /gey/gif katalogen....

om man skriver ut med Respo.. arre(g) , så skriver den ut i browsern, vilka bilder som ligger i katalogen, min inte om man ska skriva ut bilden då får jag bara ut en fyrkant med ett X i....

Och om man tittar på källkoden i browsern så ser <img> taggen ut så här:

<img src=bild1.GIF> , det kommer inte med några ""

tronez skrev:

<img src=bild1.GIF> , det kommer inte med några ""

Du har ju inte med mappsökvägen, så det är inte så konstigt att den inte hittar bilderna då, eftersom det står att bilderna ligger i samma mapp som scriptet. Sedan har du ju inte sagt att det ska vara några citationstecken runt img src heller. :)

Response.Write "<img src=""/gey/gif/"&arre(g)&""">"

Mvh