ASP oplys billed?
Hey derude.. Jeg har et galleri script, hvor jeg gerne vil have at den viser billedet gennemsigtigt, og når musen kommer hen over "fader" den til normal.Mit galleri script ser sådan ud:
<%
'------------------------------------------------
'henter info om siden til scriptet
'------------------------------------------------
page = trim(Request.QueryString("page"))
start = trim(Request.QueryString("start"))
'------------------------------------------------
'Åbner Filsystem
'------------------------------------------------
strPathInfo = Request.ServerVariables("PATH_INFO")
strPhysicalPath = Server.MapPath(strPathInfo)
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(strPhysicalPath)
Set objFolder = objFile.ParentFolder
Set objFolderContents = objFolder.Files
'------------------------------------------------
'grund variabler
'------------------------------------------------
row_count = 0
row = 1
max_row = 2
count = 1
If NOT start <> "" then
Start = 1
End If
%>
<head>
<title></title>
<style>
BODY{scrollbar-face-color:#000000;
scrollbar-shadow-color:#666666;}
</style>
<%
For Each objFileItem in objFolderContents
If objFileItem.Name = "billeder.asp" then
Else
If CLng(count) < CLng(start) then
count = count + 1
Else
If CLng(row) => CLng(max_row) And row_count = 20 then
Else
If row_count > 2 then
response.write "<tr>"
row_count = 0
row = row + 1
End If
Response.write " <td><a href='"
Response.Write(objFileItem.Name)
Response.write "' target=""_blank""><img border=1 src='" & (objFileItem.Name) & "' alt='" & (objFileItem.Name) & "' width=90 height=90></a>"
row_count = row_count + 3
count = count + 1
End If
End If
End If
Next
%>
<STYLE type="text/css">
BODY
{
scrollbar-face-color: #ffffff;
scrollbar-shadow-color: #ffffff;
scrollbar-highlight-color: #ffffff;
scrollbar-3dlight-color: #000000;
scrollbar-darkshadow-color: #000000;
scrollbar-track-color: #ffffff;
scrollbar-arrow-color: #000000;
}
BODY
</STYLE>
</head>
<body bgcolor="#FFFFFF">
Nogen der kan hjælpe?
Mvh Nicolaj Jensen
