Mi che fatica iscriversi non riuscivo a trovare un nome utente valido!!
VVoVe:




be questa la dice lunga su come sono combinato perciò abbiate pietà di me!


aiutatemi

ho questo script
codice:
<%
@Language = "VBscript"
%>
<%
' SETTINGS
' -->
	dim PageTitle, ImageDirectory, ThumbnailHeight, ThumbnailWidth, ItemsPerPage, ItemsHorizontal
	PageTitle			= "Stadio Radio "
	ImageDirectory		= "Taurianovese/"
	ThumbnailHeight	= 75
	ThumbnailWidth		= 75
	ItemsPerPage		= 10
	ItemsHorizontal	= 5
' <--

dim TotalItems, CurrentPage

sub PrintGallery()
	CurrentPage = request.querystring("page")

	if CurrentPage = "" OR int(CurrentPage) = 0 then
		CurrentPage = 1
	end if
	
	dim StartItem
	StartItem = ((CurrentPage - 1) * ItemsPerPage) + 1
	
	if int(StartItem) = 0 then
		StartItem = 1
	end if

	dim FileSystemObject, FileSystemObjectFiles
	set FileSystemObject			= server.createobject("scripting.filesystemobject")
	set FileSystemObjectFiles	= FileSystemObject.getfolder(server.mappath(ImageDirectory))
	
	dim item, ItemArray
	for each item in FileSystemObjectFiles.files
		TotalItems = TotalItems + 1
		
		if int(StartItem) <= int(TotalItems) AND int(StartItem + ItemsPerPage) > int(TotalItems) then
			if ItemArray = "" then
				ItemArray = ItemArray & item.name
			else
				ItemArray = ItemArray & "," & item.name
			end if
		end if
	next
	
	ItemArray = split(ItemArray, ",")

	response.write "<table class=""table"">" & vbnewline
	
		dim i, ItemPrints
		for i = 0 to ubound(ItemArray)
			ItemPrints = ItemPrints + 1
		
				if int(ItemPrints) = 1 then
					response.write "<tr>" & vbnewline
				end if

					response.write "<td class=""td"">" &_
						
						"<a href="""& ImageDirectory & "/" & ItemArray(i) & """ target=""_blank"" class=""link_image"">" &_
							"[img][/img]" &_
						"</a>" &_
					"</td>" & vbnewline

			if int(ItemPrints) = int(ItemsHorizontal) OR i = ubound(ItemArray) then
				ItemPrints = 0
				response.write  "</tr>" & vbnewline
			end if
		next

	response.write  "</table>" & vbnewline

end sub


private sub PrintPaging()
	dim TotalPages
	TotalItems = TotalItems
	TotalPages = TotalItems/ItemsPerPage
	
	if int(TotalPages) < TotalPages then
		TotalPages = int(TotalPages) + 1
	end if
	
	dim PageName
	PageName = request.servervariables("script_name")
	
	if 1 < TotalPages then
		response.write "<div class=""div_paging"">" &_
			"Page: "

			dim i
			for i = 1 to TotalPages
				if int(CurrentPage) = int(i) then
					response.write " ("& i &")"
				else
					response.write " <a href="""& PageName &"?page="& i &""" class=""link_paging"">" &_
						i &_
					"</a>"
				end if

				if NOT i = TotalPages then
					response.write ", "
				end if
			next

		response.write "</div>"
	end if
end sub


response.write "<html>" & vbnewline &_
"<head>" & vbnewline &_
"<title>" & PageTitle & "</title>" & vbnewline &_
"<style>" & vbnewline &_

"body" &_
"{" &_
"font-family: tahoma, verdana, arial;" &_
"font-size: 10pt;" &_
"color: #000000;" &_
"text-align:center;" &_
"}" & vbnewline &_

".table" &_
"{" &_
"margin:auto;" &_
"}" & vbnewline &_

".td" &_
"{" &_
"padding:20px;" &_
"}" & vbnewline &_

"a.link_image" &_
"{" &_
"border:2px groove #000000;" &_
"}" & vbnewline &_

"a.link_image:hover" &_
"{" &_
"border:2px groove #000000;" &_
"}" & vbnewline &_

"a.link_paging" &_
"{" &_
"text-decoration:underline;" &_
"color: #000000;" &_
"}" & vbnewline &_

"a.link_paging:hover" &_
"{" &_
"text-decoration:none;" &_
"color: #000000;" &_
"}" & vbnewline &_

"a.link_credits" &_
"{" &_
"font-size: 8pt;" &_
"color: #000000;" &_
"}" & vbnewline &_

".div_credits" &_
"{" &_
"font-size: 8pt;" &_
"color: #000000;" &_
"}" & vbnewline &_

".image" &_
"{" &_
"border:0px;" &_
"}" & vbnewline &_

"</style>" & vbnewline &_
"</head>" & vbnewline &_
"<body>" & vbnewline

call PrintGallery()

call PrintPaging()


response.write "
" & vbnewline &_
"
" & vbnewline &_



"</body>" & vbnewline &_
"</html>"
%><body bgcolor="#28457F">

funziona alla grande però non mi da la possibilità di visualizzare quantomeno il nome del file sotto la foto, giusto per identificarla, vi prego aiutatemi


ciao e grazie anticipatamente