eagleeye> jeg går ud fra at det skal ind på den side der bliver åbnet.
Men hvordan åbner jeg lige en side og får billedet sat ind derpå?
Siden ser sådan ud:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<script>
function send(valg){
document.parameter.valg.value = valg
document.parameter.submit();
}
</script>
<script language"javascript">
var hovedebillede_link;
function hovedebillede_show(){
billedVindue = window.open('/lukket/billeder/upload/' + hovedebillede_link);
}
</script>
<html>
<head>
<title>Billeder</title>
</head>
<DIV align="center">
<body link="black" vlink="black" alink="black">
<%
' mapper er navnnet på den mappe hvor de valgte billeder ligger,
' den bliver valgt i oversig.asp.
mappe = request("mappe")
if mappe = "" then
mappe = Session("mappe")
else
Session("mappe") = mappe
end if
' Her finder vi ud af om der er dannet et array af billeder, hvis det er tilfældet bruges det,
' ellers laves der et array af billederne i den valgte mappe.
if isarray(Session("billeder")) then
if ubound (Session("billeder")) > 0 then
billeder = session("billeder")
end if
else
Set FSO = CreateObject("Scripting.FileSystemObject")
Set Folder = FSO.GetFolder("e:\www\inet\download\test\lukket\billeder\upload\" & mappe & "\thumbnails\")
Set FolderFiles = Folder.Files
dim filListe
i = 0
For Each File In FolderFiles
If inStr(LCase(File),".jpg") or inStr(LCase(File),".gif") or inStr(LCase(File),".bmp") or inStr(LCase(File),".png") Then
filListe = filListe & "," & file.name
i = i + 1
end if
next
filListe = right(filListe,len(filListe)-1)
billeder = split(filListe,",")
session("billeder") = billeder
session("antalfiler") = ubound(billeder)+1
end if
intfile = session("antalfiler")
' Her kontrolleres om der er valgt et side skift, enten frem eller tilbage
select case Request("valg")
case "frem"
intpage = Request("frem")
case "tilbage"
intpage = Request("tilbage")
case else
intPage = 1
end select
' Her initialiseres værdierne for et evt side skift.
tilbage = 0
frem = 0
if intpage = 1 then
tilbage = round((intfile/4)+0.4)
else
tilbage = intpage - 1
end if
if intpage*4 => intfile then
frem = 1
else
frem = intpage + 1
end if
%>
<table width="75%" height="322" border="0">
<tr>
<td height="20" colspan="4"><div align="left"><a href="oversigt.asp">Tilbage til oversigten</a> <a href="default.htm">Tilbage til billede forsiden</a> </div></td>
<td height="20" colspan="2"><div align="right"><font color="black" face="Arial, Helvetica, sans-serif">side <%=intpage %> af <%= round((intfile/4)+0.4) %> </font></div></td>
</tr>
<tr>
<td height="20" colspan="6"> </td>
</tr>
<tr>
<td height="201" colspan="6" align="center" valign="middle"><img Name="hovedebillede" style="cursor:hand;" alt="" onClick="hovedebillede_show();" border="0" align="middle" valign="center"></td>
</tr>
<tr>
<td height="101"><img src="Komponenter/TilbagePil.gif" alt="" name="Tilbage" width="57" height="99" border="0" usemap="#TilbageMap" onMouseOver="this.src = 'Komponenter/TilbagePilPeg.gif'" onMouseOut="this.src = 'Komponenter/TilbagePil.gif'"></td>
<%
' Billeder sættes på siden
forste = 0
pegepind = (intpage -1) * 4
sidste = pegepind + 4
do while pegepind < sidste and pegepind < intfile
Response.Write("<TD><img src=""upload/" & mappe & "/thumbnails/" & billeder(pegepind) & """ OnMouseOver=""document.images['hovedebillede'].src = 'upload/" & mappe & "/images/"& billeder(pegepind) &"';hovedebillede_link='" & mappe & "/original/" & billeder(pegepind) & "';""""></TD>")
if forste = 0 then
Response.write "<script>document.images['hovedebillede'].src = 'upload/" & mappe & "/images/"& billeder(pegepind) &"'</script>"
forste = forste + 1
end if
pegepind = pegepind + 1
loop
%>
<td> <img src="Komponenter/NaestePil.gif" alt="" name="naeste" width="57" height="99" border="0" usemap="#naesteMap" onMouseOver="this.src = 'Komponenter/naestePilPeg.gif'" onMouseOut="this.src = 'Komponenter/naestePil.gif'"></td>
</tr>
</table>
<div align="center">Klik på det store billede for at se originalen i et nyt vindue</div>
<form action="Billedervis.asp" name="parameter">
<input type="hidden" name="frem" value="<%= frem%>">
<input type="hidden" name="tilbage" value="<%= tilbage%>">
<input type="hidden" name="valg" value="">
</form>
<map name="naesteMap">
<area shape="poly" coords="9,20,47,45,47,50,14,76,9,71" href="java script:onclick=send('frem')" alt="klik for at se de næste 4 billeder"">
</map>
<map name="TilbageMap">
<area shape="poly" coords="45,22,43,72,8,51,11,45" href="java script:onclick=send('tilbage')" alt="klik for at se de forrige 4 billeder">
</map>
</body>
</html>
Ny bruger
Nybegynder
Opret
Preview
