sprog + galleri
HEj jeg blir ved med at få en fejl 500 i forbindelse med Hres'sen er der nogen der kan se fejlen.Default.asp
meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Formland web gallery</title>
</head>
<%
Dim strLang
strLang = request.querystring("langId")
%>
<frameset rows="420,*">
<%
response.write("<frame name='display' src='hres\display.asp?langID=") & strLang & "'>"
%>
<frame name="scroll" src="lay\scroll.asp">
<noframes>
<body>
<p>Denne Web-side bruger rammer, og din browser understøtter ikke rammer.</p>
</body>
</noframes>
</frameset>
</html>
Display.asp
<html>
<head>
<title>display</title>
</head>
<body topmargin="0" leftmargin="0">
<%
Dim strLang
strLang = request.querystring("langId")
Dim strHresFile
strHresFile = request.querystring("hresFileId")
Dim strZipFile
strZipFile = request.querystring("zipFileId")
If strLang = "da"
Response.Write ("Velkommen til Formland...")
End If
If strLang = "en" Then
Response.Write ("GBtext")
End If
If strLang = "de" Then
Response.Write ("DEtext")
Else
Response.Write ("GBtextuden langid")
End If
If strHresFile = "" then
Else
%>
<table border="0" width="100%">
<tr>
<td width="100%">
<table border="0" width="100%" cellspacing="1">
<tr>
<td colspan="3" bgcolor="#F0F0F0">
<p align="left"><font face="Verdana" size="1">
Formland 7 - 10 February 2003
<br>
Filename:
<% response.write (strHresFile) %>
</font>
</td>
</tr>
<tr>
<td colspan="3" width="100%" bgcolor="#FFFFFF"> </td>
</tr>
<tr>
<td><a href="..\zip\
<% response.write (strZipFile) %>
">
<img border="0" src="downloadani.gif" alt="">
</a>
</td>
<td width="100%">
<p align="center"><font face="Verdana" size="1"><a href="..\zip\
<% response.write (strZipFile) %>
">
<img border="0" src="
<% response.write (strHresFile) %>
"></a></font></td>
<td></td>
</tr>
</table>
</td>
</tr>
</table>
<%
End If
%>
</body>
</html>
