Bort med det där str där uppe förresten =)
Trådstart#1
Hej!
Jag har gjort en väldigt enkel gästbok och har lagt upp den på et webhotell!
Men...scriptet tycks bara funka på min egen server!!
Här är koden:
<%
strNamn = trim(Request.Form("fornamn"))
strInlagg = trim(Request.Form("inlagg"))
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (\*.mdb)}; dbq=" & Server.MapPath("\\script1987\\db\\databas.mdb")
Connect.Execute("INSERT INTO tabell (ForNamn, Inlagg) VALUES('"& strNamn &"', '"& strInlagg &"')"),,128
Connect.Close
Set Connect = Nothing
Set RS = Server.CreateObject("ADODB.Recordset")
Do While Not RS.EOF
%>
<center>
<table width=550 height=50 border=0 cellpadding=0 cellspacing=0 bgcolor=#000000>
<td>
<table width=550 height=50 border=0 cellpadding=0 cellspacing=0 bgcolor=#3399CG>
<!------------------------------------------------>
<td>
<%
Response.Write"<b>Av:</b>" & RS("fornamn") & "<br>"
Response.Write"<b>Inlägg:</b>" & RS("inlagg")
Response.Write"<br>"
Response.Write"<hr>"
%>
</td>
</table>
</table>
</center>
<%
RS.MoveNext
Loop
Rs.Close
set RS = Nothing
Connect.Close
Set Connect = Nothing
%>
<html>
<body>
Skriv ett \<a href="skicka.asp" target="\_top"\>nytt\</a\>.
</body>
</html>
Och när jag ska testa gästboken får jag det här meddelandet:
ADODB.Recordset error '800a0e78'
Operation is not allowed when the object is closed.
/script1987/inlagg.asp, line 19
Snälla hjälp!!
