färdigt galleriscript

Vet någon om det finns något bra gratis galleriscript? Det enda jag hittat är detta och det är php eller nått och de kan jag ännu mindre än asp.

Vill ha uploadfunktion och att den skapar thumnails med automatik.. alla andra funktioner är ett +... ;)

http://www.webmaster-organizer.com/images/Dynamic-Image-Gallery/ImageGallery.zip

http://www.hotscripts.com/ASP/Scripts_and_Components/Image_Galleries/index.html

Har kollat lite på Hotscripts men inte hunnit testa de jag tyckte verkade bra.
Under tiden är alla förslag välkomna. ;)

http://www.gruvsjo.com

Eftersom inget av scripten jag har hittat har tilltalat mig så tänkte jag nu börja på ett eget, då mina kunskaper om asp är väldigt begränsade så kommer jag nog fråga en hel del här.
Är det någon som har några tips innan jag börjar?!
Det kommer vara med databas och upload-funktion, jag har inte riktigt bestämt mig om det ska vara thumbnails men förmodligen blir det de.

Till o börja med kan du ju ta en titt på Override's uploadscript: http://www.webforum.nu/showthread.php?s=&threadid=45211&forumid=148
Det kan du använda för att lägga upp bilderna och så modifierar du det lite så kan du även lägga till lite i databasen.
exempelvis

Dim connect, text, sql
Set Connect = server.createobject("adodb.connection")
Connect.Open "provider=microsoft.jet.oledb.4.0; data source ="& Server.Mappath("bilder.mdb")

text = UploadRequest.Item("texten").Item("Value")
sql = "insert into tblBilder(url, bildtext) "
sql = sql & "Values('"& filename &"', '"& replace(Trim(text), "'", "''") &"')"

connect.execute(sql),,128
connect.close : set connect = nothing

sen så gör du en annan sida där du listar alla bilder:
exempelvis så här:

<%
sql = "select url, bildtext, id "
sql = sql & "from tblBilder order by id desc;"

Set Connect = server.createobject("adodb.connection")
Connect.Open "provider=microsoft.jet.oledb.4.0; data source ="& Server.Mappath("bilder.mdb")
set img = Connect.execute(sql)
      
If not img.eof Then
	do until img.eof
	    	If not img.eof Then
				dim id 
				id = img("id")
				dim url : url = img("url")
				response.write "<div align=center><table border=0 cellpadding=5 cellspacing=0 style=border-collapse: collapse><tr><td valign=top><a href="& url &" target=_blank><img src="& url &" border=0 width=100 height=100><a><br>"& img("bildtext") & "<br></td>"
	    		img.movenext
			else
				response.write "<div align=center><table border=0 cellpadding=5 cellspacing=0 style=border-collapse: collapse><tr><td valign=top></td></tr><td valign=top></td><td valign=top></td><td valign=top></td></tr></table></div>"
	    	end if
			if not img.eof then 
				id = img("id")
	    		url = img("url")
	    		response.write "<td valign=top><a href="& url &" target=_blank><img src="& url &" border=0 width=100 height=100><a><br>"& img("bildtext") & "<br></td>"
	    		img.movenext
	    	else
	    		response.write "<td valign=top></td><td valign=top></td><td valign=top></td></tr></table></div>"
	    	end if
			if not img.eof then 
				id = img("id")
	    		url = img("url")
	    		response.write "<td valign=top><a href="& url &" target=_blank><img src="& url &" border=0 width=100 height=100><a><br>"& img("bildtext") & "<br></td>"
	    		img.movenext
	    	else
	    		response.write "<td valign=top></td><td valign=top></td><td valign=top></td></tr></table></div>"
	    	end if
			if not img.eof then 
				id = img("id")
	    		url = img("url")
    			response.write "<td valign=top><a href="& url &" target=_blank><img src="& url &" border=0 width=100 height=100><a><br>"& img("bildtext") & "<br></td></tr></table></div>"
    			img.movenext
    		else
    			response.write "<td valign=top></td><td valign=top></td><td valign=top></td></tr></table></div>"
	    	end if
   	loop
else
   	response.write "No Images.<br>"
end if
img.close : Set img = Nothing
Connect.Close : set connect = nothing

%>

Lycka till :D

man tackar, nu ska jag testa.. får se hur mycke man orkar.. ;)

Np :) Lycka till :bire

jag har gjort ett eget (som iof är rätt fulkodat så jag håller på att göra om det) du kan se det här:
http://w3.chs.chalmers.se/kommitteer/pyrot/fredrik/fotoarkivet/