Hej
Nu havde jeg ellers lige fået min side til at virke på min egen server. Nu
har jeg dog fået lejet et webhotel hos Wannafind.dk og så opstår problemet
jo med access adgangen. Jeg har forsøgt med følgende:
<%
function OpenConn (DBName)
Set Conn = Server.CreateObject("ADODB.Connection")
ODBCpath = left(request.ServerVariables("PATH_TRANSLATED"),
instrrev(request.ServerVariables("PATH_TRANSLATED"), "\"))
Conn.Open "DBQ=" & ODBCpath & DBName & ";DefaultDir=" & ODBCpath &
";Driver={Microsoft Access Driver (*.mdb)}"
End function
OpenConn("bryg.mdb")
strQ = "SELECT Navn, Email, Amt FROM Bryggere "
strQ = strQ & "ORDER BY Navn"
Set rs = Conn.Execute (strQ)
%>
<html>
<body>
<table border = 1 Width=95% Align=Center><tr>
<th align="Mid" Bgcolor="9999ff"> Navn</th>
<th align="Mid" BGcolor="9999ff"> E-mail</th>
</tr>
<%
While Not rs.EOF
Response.Write "<tr><td Bgcolor= bfbfbf>" & rs("Navn") & "</td>"
Response.Write "<td Bgcolor = bfbfbf ><a href=mailto:" & rs(1) & ">"
Response.Write Server.HTMLEncode (rs(1)) & "</a></td>"
Response.Write "</tr>" & vbCrLf
rs.MoveNext
Wend
rs.close
Conn.Close
Set rs = Nothing
set Conn = Nothing
%>
</table>
</body>
</html>
Det virker dog ikke da jeg får følgende fejl:
Microsoft VBScript runtime error '800a01a8'
Object required: 'Conn'
/Bryggere.asp, line 16
Er der nogen der kan hjælpe ?
--
Med venlig hilsen
Klaus Egebjerg