<
******************************
功能:ConnectionMssql(connstr)
参数:connstr,数据库连接代码
作者:Ali Cici
日期:2007 7 13
说明:一般数据库连接过程
的例子:
******************************
Sub ConnectionMssql(connstr)
下次继续出错
集objconn =服务器。Createobject(数据连接)
objconn.connectiontimeout = 12
objconn.connectionstring =装饰(connstr)
ObjConn。打开
如果objconn.errors.count = 0
其他的
响应。写connectionmssql
反应结束
最后如果
端子
%>