【发布时间】：2010-11-05 16:53:04
【问题描述】：
我正在尝试开发与 MSSQL 2005 服务器的 ASP SQL 连接。 SQL 服务器是我们主域服务器后面的子服务器，因此已在端口 1433 上从 WAN > LAN 设置了端口转发，以允许流量访问第二个服务器。
我已经完成了 telnet 测试，看看端口转发是否正常工作，它告诉我连接被拒绝。当我运行脚本时，我得到以下结果：
Microsoft OLE DB Provider for SQL Server 错误“80004005”
[DBNETLIB][ConnectionOpen (Connect()).]SQL Server 不存在或 访问被拒绝。
代码如下：
<%
Dim cn
Dim rs
Dim SQL
SQL = "SELECT count(*) FROM master"
'create an instance of the ADO cn and rs objects
Set cn = Server.CreateObject("adodb.connection")
Set rs = Server.CreateObject("adodb.recordset")
'open the cn to the database
cn.Open "Provider=SQLOLEDB;Data Source=###.###.###.###,1433;Network Library=DBMSSOCN;Initial Catalog=blah;User ID=blah;Password=blah"
'Open the rs object executing the SQL statement and return records
rs.Open SQL,cn,adOpenKeyset,adLockOptimistic
'first of all determine whether there are any records
If rs.EOF Then
Response.Write("No records returned.")
Else
'if there are records then loop through the fields
Do While NOT rs.Eof
Response.write rs("count")
Response.write "<br>"
rs.MoveNext
Loop
End If
'close the cn and rs objects to free up resources
rs.Close
Set rs=nothing
cn.Close
Set cn=nothing
%>
谢谢
【问题讨论】：
-
抱歉，我贴出来的代码有点乱。
-
101010 按钮可以很好地为您设置格式...
-
谢谢，我会记住的。