"Jens Gyldenkærne Clausen" <jens@gyros.invalid> skrev
>
> > Hvordan kan det være, at jeg ikke kan Include file efter
> > nedenstående kode?
>
> Hvilken fejl får du?
Ingen fejlmeddelelse...
>
> Hvordan ser din include-kommando ud?
<!-- #include file = "bund.asp" -->
>
> Har du evt. et link til din side?
Nej, tester lokalt...
>
> Se evt. siden her: <
http://asp-faq.dk/article/?id=41>.
Du kan se hele koden her
kodestart:
<html>
<!-- #include file = "menu.asp" -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Priser</title>
</head>
<body link="#000000" vlink="#038A98" alink="#FF0000">
<%
Dim Conn
Dim RS
Dim Sql
Dim DSNName
Set Conn = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.Recordset")
DSNName = "DRIVER=Microsoft Access Driver (*.mdb);DBQ="
DSNName = DSNName & Server.MapPath("database/_m_design_.mdb")
Conn.Open DSNName
Sql = "SELECT * FROM qryPris"
RS.Open Sql, Conn, 3, 3
%>
<div align="center">
<table border="0" width="50%" id="table8">
<tr>
<td>
<table width="100%" border="0" style="font-family: Verdana; font-size: 8pt"
id="table10" cellspacing="5">
<thead>
<tr>
<td width="79%" align="center">
<p align="left"><b><u>Navn</u></b></td>
<td width="16%" align="center">
<p align="left"><b><u>Pris</u></b></td>
</tr>
</thead>
<tbody>
<%
do while not RS.eof
response.write "<tr>"
response.write "<td>" & RS("PrisNavn") & "<hr>" & "</td>"
response.write "<td>" & RS("Pris") & ",00 kr." & "<hr>" & "</td>"
response.write "</tr>"
RS.movenext
loop
response.end
RS.Close
Set RS=Nothing
Conn.Close
Set Conn=Nothing
%>
</tbody>
</table>
</table>
</body>
<!-- #include file = "bund.asp" -->
</html>
kodeslut
Hilsen
Bjarne