Vilken är rad 14?
Frågan#1
får följande felmeddelande
Microsoft JET Database Engine error '80040e10'
No value given for one or more required parameters.
/kagerodsbtk/admin/editpage/save.asp, line 14
koden jag använder är följande:
<% Option Explicit
Dim objConn, sConnection
Set objConn = Server.CreateObject("ADODB.Connection")
sConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Server.MapPath("../../db/k_btk.mdb") & ";" & _
"Persist Security Info=False"
objConn.Open(sConnection)
Dim RecSet, Sql
Set RecSet = Server.CreateObject("ADODB.Recordset")
Sql = "SELECT * FROM tblguestbook WHERE EditPageId = " & Request.Form("EditpageId")
RecSet.Open Sql, objConn, 3, 3
RecSet("editpagetitle") = Request.Form("editpagetitle")
RecSet("editpageshowtitle") = Request.Form("editpageshowtitle")
RecSet("editpagelink") = Request.Form("editpagelink")
RecSet("editpagetext") = Request.Form("editpagetext")
RecSet("editpageid") = Request.Form("editpageid")
RecSet.Update
RecSet.Close
Set objConn = nothing
Response.Redirect("../menu.asp")
%>



