addcom.asp
nickname=trim(request("nickname"))
qq=trim(request("qq"))
email=trim(request("email"))
homepage=trim(request("homepage"))
address=trim(request("address"))
telephone=trim(request("telephone"))
subject=trim(request("subject"))
sex=trim(request("sex"))
content=trim(request("content"))

set conn=server.CreateObject("adodb.connection")
set rs=server.CreateObject("adodb.recordset")
dim addcomstr1
conn.open "provider=microsoft.jet.oledb.4.0;data source="_
&server.MapPath("lanyadb.mdb")&";persist security info=false"
addcomstr1="select * form commends"
rs.open addcomstr1,conn,3,3 //19行
rs.addnew

rs("nickname")=nickname
rs("qq")=qq
rs("email")=email
rs("homepage")=homepage
rs("address")=address
rs("telephone")=telephone
rs("subject")=subject
rs("sex")=sex
rs("content")=content
rs("datetime")=now()

rs.update
rs.close
set rs=nothing
%>
提示错误：

Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

Microsoft JET Database Engine 错误 '80040e14'

语法错误 (操作符丢失) 在查询表达式 '* form commends' 中。

/lanya/addcommends.asp，行19

我尝试改了 conn 和str名称都不行啊，该怎么改啊？？谢谢了

[此贴子已经被作者于2006-5-26 10:00:52编辑过]

dim addcomstr
conn.open "provider=microsoft.jet.oledb.4.0;data source="_
&server.MapPath("lanyadb.mdb")&";persist security info=false"

rs.open addcomstr,conn,3,3

你的addcomstr是什么?SQL语句呢?

你读数据库的时候有问题吗？

哈哈谢谢icecool
和hangxj两个天才哥哥，嘿嘿，我真是天才呀，弄出来了
是数据库设置的问题
addcomstr1 是个sql语句，嘿嘿
今天中午多吃点。太好了

addcomstr1="select * from commends"