ADODB.Recordset 错误 '800a0e78' 对象关闭时，不允许操作。

[baidu_36857974]

<%
set rs=server.createobject("adodb.recordset")
sql_string = "select * from dt_jiancebb_xm"
rs.open sql_string,conn,1,3
rs.addnew
rs("yangpinbianhao")=yangpinbianhao
rs("yangpinmingcheng")=yangpinmingcheng
rs("shoujiandanwei")=shoujiandanwei
rs("jiancejieguo")=jiancejieguo
rs("jiancejielun")=jiancejielun
rs("jianceriqi")=jianceriqi
rs("jianceyuan")=jianceyuan
rs.update
rs.close

%>
<table border= 1 align="center">
<tr><td colspan= 11 align="center">查询列表</td></tr>
<tr>
<td>yangpinbianhao</td><td>yangpinmingcheng</td><td>shoujiandanwei</td>
<td>jiancejieguo</td><td>jiancejielun</td><td>jianceriqi</td><td>jianceyuan</td>
</tr>
<%
do while not rs.eof
response.Write rs("title")
rs.movenext
loop
%>

[唐诗三百首]

"rs.open sql_string,conn,1,3" --> conn对象没有定义和Open, 须在此句之前添加2行: set conn = server.CreateObject("adodb.connection") conn.Open "driver={SQL Server};server=服务器名;uid=账号;pwd=密码;database=数据库名"

[baidu_36857974]

Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005' [Microsoft][ODBC SQL Server Driver][DBNETLIB]SQL Server 不存在或访问被拒绝

[唐诗三百首]

请确认: 1.conn.Open..语句中的数据库连接串所填的服务器名是否正确. 2.确认服务器上SQL服务状态是否已启动. 3.确认调试环境到服务器的网络是否通畅,试试在DOS里ping 服务器名. 4.以上3步确认后,如果仍有问题,暂时把服务器上的windows防火墙暂时关掉试试.

[baidu_36857974]

好的！谢谢~~~