[求助] - ASP技术论坛 - 编程论坛档案馆

得分:0

为了那个access与xp不匹配的问题我又装了SQL，但是现在我的程序还是有问题，请大家帮忙看一下，这个数据库的连接该怎么办。这是个服务器端验证代码的程序： <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <meta http-equiv="Content-Language" content="zh-cn"> <title>登录</title> </head> <body> <div align=center> <% dim strUserName dim strPassword dim conn dim rs dim sql strUserName=Request.Form("txtUserName") strPassword=Request.Form("txtPassword") set conn=server.createobject("ADODB.Connection") conn.open"Driver={SQL Server};" & "Server=ZG-SCI-HZIEE;" & "Database=LearnAsp;" & "Uid=sql;Pwd=sql" set rs=server.createobject("ADODB.Recordset") rs.open.sql,conn,1,1 if not rs.eof then response.write"登录成功！" else response.write"登录失败！" end if set rs=nothing conn.close set conn=nothing %> </div> </body> </html> 这是出错的显示：错误类型： Microsoft OLE DB Provider for ODBC Drivers (0x80004005) [Microsoft][ODBC SQL Server Driver][DBNETLIB]SQL Server 不存在或访问被拒绝 /asp实验/verifyIDA.asp, 第 18 行

第 12 楼

得分:0

conn.open"Driver={SQL Server};" & "Server=ZG-SCI-HZIEE;" & "Database=LearnAsp;" & "Uid=sql;Pwd=sql"

SQL Server服务器名是ZG-SCI-HZIEE吗，SQL Server服务启动了吗？

天津网站建设 http://www./

第 13 楼

得分:0

服务启动了，服务器名就是计算机的名字吧，我把“我的电脑”属性里的计算机名拷下来贴里面也是一样的出错啊。

第 14 楼

得分:0

试试

conn.open "Driver={SQL Server};Server=(local);uid=sql;pwd=sql;database=LearnAsp" 或 conn.open "Driver={SQL Server};Server=localhost;uid=sql;pwd=sql;database=LearnAsp"

天津网站建设 http://www./

第 15 楼

得分:0

还是一样的错。这样的错误可能会是因为在SQL Server 2000 里什么设置或是其他的设置而产生吗？我对数据库不熟，会不会那里的哪个步骤出错？

第 16 楼

得分:0

。。。。汗，。。。。。

天津网站建设 http://www./

第 17 楼

得分:0

是不是把简单的问题整复杂了啊？

第 18 楼

得分:0

我又回来了。因为这个连接的问题我下了一个小的留言板，看了人家的数据库连接语句，测试都是通过的。 <% dim conn dim connstr dim db '更改数据库名字 db="book.mdb" Set conn = Server.CreateObject("ADODB.Connection") connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"") '如果你的服务器采用较老版本Access驱动，请用下面连接方法 'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(""&db&"") conn.Open connstr %> 这是人家的一个conn.asp里的语句段，我想应该是专门管与数据库的连接的吧。我把这样的格式统到我的程序里来：输出表头 <% dim conn dim connstr dim db '更改数据库名字 db="chengjidan.mdb" Set conn = Server.CreateObject("ADODB.Connection") connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"") '如果你的服务器采用较老版本Access驱动，请用下面连接方法 'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(""&db&"") conn.Open connstr %> <html> <body bgcolor="#6699dd"> Sample.mdb 数据库“成绩单”数据表七栏的表头：<UL> <% for I=0 to 6 Response.Write"<LI>" & rs(I).Name next %> <% rs.close %> </UL> </body> </html> 现在数据库的连接没问题了，但出现了新的问题：错误类型： Microsoft VBScript 运行时错误 (0x800A000D) 类型不匹配: 'rs' /asp实验/5-1.asp, 第 19 行 我有两个问题，1。为什么换了留言板上的连接语句就能连接了？2。书上说rs是指数据库表中的列，那按这个程序运行下去应该没有错啊，是显示列的名字，类型不匹配在哪里呢？

第 19 楼

得分:0

[QUOTE]Set rs=conn.Execute("成绩单")[/QUOTE]

这句我好象搞不懂，Execute()里应该是SQL语句，“成绩单”是表名称，这样不匹配吧

第 20 楼

得分:0

回第18楼：

你还没建Recordset对象怎么来的rs