Hej! Var i koden skall jag sätta in nedanstående rader? Får hela tiden felmeddelande om jag har med de här raderna.När stänger jag recordset och connection?
objRs.Close
Set objRs=Nothing
objConn.Close
Set objConn=Nothing
KOD
FILEN access_conn_databas.asp
<%
Dim strConn
strConn="Provider=Microsoft.Jet.OLEDB.4.0;"&_
"Data Source=C:\Inetpub\wwwroot\gastbok\gastbok.mdb;"&_
"Persist Security Info=False"
%>
FILEN index.asp
<HTML>
<HEAD>
<TITLE>Gästbok</TITLE>
<link rel="stylesheet" type="text/css" href="stylesheet.css">
</HEAD>
<!--#INCLUDE FILE="access_conn_databas.asp"-->
<BODY>
<form action=index.asp method=post name=gastbok>
<table width="500px" border="1" align="center">
<tr >
<td width="250px">Läs alla inlägg</td>
<td width="250px">Logga in som administratör</td>
</tr>
</table>
<br>
<table width="500px" border="1" align="center">
<tr>
<td colspan="2" align="center"><b>Skriv i gästboken</b></td>
</tr>
<tr>
<td width="110px">Namn</td>
<td width="110px"><input type="text" name="namn"></td>
</tr>
<tr>
<td width="110px">Epost</td>
<td width="110px"><input type="text" name="epost"></td>
</tr>
<tr>
<td width="110px">Hemsida</td>
<td width="110px"><input type="text" name="hemsida" value="http://"></td>
</tr>
<tr>
<td width="110px">Inlägg</td>
<td width="110px"><textarea name="inlagg" rows="4"></textarea></td>
</tr>
<tr>
<td colspan="2">
<div align="center">
<input type="submit" value="Skriv i gästboken" name="submit">
</div>
</td>
</tr>
</table>
<input type="hidden" name="dold" value="fylld">
<%If Request.Form("dold")="" Then%>
<%Else
Dim namn, mail, inlagg, hemsida, datum
Dim sqlStrang
namn = Request.Form("namn")
mail = Request.Form("epost")
inlagg = Request.Form("inlagg")
hemsida = Request.Form("hemsida")
datum = date
sqlStrang = "INSERT INTO tabell (Namn,Epost,Hemsida,Inlagg) VALUES ('" & namn & "', '" & mail & "', '" & hemsida & "' , '" & inlagg & "')"
Set objRs = objConn.Execute(sqlStrang)
'objRs.Close
'Set objRs=Nothing
'objConn.Close
'Set objConn=Nothing
%>
<br>
<table width="500px" border="1" align="center">
<tr>
<td colspan="2" align="center"><b>Lagrade värden, <%=date%></b></td>
</tr>
<tr>
<td width="110px">Namn</td>
<td><%=namn%></td>
</tr>
<tr>
<td width="110px">Epost</td>
<td width="110px"><%=mail%></td>
</tr>
<tr>
<td width="110px">Hemsida</td>
<td width="110px"><%=hemsida%></td>
</tr>
<tr>
<td width="110px">Inlägg</td>
<td width="110px"><%=inlagg%></td>
</tr>
</table>
<%End If%>
</BODY>
</HTML>
TACK PÅ FÖRHAND!