Problema addnew.

Debe ser la forma en que estás usando ado con asp...
Usa este codigo para probar:

<%
nombre = trim(Request.Form("nombre"))
apellido = trim(Request.Form("apellido"))

Dim con, string, sql
Set con = Server.CreateObject("ADODB.Connection")
string = "DRIVER={Microsoft Access Driver (*.mdb)};" & _
"DBQ=" & Server.MapPath("tubase.mdb") & ";"
con.Open(string)

sql = "INSERT INTO TBL (nombre, apellido) VALUES ('" & nombre & "', '" &
apellido & "')"

con.Execute(sql)

If Err = 0 Then
Response.write "OK"
Else
Response.Write "1- Descripcion: "& Err.Description &"<br>."
Response.Write "2- Numero "& Err.Number &"<br>."
Response.Write "3- Source "& Err.Source &"<br>."
Response.Write "4- Helpfile "& Err.Helpfile &"<br>."
Response.Write "5- HelpContext "& Err.HelpContext &"<br>."
Response.Write "<center><a
href='javascript:history.back();'>Atras</a></center>"
End If

con.Close
Set con = Nothing
%>

FF
www.francofigun.com.ar
MSN:
Yahoo MSN:
"chele" wrote in message
news:

Buenas gente, tengo un problema con un foro que me baje, me da siempre
error al hacer un addnew ... y no se por que.

El codigo seria este :

strSQL = "SELECT TOP 1 " & strDbTable & "PMMessage.* FROM " & strDbTable &
"PMMessage WHERE " & strDbTable & "PMMessage.Author_ID = " & lngToUserID &

"

ORDER BY " & strDbTable & "PMMessage.PM_Message_Date DESC;"

rsCommon.CursorType = 3
rsCommon.LockType = 3
rsCommon.Open strSQL, adoCon
rsCommon.AddNew
rsCommon.Fields("Author_ID") = lngToUserID
rsCommon.Fields("From_ID") = lngLoggedInUserID
rsCommon.Update

Y me da este error en el rsCommon.AddNew

ADODB.Recordset error '800a0cb3'

Current Recordset does not support updating. This may be a limitation of

the

provider, or of the selected locktype.

/pm_post_message.asp, line 306

¿Sabeis que puede ser?

Hacer select puedo perfectamente, y los insert con insert into tambien

pero

cuando hago un addnew me falla siempre ... ¿alguna idea?

Gracias anticipadas.

Ah felicidades por el foro muy guapo :)