数据库连接问题

数据库都已建好，浏览的时候总提示内部服务器错误，不知道什么哪里出错了<%@ Language=VBScript %>
<%
dim conn
dim connstr
set conn=server.CreateObject("ADODB.Connection")
connstr="provider=sqloledb;data source=192.168.0.3;uid=sa;pwd=;database=bbs"
conn.Open connstr
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY></BODY>
</HTML>