asp 连接数据库 sql server

方法有很多种，我只是举例一种

在程序页面中引用就这个文件
<!-- #include file=conn.asp -->

conn.asp代码如下：
<%@ LANGUAGE = VBScript CodePage = 936%>
<%
option explicit
Response.Buffer = True
Response.Expires= 0
On Error Resume Next
Dim SqlNowString
Dim Conn,Db
Startime=timer()
'可修改设置一：========================定义数据库类别，1为SQL数据库，0为Access数据库=============================
Const IsSqlDataBase = 0
'================================================================================================================
If IsSqlDataBase = 1 Then
'必修改设置二：========================SQL数据库设置=============================================================
'sql数据库连接参数：
Const SqlUsername = "" '用户名(SqlUsername)、
Const SqlPassword = "" '用户密码(SqlPassword)
Const SqlDatabaseName = "" '数据库名(SqlDatabaseName)
Const SqlLocalName = "(local)" '（本地用lo