dbcn.asp

客户管理系统的代码示例。“数据库”目录下为客户管理系统的数据库 备份文件；“源代码”目录下为系统各功能页面脚本代码。

<%
	 dim Sql_Server,Sql_User,Sql_Pass,Sql_Data
	 Sql_Server = "localhost"        '数据库服务器地址
	 Sql_User = "sa"				 '数据库登录名
	 Sql_Pass = "sa"		    	 '数据库密码
	 Sql_Data = "KHGLXT"			 '数据库名	
%>

<%
  dim  conn,connstr
  connstr = "PROVIDER=SQLOLEDB;DATA SOURCE="&Sql_Server&";UID="&Sql_User&";PWD="&Sql_Pass&";DATABASE="&Sql_Data
  set  conn = server.createobject("ADODB.connection")		'创建数据库连接对象
  conn.open  connstr										'连接数据库
%>