asp如何链接sql server 2008数据库

asp如何链接sql server 2008数据库

<%
public Sql_server_addr,Sql_user,Sql_password,Sql_database
Sql_server_addr = "192.168.0.254"  ‘数据库服务器地址
Sql_user = "sa"                    ‘用户
Sql_password = "606"               ‘密码
Sql_database = "ChengJi"           ‘数据库名
public constr                      ‘链接字符串
public SQL_Str                     ‘数据查询字符串
constr = "driver={SQL server};server="&Sql_server_addr&";UID="&Sql_user&";PWD="&Sql_password&";database="&Sql_database&";"
public adocon                      ‘数据库链接对象
set  adocon = server.CreateObject("adodb.connection")
adocon.open constr

if err then
err.clear
set adocon = nothing
response.write "数据库链接错误，请检查数据库链接文件"
end if

%>