Hvorfor vil den ikke loade
HejHvorfor vil min explorer ikke loade denne side:
<base target="_self">
<script language="Javascript">
var a
a=2
function naeste(link1)
{
window.parent.frames["hovedramme"].location.href=link1+".pdf";
}
function ikkefler()
{
document.write("<body style='background-color: #737173;'>");
document.write("<span style='color:#FFFFFF;font-family:Arial;'>Sidste tilbud.</span><br>");
document.write("</body>");
}
</script>
<%
Dim fso, f, fl, fc, s, N
Function ShowFolderList(FileSpec)
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(FileSpec)
Set fc = f.Files
N=0
For Each fl in fc
If UCase(Mid(Fl.Name,Len(Fl.Name)-2,3))="PDF" then
N=N+1
End If
Next
ShowFolderList = N
End Function
FilDir=Server.MapPath(".")
antal=ShowFolderList(FilDir)
%>
<html>
<body bgcolor="#737173">
<FORM NAME="TEST" METHOD="POST">
<% if n < 2 then %>
<span style='color:#FFFFFF;font-family:Arial;'>Sidste tilbud.</span><br>
<% else %>
<input type="button" value="Næste" onClick="java script:naeste(a);((a > <%=int(antal)-1%>) ? ikkefler() : ++a);">
<% end if %>
</FORM>
</html>
