asp连接SQL Server出错！

[nriver]

asp:
<%
dim Conn
dim ConnStr
set Conn=server.createobject("adodb.connection")
ConnStr="driver={SQL Server};server=Ntserver;UID=sa;PWD=hot;Database=news"
Conn.Open ConnStr
%>


结果：
Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'

[Microsoft][ODBC SQL Server Driver][DBNETLIB]SQL Server 不存在或访问被拒绝

/news/ConnDB.asp，行6

[landlordh]

试下这个
dim Conn
dim connstr
sub conn_open()
connstr="Provider=SQLOLEDB.1; Data Source=vacsermlp;UID=sa; PWD=; Database=www"
Set Conn=Server.CreateObject("ADODB.Connection")
'set rs=Server.Createobject("ADODB.recordset")
Conn.Open connstr
end sub

[dddst]

连接串没什么问题啊,服务器名对了吗?用户名和密码呢?
要不
ConnStr="DRIVER={SQL Server};Server=(local);UID=sa;PWD=hot;Database=news"
或用
ConnStr="Provider=SQLOLEDB;Server=(local);Uid=sa;Pwd=hot;Database=news"
试试