asp 通用数据库连接过程函数
2018-09-06 12:01
阅读:331
<%
******************************
函数:ConnectionMssql(ConnStr)
参数:ConnStr,数据库连接代码
作者:阿里西西
日期:2007/7/13
描述:通用数据库连接过程
示例:<%=ConnectionMssql(Provider=Microsoft.Jet.OLEDB.4.0;DataSource=test.mdb)%>
******************************
SubConnectionMssql(ConnStr)
OnErrorResumeNext
objConn.ConnectionTimeout=12
objConn.ConnectionString=Trim(ConnStr)
objConn.Open
IfobjConn.Errors.Count=0Then
Else
Response.WriteConnectionMssql,数据连接失败,请检查配置文件!
Response.End
EndIf
EndSub
%>
评论
亲,登录后才可以留言!