test7.asp

来自「所在类别： 随书资源/T 工业技术/TP 自动化技术、计算机技术/TP31 计算」· ASP 代码 · 共 14 行

<%@ language=vbscript %>
<%
   set cn=Server.CreateObject("ADODB.Connection") 	
   cn.connectionstring="Provider=SQLOLEDB;UID=sa;pwd=123;" & _
              "database=图书销售;Data Source=(local)"
   cn.Open 
   if cn.state=adStateOpen then
	response.write "已成功连接到“图书销售”数据库"
   else
	response.write "连接数据库出错：" & cn.errors(0).Description
   end if
   cn.close		'关闭连接
   set cn=nothing       '释放连接对象
%>