数据库连接代码，167上的我们推荐：
<%
'---------------------连接数据库---------------------------------------------------------
dim strprovider,conn
set conn=server.CreateObject("Adodb.connection")
strprovider = " PROVIDER=SQLOLEDB;DATA SOURCE=localhost; User ID=abc_com;Password='123'"

conn.open strprovider
%>