求救，送100分（在线等）

[newstar2002]

<%
bookname=Request.Form("bookname")
bookleibie=Request.Form("leibie")
bookversion=Request.Form("version")
bookprice=Request.Form("price")
booksprice=Request.Form("sprice")
bookdate=date()
bookseller="1"


'创建数据库连接
strp="FILEDSN=c:\database.dsn"
set dbLink=Server.CreateObject("ADODB.Connection")
dblink.Mode =3
dbLInk.Open strp
'创建数据对象
set rs=Server.CreateObject ("ADODB.Recordset")
rs.LockType=3
rs.CursorType=0
rs.Open "select * from bookinfo",dbLink
'添加数据到数据库
rs.AddNew
rs("chrBookName")=bookname
rs("chrleibie")=bookleibie
rs("chrVersion")=bookversion
rs("chrUserId")=bookseller
rs("chrPrice")=bookprice
rs("chrSPrice")=booksprice
rs("datetime")=bookdate
rs.Update //报这行出错
rs.Close
dbLink.Close

%>

错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
/Project2/asp/addbook.asp, 第 38 行
请赐教，谢

[angelheavens]

set rs=Server.CreateObject ("ADODB.Recordset")
rs.LockType=3
rs.CursorType=0
rs.Open "select * from bookinfo",dbLink

改为:
rs.Open "select * from bookinfo",dbLink,1,3

[angelheavens]

set rs=Server.CreateObject ("ADODB.Recordset")
rs.LockType=3
rs.CursorType=0
rs.Open "select * from bookinfo",dbLink

改为:
set rs=Server.CreateObject ("ADODB.Recordset")
rs.Open "select * from bookinfo",dbLink,1,3

[newstar2002]

我是了还是不行

[arcow]

看是不是权限不够，在数据库上右键属性，看是否可写，你是不是管理员？

[angelheavens]

重新创建一个DSN
然后把创建数据库连接
strp="FILEDSN=c:\database.dsn"
set dbLink=Server.CreateObject("ADODB.Connection")
dblink.Mode =3
dbLInk.Open strp
改成:
'创建数据库连接
set dbLink=Server.CreateObject("ADODB.Connection")
dbLInk.Open "DSNname;uid=;pwd=" '有密码要加

[makay]

http://www.ceocio.net/article_view.asp?id=56

[humin1906]

可能是库的权限问题，你把那个错误类型去搜索一下。
IIS中点击默认WEB站点的属性。再点目录安全性，点里面的匿名访问。
主要是它的权限没设好，你把他的名称改成跟你的虚拟服务器名一样

[bullion]

你试一下用别的数据库连接方法,如果没错,说明是dsn的问题.

[yangxjn]

rs.Open "select * from bookinfo",3,1

[DeltaCat]

rs.CursorType=2