12. juli 2004 - 09:44
Der er
15 kommentarer og 1 løsning
Billedevisning plus lidt mere
http://www.peterhougaard.com/new/ Jeg vil have at når man klikker på et link i menuen viser den automatisk billederne fra feks.
www.peterhougaard.com/photo/ og så skriver den 9 of 26 hvis der nu er 26 billeder i den mappe.
Menulinksne kommer automatisk når der ligger en ny mappe i /photo/.
Med pillene kan man hoppe back og forward.
Navnet i menuen kommer fra navnet på mappen i /photo/
Håber ikke det var for meget på en gang. :-)
Annonceindlæg tema
Cloud & AI
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Skriv lige hvis nogle gider at kigge på det?
hmm... Skal den kun vise 1 billede ad gangen ?? Jeg kan da godt kigge på det...!
okay... Jeg kigger på det med det samme... du har en fil der hedder default.asp i hver mappe ikke sandt..?
hmm... Laver du det..? Det er nok den nemmeste måde at gøre det på i hvert fald..! Ellers skal du have adgang til din error side..!
Skal jeg bare ligge en default.asp i /photo/.....?
Ja.., Men den skal indeholde det jeg skriver i en fil til dig om lidt...! Så bare vent med at ligge den ind..!
12. juli 2004 - 13:25
#10
Sådan... Så lykkedes det vidst.. Lig alt det her kode ind i en fil der hedder default.asp i de mapper hvor du vil vise billeder fra.. Så burde det være som det skal..! <% dim image_directory, image_height, image_width, Images_pr_Page, Images_Horizontal, path, dirarr, i path = request.servervariables("script_name") dirarr = split(path,"/") path = "/" for i = 1 to UBound(dirarr)-1 path = path & dirarr(i) & "/" next image_directory = path image_height = "" image_width = "" Images_pr_Page = "1" Images_Horizontal = "1" dim count_image, image, Image_Array Set directory=server.createobject("scripting.filesystemobject") Set allfiles=directory.getfolder(server.mappath(image_directory)) count_image = 0 For each image in allfiles.files Image_Array = Image_Array + image.Name & "," count_image = count_image +1 Next dim Current_Page, Total_Pages, Total_Images, Page_Name Page_Name = request.servervariables("script_name") Total_Images = count_image Current_Page = request.querystring("page") If Current_Page = "" or Current_Page = "0" then Current_Page = "1" end if Image_Array = split(Image_Array,",") dim Count_Image_Prints, td_width Count_Image_Prints = 0 td_width = int(100 / Images_Horizontal) %> <html> <head> <title>ph™ // Peter Hougaard</title> <style type="text/css"> #layer { position:absolute; top:62px; left:377px; width:204px; height:154px; border:none; background-color:#353535; display:none; } #layer table{ width:95%; border:0px; border-collapse:collapse; /*text-align:center;*/ } #layer td{ padding:1px; border:0px; margin:0px; font-family:verdana; color:#ffffff; font-size:10px; background-color:transparent; cursor:pointer; cursor:hand; } a.menu { color: #353535; font-size: 10px; font-family: Verdana; text-decoration: none; } a.txt { color: #FFFFFF; font-size: 10px; font-family: Verdana; text-decoration: none; } </style> <script type="text/javascript"> var over = 0; function mIn(){ over = 1; document.getElementById('layer').style.display='block'; } function mOut(){ over = 0; setTimeout('hide()',100); } function hide(){ if(over==0)document.getElementById('layer').style.display='none'; } function tdOver(td,d){ tds = document.getElementById("layer").getElementsByTagName("TD"); for(i=0;tds.length>i;i++){ tds[i].style.backgroundColor = (tds[i]!=td||d)?"transparent":"#870014"; } } </script> <meta http-equiv="imagetoolbar" content="no"> <meta name="description" content="peterhougaard.com - photography"> <meta name="keywords" content="peter, hougaard, peter hougaard, peterhougaard.com, peterhougaard, digital, imaging, advertising, editorial, copenhagen, københavn, billedarkiv, fotografi, foto, fotograf, billeder, billed, galleri, photo, picture, photography, udstillinger, exhibition, photographers, denmark, danmark"> <meta name="author" content="Peter Hougaard"> <META HTTP-EQUIV="reply to" CONTENT="mail@peterhougaard.com"> <META NAME="language" CONTENT="En"> <META NAME="copyright" CONTENT="Peter Hougaard"> <script language="JavaScript" src="nocopy.js"></script> </head> <body bgcolor="#353535"> <div onmouseover="mIn();" onmouseout="mOut();" style="position:absolute; top:38px; left:379px; cursor:default; font-family:verdana; font-size:10px; width: 119px; height: 12px;"> Menu</div> <div id="layer" onmouseover="mIn();" onmouseout="mOut();"> <table cellpadding="2" cellspacing="2"> <tr> <td onmouseover="tdOver(this,false);" onmouseout="tdOver(this,true);" onclick="location.href='show.asp?page=gallery00001'">Gallery 00001 / 00026</td> </tr> <tr> <td onmouseover="tdOver(this,false);" onclick="location.href='show.asp?page=gallery00027'">Gallery 00027 / 00031</td> </tr> <tr> <td onmouseover="tdOver(this,false);" onclick="location.href='show.asp?page=gallery00032'">Gallery 00032 / 00037</td> </tr> <tr> <td onmouseover="tdOver(this,false);" onclick="location.href='show.asp?page=gallery00038'">Gallery 00038 / 00040</td> </tr> <tr> <td onmouseover="tdOver(this,true);" style="cursor:default;">-------------------------------------</td> </tr> <tr> <td onmouseover="tdOver(this,false);" onclick="location.href='show.asp?page=about'">About</td> </tr> <tr> <td onmouseover="tdOver(this,false);" onmouseout="tdOver(this,true);" onclick="location.href='show.asp?page=contact'">Contact</td> </tr> </table> </div> <table width="872" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="67" valign="top"><img src="images/Logo.gif" width="67" height="51"></td> <td width="805" align="center" valign="bottom"><br> <table width="204" height="12" border="0" cellpadding="1" cellspacing="0"> <tr valign="middle"> <td width="118" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"><img src="images/spacer.gif" width="1" height="1"><img src="images/spacer.gif" width="1" height="1"><img src="images/spacer.gif" width="1" height="1"> </td> <% If NOT Cint(Current_Page) = 1 then response.write "<td width=""86"" bgcolor=""#FFFFFF""><div align=""center""><a href="""& Page_Name &"?page="& CInt(Current_Page)-1 & """><img border=""0"" src=""images/Pil01.gif"" width=""16"" height=""7""></a>" end if response.write "<A class=""menu"">" & CInt(Current_Page) & " of " & CInt(Total_images)-1 & "</a>" if not CInt(Current_Page) = CInt(Total_Images)-1 then response.write "<a href="""& Page_Name &"?page="& CInt(Current_Page)+1 & """><img border=""0"" src=""images/Pil02.gif"" width=""16"" height=""7""></a></div>" end if %> </td></tr></table> <table width="800" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="67"><img src="images/spacer.gif" width="1" height="7"></td> <td height="7" colspan="3" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="7"></td> </tr> <tr> <td> </td> <td width="15" height="7" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="15" height="1"></td> <td width="775" bgcolor="#FFFFFF"><img src="<%=image_directory &"/"& Image_Array(Current_Page)%>" width="769" height="513" class="Style"></td> <td width="15" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="15" height="1"></td> </tr> <tr> <td><img src="images/spacer.gif" width="1" height="7"></td> <td height="7" colspan="3" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="7"></td> </tr> </table> </td> </tr> </table> </body> </html>
12. juli 2004 - 13:35
#11
Menuen skal der kun ligge About og Contact. Gallery 00001 / 00026 skal kun komme hvis der ligger en mappe der hedder Gallery 00001 / 00026 her: wwwroot/photo/Gallery 00001 / 00026. Jo flere mapper jo flere menupunkter. Så det vil sige at jeg uploader mine billeder i en mappe som hedder Gallery 00001 / 00026 og så gør den automatisk det hele selv !!!
12. juli 2004 - 13:43
#12
okay.... det må give noget i stilen af: <% dim image_directory, image_height, image_width, Images_pr_Page, Images_Horizontal, path, dirarr, i path = request.servervariables("script_name") dirarr = split(path,"/") path = "/" for i = 1 to UBound(dirarr)-1 path = path & dirarr(i) & "/" next image_directory = path image_height = "" image_width = "" Images_pr_Page = "1" Images_Horizontal = "1" dim count_image, image, Image_Array Set directory=server.createobject("scripting.filesystemobject") Set allfiles=directory.getfolder(server.mappath(image_directory)) count_image = 0 For each image in allfiles.files Image_Array = Image_Array + image.Name & "," count_image = count_image +1 Next dim Current_Page, Total_Pages, Total_Images, Page_Name Page_Name = request.servervariables("script_name") Total_Images = count_image Current_Page = request.querystring("page") If Current_Page = "" or Current_Page = "0" then Current_Page = "1" end if Image_Array = split(Image_Array,",") dim Count_Image_Prints, td_width Count_Image_Prints = 0 td_width = int(100 / Images_Horizontal) %> <html> <head> <title>ph™ // Peter Hougaard</title> <style type="text/css"> #layer { position:absolute; top:62px; left:377px; width:204px; height:154px; border:none; background-color:#353535; display:none; } #layer table{ width:95%; border:0px; border-collapse:collapse; /*text-align:center;*/ } #layer td{ padding:1px; border:0px; margin:0px; font-family:verdana; color:#ffffff; font-size:10px; background-color:transparent; cursor:pointer; cursor:hand; } a.menu { color: #353535; font-size: 10px; font-family: Verdana; text-decoration: none; } a.txt { color: #FFFFFF; font-size: 10px; font-family: Verdana; text-decoration: none; } </style> <script type="text/javascript"> var over = 0; function mIn(){ over = 1; document.getElementById('layer').style.display='block'; } function mOut(){ over = 0; setTimeout('hide()',100); } function hide(){ if(over==0)document.getElementById('layer').style.display='none'; } function tdOver(td,d){ tds = document.getElementById("layer").getElementsByTagName("TD"); for(i=0;tds.length>i;i++){ tds[i].style.backgroundColor = (tds[i]!=td||d)?"transparent":"#870014"; } } </script> <meta http-equiv="imagetoolbar" content="no"> <meta name="description" content="peterhougaard.com - photography"> <meta name="keywords" content="peter, hougaard, peter hougaard, peterhougaard.com, peterhougaard, digital, imaging, advertising, editorial, copenhagen, københavn, billedarkiv, fotografi, foto, fotograf, billeder, billed, galleri, photo, picture, photography, udstillinger, exhibition, photographers, denmark, danmark"> <meta name="author" content="Peter Hougaard"> <META HTTP-EQUIV="reply to" CONTENT="mail@peterhougaard.com"> <META NAME="language" CONTENT="En"> <META NAME="copyright" CONTENT="Peter Hougaard"> <script language="JavaScript" src="nocopy.js"></script> </head> <body bgcolor="#353535"> <div onmouseover="mIn();" onmouseout="mOut();" style="position:absolute; top:38px; left:379px; cursor:default; font-family:verdana; font-size:10px; width: 119px; height: 12px;"> Menu</div> <div id="layer" onmouseover="mIn();" onmouseout="mOut();"> <table cellpadding="2" cellspacing="2"> <% Set fso=server.createobject("scripting.filesystemobject") Set allfolders=directory.getfolder(server.mappath("/photo/")) for each item im allfolders.Subfolders %> <tr> <td onmouseover="tdOver(this,false);" onmouseout="tdOver(this,true);" onclick="location.href='show.asp?page=<%=item.name%>"><%=item.name%></td> </tr> <% next %> <td onmouseover="tdOver(this,true);" style="cursor:default;">-------------------------------------</td> </tr> <tr> <td onmouseover="tdOver(this,false);" onclick="location.href='show.asp?page=about'">About</td> </tr> <tr> <td onmouseover="tdOver(this,false);" onmouseout="tdOver(this,true);" onclick="location.href='show.asp?page=contact'">Contact</td> </tr> </table> </div> <table width="872" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="67" valign="top"><img src="images/Logo.gif" width="67" height="51"></td> <td width="805" align="center" valign="bottom"><br> <table width="204" height="12" border="0" cellpadding="1" cellspacing="0"> <tr valign="middle"> <td width="118" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"><img src="images/spacer.gif" width="1" height="1"><img src="images/spacer.gif" width="1" height="1"><img src="images/spacer.gif" width="1" height="1"> </td> <% If NOT Cint(Current_Page) = 1 then response.write "<td width=""86"" bgcolor=""#FFFFFF""><div align=""center""><a href="""& Page_Name &"?page="& CInt(Current_Page)-1 & """><img border=""0"" src=""images/Pil01.gif"" width=""16"" height=""7""></a>" end if response.write "<A class=""menu"">" & CInt(Current_Page) & " of " & CInt(Total_images)-1 & "</a>" if not CInt(Current_Page) = CInt(Total_Images)-1 then response.write "<a href="""& Page_Name &"?page="& CInt(Current_Page)+1 & """><img border=""0"" src=""images/Pil02.gif"" width=""16"" height=""7""></a></div>" end if %> </td></tr></table> <table width="800" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="67"><img src="images/spacer.gif" width="1" height="7"></td> <td height="7" colspan="3" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="7"></td> </tr> <tr> <td> </td> <td width="15" height="7" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="15" height="1"></td> <td width="775" bgcolor="#FFFFFF"><img src="<%=image_directory &"/"& Image_Array(Current_Page)%>" width="769" height="513" class="Style"></td> <td width="15" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="15" height="1"></td> </tr> <tr> <td><img src="images/spacer.gif" width="1" height="7"></td> <td height="7" colspan="3" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="7"></td> </tr> </table> </td> </tr> </table> </body> </html>
12. juli 2004 - 14:02
#13
hmnm... men så skal der laves lidt om i strukturen jo... Så¨skal det i stedet være..! <% dim image_directory, image_height, image_width, Images_pr_Page, Images_Horizontal, path, dirarr, i path = "/billeder/" & request.querystring("mappe") image_directory = path image_height = "" image_width = "" Images_pr_Page = "1" Images_Horizontal = "1" dim count_image, image, Image_Array Set directory=server.createobject("scripting.filesystemobject") Set allfiles=directory.getfolder(server.mappath(image_directory)) count_image = 0 For each image in allfiles.files Image_Array = Image_Array + image.Name & "," count_image = count_image +1 Next dim Current_Page, Total_Pages, Total_Images, Page_Name Page_Name = request.servervariables("script_name") & "?mappe=" & request.querystring("mappe") Total_Images = count_image Current_Page = request.querystring("page") If Current_Page = "" or Current_Page = "0" then Current_Page = "1" end if Image_Array = split(Image_Array,",") dim Count_Image_Prints, td_width Count_Image_Prints = 0 td_width = int(100 / Images_Horizontal) %> <html> <head> <title>ph™ // Peter Hougaard</title> <style type="text/css"> #layer { position:absolute; top:62px; left:377px; width:204px; height:154px; border:none; background-color:#353535; display:none; } #layer table{ width:95%; border:0px; border-collapse:collapse; /*text-align:center;*/ } #layer td{ padding:1px; border:0px; margin:0px; font-family:verdana; color:#ffffff; font-size:10px; background-color:transparent; cursor:pointer; cursor:hand; } a.menu { color: #353535; font-size: 10px; font-family: Verdana; text-decoration: none; } a.txt { color: #FFFFFF; font-size: 10px; font-family: Verdana; text-decoration: none; } </style> <script type="text/javascript"> var over = 0; function mIn(){ over = 1; document.getElementById('layer').style.display='block'; } function mOut(){ over = 0; setTimeout('hide()',100); } function hide(){ if(over==0)document.getElementById('layer').style.display='none'; } function tdOver(td,d){ tds = document.getElementById("layer").getElementsByTagName("TD"); for(i=0;tds.length>i;i++){ tds[i].style.backgroundColor = (tds[i]!=td||d)?"transparent":"#870014"; } } </script> <meta http-equiv="imagetoolbar" content="no"> <meta name="description" content="peterhougaard.com - photography"> <meta name="keywords" content="peter, hougaard, peter hougaard, peterhougaard.com, peterhougaard, digital, imaging, advertising, editorial, copenhagen, københavn, billedarkiv, fotografi, foto, fotograf, billeder, billed, galleri, photo, picture, photography, udstillinger, exhibition, photographers, denmark, danmark"> <meta name="author" content="Peter Hougaard"> <META HTTP-EQUIV="reply to" CONTENT="mail@peterhougaard.com"> <META NAME="language" CONTENT="En"> <META NAME="copyright" CONTENT="Peter Hougaard"> <script language="JavaScript" src="nocopy.js"></script> </head> <body bgcolor="#353535"> <div onmouseover="mIn();" onmouseout="mOut();" style="position:absolute; top:38px; left:379px; cursor:default; font-family:verdana; font-size:10px; width: 119px; height: 12px;"> Menu</div> <div id="layer" onmouseover="mIn();" onmouseout="mOut();"> <table cellpadding="2" cellspacing="2"> <% Set fso=server.createobject("scripting.filesystemobject") Set allfolders=directory.getfolder(server.mappath("/photo/")) for each item im allfolders.Subfolders %> <tr> <td onmouseover="tdOver(this,false);" onmouseout="tdOver(this,true);" onclick="location.href='show.asp?page=<%=item.name%>"><%=item.name%></td> </tr> <% next %> <td onmouseover="tdOver(this,true);" style="cursor:default;">-------------------------------------</td> </tr> <tr> <td onmouseover="tdOver(this,false);" onclick="location.href='show.asp?page=about'">About</td> </tr> <tr> <td onmouseover="tdOver(this,false);" onmouseout="tdOver(this,true);" onclick="location.href='show.asp?page=contact'">Contact</td> </tr> </table> </div> <table width="872" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="67" valign="top"><img src="images/Logo.gif" width="67" height="51"></td> <td width="805" align="center" valign="bottom"><br> <table width="204" height="12" border="0" cellpadding="1" cellspacing="0"> <tr valign="middle"> <td width="118" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"><img src="images/spacer.gif" width="1" height="1"><img src="images/spacer.gif" width="1" height="1"><img src="images/spacer.gif" width="1" height="1"> </td> <% If NOT Cint(Current_Page) = 1 then response.write "<td width=""86"" bgcolor=""#FFFFFF""><div align=""center""><a href="""& Page_Name &"&page="& CInt(Current_Page)-1 & """><img border=""0"" src=""images/Pil01.gif"" width=""16"" height=""7""></a>" end if response.write "<A class=""menu"">" & CInt(Current_Page) & " of " & CInt(Total_images)-1 & "</a>" if not CInt(Current_Page) = CInt(Total_Images)-1 then response.write "<a href="""& Page_Name &"&page="& CInt(Current_Page)+1 & """><img border=""0"" src=""images/Pil02.gif"" width=""16"" height=""7""></a></div>" end if %> </td></tr></table> <table width="800" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="67"><img src="images/spacer.gif" width="1" height="7"></td> <td height="7" colspan="3" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="7"></td> </tr> <tr> <td> </td> <td width="15" height="7" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="15" height="1"></td> <td width="775" bgcolor="#FFFFFF"><img src="<%=image_directory &"/"& Image_Array(Current_Page)%>" width="769" height="513" class="Style"></td> <td width="15" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="15" height="1"></td> </tr> <tr> <td><img src="images/spacer.gif" width="1" height="7"></td> <td height="7" colspan="3" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="7"></td> </tr> </table> </td> </tr> </table> </body> </html>
12. juli 2004 - 14:41
#14
<% dim image_directory, image_height, image_width, Images_pr_Page, Images_Horizontal, path, dirarr, i path = "/photo/" & request.querystring("mappe") default_folder="0001/" if request.querystring("mappe") ="" then path = path & default_folder end if image_directory = path image_height = "" image_width = "" Images_pr_Page = "1" Images_Horizontal = "1" dim count_image, image, Image_Array Set directory=server.createobject("scripting.filesystemobject") Set allfiles=directory.getfolder(server.mappath(image_directory)) count_image = 0 For each image in allfiles.files Image_Array = Image_Array + image.Name & "," count_image = count_image +1 Next dim Current_Page, Total_Pages, Total_Images, Page_Name Page_Name = request.servervariables("script_name") & "?mappe=" & request.querystring("mappe") Total_Images = count_image Current_Page = request.querystring("page") If Current_Page = "" or Current_Page = "0" then Current_Page = "1" end if Image_Array = split(Image_Array,",") dim Count_Image_Prints, td_width Count_Image_Prints = 0 %> <html> <head> <title>ph™ // Peter Hougaard</title> <style type="text/css"> #layer { position:absolute; top:62px; left:377px; width:204px; height:154px; border:none; background-color:#353535; display:none; } #layer table{ width:95%; border:0px; border-collapse:collapse; /*text-align:center;*/ } #layer td{ padding:1px; border:0px; margin:0px; font-family:verdana; color:#ffffff; font-size:10px; background-color:transparent; cursor:pointer; cursor:hand; } a.menu { color: #353535; font-size: 10px; font-family: Verdana; text-decoration: none; } a.txt { color: #FFFFFF; font-size: 10px; font-family: Verdana; text-decoration: none; } </style> <script type="text/javascript"> var over = 0; function mIn(){ over = 1; document.getElementById('layer').style.display='block'; } function mOut(){ over = 0; setTimeout('hide()',100); } function hide(){ if(over==0)document.getElementById('layer').style.display='none'; } function tdOver(td,d){ tds = document.getElementById("layer").getElementsByTagName("TD"); for(i=0;tds.length>i;i++){ tds[i].style.backgroundColor = (tds[i]!=td||d)?"transparent":"#870014"; } } </script> <meta http-equiv="imagetoolbar" content="no"> <meta name="description" content="peterhougaard.com - photography"> <meta name="keywords" content="peter, hougaard, peter hougaard, peterhougaard.com, peterhougaard, digital, imaging, advertising, editorial, copenhagen, københavn, billedarkiv, fotografi, foto, fotograf, billeder, billed, galleri, photo, picture, photography, udstillinger, exhibition, photographers, denmark, danmark"> <meta name="author" content="Peter Hougaard"> <META HTTP-EQUIV="reply to" CONTENT="mail@peterhougaard.com"> <META NAME="language" CONTENT="En"> <META NAME="copyright" CONTENT="Peter Hougaard"> <script language="JavaScript" src="nocopy.js"></script> </head> <body bgcolor="#353535"> <div onmouseover="mIn();" onmouseout="mOut();" style="position:absolute; top:38px; left:379px; cursor:default; font-family:verdana; font-size:10px; width: 119px; height: 12px;"> Menu</div> <div id="layer" onmouseover="mIn();" onmouseout="mOut();"> <table cellpadding="2" cellspacing="2"><% Set fso=server.createobject("scripting.filesystemobject") Set allfolders=directory.getfolder(server.mappath("/photo/")) for each item in allfolders.Subfolders %><tr> <td onmouseover="tdOver(this,false);" onmouseout="tdOver(this,true);" onclick="location.href='show.asp?page=<%=item.name%>"><%=item.name%></td> </tr><% next %> <tr> <td onmouseover="tdOver(this,true);" style="cursor:default;">-------------------------------------</td> </tr> <tr> <td onmouseover="tdOver(this,false);" onclick="location.href='show.asp?page=about'">About</td> </tr> <tr> <td onmouseover="tdOver(this,false);" onmouseout="tdOver(this,true);" onclick="location.href='show.asp?page=contact'">Contact</td> </tr> </table> </div> <table width="872" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="67" valign="top"><img src="images/Logo.gif" width="67" height="51"></td> <td width="805" align="center" valign="bottom"><br> <table width="204" height="12" border="0" cellpadding="1" cellspacing="0"> <tr valign="middle"> <td width="118" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"><img src="images/spacer.gif" width="1" height="1"><img src="images/spacer.gif" width="1" height="1"><img src="images/spacer.gif" width="1" height="1"> </td> <% If NOT Cint(Current_Page) = 1 then response.write "<td width=""86"" bgcolor=""#FFFFFF""><div align=""center""><a href="""& Page_Name &"&page="& CInt(Current_Page)-1 & """><img border=""0"" src=""images/Pil01.gif"" width=""16"" height=""7""></a>" end if response.write "<A class=""menu"">" & CInt(Current_Page) & " of " & CInt(Total_images)-1 & "</a>" if not CInt(Current_Page) = CInt(Total_Images)-1 then response.write "<a href="""& Page_Name &"&page="& CInt(Current_Page)+1 & """><img border=""0"" src=""images/Pil02.gif"" width=""16"" height=""7""></a></div>" end if %> </td></tr></table> <table width="800" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="67"><img src="images/spacer.gif" width="1" height="7"></td> <td height="7" colspan="3" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="7"></td> </tr> <tr> <td> </td> <td width="15" height="7" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="15" height="1"></td> <td width="775" bgcolor="#FFFFFF"><img src="<%=image_directory &"/"& Image_Array(Current_Page)%>" width="769" height="513" class="Style"></td> <td width="15" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="15" height="1"></td> </tr> <tr> <td><img src="images/spacer.gif" width="1" height="7"></td> <td height="7" colspan="3" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="7"></td> </tr> </table> </td> </tr> </table> </body> </html>
12. juli 2004 - 14:44
#15
<% dim image_directory, image_height, image_width, Images_pr_Page, Images_Horizontal, path, dirarr, i path = "/photo/" & request.querystring("mappe") default_folder="0001/" if request.querystring("mappe") ="" then path = path & default_folder end if image_directory = path image_height = "" image_width = "" Images_pr_Page = "1" Images_Horizontal = "1" dim count_image, image, Image_Array Set directory=server.createobject("scripting.filesystemobject") Set allfiles=directory.getfolder(server.mappath(image_directory)) count_image = 0 For each image in allfiles.files Image_Array = Image_Array + image.Name & "," count_image = count_image +1 Next dim Current_Page, Total_Pages, Total_Images, Page_Name Page_Name = request.servervariables("script_name") & "?mappe=" & request.querystring("mappe") Total_Images = count_image Current_Page = request.querystring("page") If Current_Page = "" or Current_Page = "0" then Current_Page = "1" end if Image_Array = split(Image_Array,",") dim Count_Image_Prints, td_width Count_Image_Prints = 0 %> <html> <head> <title>ph™ // Peter Hougaard</title> <style type="text/css"> #layer { position:absolute; top:62px; left:377px; width:204px; height:154px; border:none; background-color:#353535; display:none; } #layer table{ width:95%; border:0px; border-collapse:collapse; /*text-align:center;*/ } #layer td{ padding:1px; border:0px; margin:0px; font-family:verdana; color:#ffffff; font-size:10px; background-color:transparent; cursor:pointer; cursor:hand; } a.menu { color: #353535; font-size: 10px; font-family: Verdana; text-decoration: none; } a.txt { color: #FFFFFF; font-size: 10px; font-family: Verdana; text-decoration: none; } </style> <script type="text/javascript"> var over = 0; function mIn(){ over = 1; document.getElementById('layer').style.display='block'; } function mOut(){ over = 0; setTimeout('hide()',100); } function hide(){ if(over==0)document.getElementById('layer').style.display='none'; } function tdOver(td,d){ tds = document.getElementById("layer").getElementsByTagName("TD"); for(i=0;tds.length>i;i++){ tds[i].style.backgroundColor = (tds[i]!=td||d)?"transparent":"#870014"; } } </script> <meta http-equiv="imagetoolbar" content="no"> <meta name="description" content="peterhougaard.com - photography"> <meta name="keywords" content="peter, hougaard, peter hougaard, peterhougaard.com, peterhougaard, digital, imaging, advertising, editorial, copenhagen, københavn, billedarkiv, fotografi, foto, fotograf, billeder, billed, galleri, photo, picture, photography, udstillinger, exhibition, photographers, denmark, danmark"> <meta name="author" content="Peter Hougaard"> <META HTTP-EQUIV="reply to" CONTENT="mail@peterhougaard.com"> <META NAME="language" CONTENT="En"> <META NAME="copyright" CONTENT="Peter Hougaard"> <script language="JavaScript" src="nocopy.js"></script> </head> <body bgcolor="#353535"> <div onmouseover="mIn();" onmouseout="mOut();" style="position:absolute; top:38px; left:379px; cursor:default; font-family:verdana; font-size:10px; width: 119px; height: 12px;"> Menu</div> <div id="layer" onmouseover="mIn();" onmouseout="mOut();"> <table cellpadding="2" cellspacing="2"><% Set fso=server.createobject("scripting.filesystemobject") Set allfolders=directory.getfolder(server.mappath("/photo/")) for each item in allfolders.Subfolders %><tr> <td onmouseover="tdOver(this,false);" onmouseout="tdOver(this,true);" onclick="location.href='show.asp?page=<%=item.name%>'"><%=item.name%></td> </tr><% next %> <tr> <td onmouseover="tdOver(this,true);" style="cursor:default;">-------------------------------------</td> </tr> <tr> <td onmouseover="tdOver(this,false);" onclick="location.href='show.asp?page=about'">About</td> </tr> <tr> <td onmouseover="tdOver(this,false);" onmouseout="tdOver(this,true);" onclick="location.href='show.asp?page=contact'">Contact</td> </tr> </table> </div> <table width="872" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="67" valign="top"><img src="images/Logo.gif" width="67" height="51"></td> <td width="805" align="center" valign="bottom"><br> <table width="204" height="12" border="0" cellpadding="1" cellspacing="0"> <tr valign="middle"> <td width="118" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"><img src="images/spacer.gif" width="1" height="1"><img src="images/spacer.gif" width="1" height="1"><img src="images/spacer.gif" width="1" height="1"> </td> <% If NOT Cint(Current_Page) = 1 then response.write "<td width=""86"" bgcolor=""#FFFFFF""><div align=""center""><a href="""& Page_Name &"&page="& CInt(Current_Page)-1 & """><img border=""0"" src=""images/Pil01.gif"" width=""16"" height=""7""></a>" end if response.write "<A class=""menu"">" & CInt(Current_Page) & " of " & CInt(Total_images)-1 & "</a>" if not CInt(Current_Page) = CInt(Total_Images)-1 then response.write "<a href="""& Page_Name &"&page="& CInt(Current_Page)+1 & """><img border=""0"" src=""images/Pil02.gif"" width=""16"" height=""7""></a></div>" end if %> </td></tr></table> <table width="800" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="67"><img src="images/spacer.gif" width="1" height="7"></td> <td height="7" colspan="3" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="7"></td> </tr> <tr> <td> </td> <td width="15" height="7" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="15" height="1"></td> <td width="775" bgcolor="#FFFFFF"><img src="<%=image_directory &"/"& Image_Array(Current_Page)%>" width="769" height="513" class="Style"></td> <td width="15" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="15" height="1"></td> </tr> <tr> <td><img src="images/spacer.gif" width="1" height="7"></td> <td height="7" colspan="3" bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="7"></td> </tr> </table> </td> </tr> </table> </body> </html>
13. juli 2004 - 15:48
#16
Hej... Har du fået det til at virke..!?
Kurser inden for grundlæggende programmering