få recordset att fungera!

PercyMedlem sedan mars 2000187 inlägg

Frågan18 juli 2000 20:43#1

Hej!
någon som vet vad som skall korrigeras i koden för att få den att fungera? Får
följande felmeddelande:
ADODB.Recordset error '800a0cb3'

Object or provider is not capable of performing requested operation.

/pierre/insert.asp, line 19

Och koden är följande(insert.asp):
<html>
<head>
<link rel="stylesheet" href="style1.css">
</head>
<%
Dim Conn
Dim rs
Dim sql

'anger sökväg till db
Set Conn=Server.CreateObject("ADODB.Connection")
Set rs=Server.CreateObject("ADODB.Recordset")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=d:\clients\tantogarden.com\wwwroot\pierre\news.mdb"

sql = "SELECT * FROM news"
rs.Open sql, Conn
rs.AddNew
rs("date") = Date
rs("header") = Request.Form("header")
rs("content") = Request.Form("content")
rs("author") = Request.Form("author")

rs.Update
rs.Close
Conn.Close
%>
<table><tr><td><a href="addnews.asp">Tillbaka</a></td><tr></table>
</body>
</html>

/Percy

@ndersMedlem sedan juni 200032 967 inlägg

18 juli 2000 20:54#2

jag skulle gissa på att du inte får använda .addnew och liknande på en forward-only cursor.

i detta fall behöver du ju inte recordsetet överhuvudtaget. det är mycket vänligare (och enklare) att bara ställa en insert-fråga. typ:

sql = "INSERT INTO [News] ([date], [header], [content], [author]) VALUES (#" & Date & "#, '" & Request.Form("header") & "', '" &  Request.Form ("content") & "', '" & Request.Form("author") & "')"
Conn.Execute (sql)

------------------
don't follow your friends -- inflate them

[Redigerat av @nders den 18 jul 2000]