错误 '80004005' 如何解决

[yaya42581]

服务器连接sqlsever2000时出现错误
Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'

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

/conn.asp，行15
在出现错误时重起iis便正常，过一会就又出现错误，请指教
我的ＣＯＮＮ文件
<%
conn,dbuid,dbpwd,dbname,dbip,rs,database
dim startime,endtime
startime=timer()
database=1
'修改以下信息以适合不同的数据库
'---------------------------------------------------------------------------
dbuid="sa" '数据库登陆名
dbpwd="sa" '数据库密码
dbname="cu" '数据库名称
dbip="10.1.1.121" '数据库所在的IP地址，如果是本地数据库则为："(local)"
'---------------------------------------------------------------------------
set conn=Server.CreateObject("adodb.Connection")
Conn.Open "PROVIDER=SQLOLEDB.1;Data Source="&dbip&";Initial Catalog="&dbname&";Persist Security Info=True;User ID="&dbuid&";Password="&dbpwd&";Connect Timeout=30"
set rs=server.createobject("adodb.recordset")
%>

[mhxz568]

<%
set db=Server.CreateObject("ADODB.connection")
conn="Driver={SQL Server};server=你的服务器名称(比如ELITE88-DDDCD9C\ELITE88);database=数据库名称;UID=sa;PWD=123456;"
db.Open conn
%>
拿这个试试吧!

[m1_1m]

http://www.chinahtml.com/databases/2/2006/SQL-mssql11432786154012.shtml