不好意思，我是用5.1测试的，今天在6.0下测试，发现VB下编程不需要提供用户名和密码，但在ASP下必须提供用户名和密码。所以必须用SQL Server EnterPrise Manager建立自己的用户，添加system Administrator权限就可以了！
dsnStr=request("dsnStr")
set conn=server.createobject("adodb.connection")
set rs=server.createobject("adodb.recordset")
conn.Provider = "sqloledb"
conn.open "Server=DCOUNT\WINCC;Database=" & dsnStr & ";UID=YourUserName;pwd=YourPass;"
rs.open "select * from test",conn,1,1
response.write rs.recordcount
do while not rs.eof
response.write rs("f1") & "---" & rs("f2") & "---" & rs("f3")
rs.movenext
loop
rs.close
conn.close