ASP2.0の質問です。WindowsServer2003とSqlServer2000で動作させています。

上記ソースコードを実行すると500エラーが帰ってきます。何か間違っているところありますでしょうか？どうやら、CreateObject("ADODB.Connection")で失敗してしまうようです。ホスティングのため、なかなかサーバーの設定ができないでいます。少しでもお気づきの点がありましたらご指摘おねがいします。
-------------------------
strDB= "Provider=SQLOLEDB;Server=***.***.***.***;Database=*****;UID=***;PWD=***"
Set dbo = Server.CreateObject("ADODB.Connection")
dbo.Open strDB
If Err.Number <> 0 Then
response.write("error")
Exit Sub
End If

strSql= "SELECT COUNT(id_hoge) AS XCOUNT FROM tables"
Set rs= dbo.Execute(strSql)
If Err.Number <> 0 Then
response.write(strSql)
Exit Sub
End If

nTotal= rs("XCOUNT").Value
response.Write(nTotal)
-------------------------