这是我自己的心得，给大家作个参考。
我的目的是让开发变得简单，尽可能少地考虑实现语句，更多地把精力用于思考业务逻辑。希望我的文章对大家有所启发和帮助。
如果你对ASP不熟悉，可以先看以下教程：
1、http://布鲁斯狼的ASP编程入门进阶
2、/blog/showlog.asp?cat_id=26&log_id=448

现在相对简单多了，如果有多个操作页面我们只要导入连接文件就可以了，不过还是不够简洁，哪里不简洁？
一直在创建server，一直在写close，这样很容易出错，并且看起来与内容无关的太多。

那我再改进下：
把conn.asp文件改成：
复制代码 代码如下:
<%
DimConn
DimRs
SubCloseDatabase
Conn.close
SetConn=Nothing
EndSub
SubOpenDatabase
DimStrServer,StrUid,StrSaPwd,StrDbName
StrServer="192.168.1.1"'数据库服务器名
StrUid="sa"'您的登录帐号
StrSaPwd=""'您的登录密码
StrDbName="cnbruce.mdb"'您的数据库名称
SetConn=Server.CreateObject("ADODB.Connection")
'用于连接ACCESS
Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&Server.MapPath(StrDbName)
'用于连接MSSQL
'Conn.ConnectionString="Driver={sqlserver};driver={SQLserver};server="&StrServer&";uid="&StrUid&";pwd="&StrSaPwd&";database="&StrDbName
setrs=server.CreateObject("ADODB.RecordSet")
conn.open
ifErrThen
err.Clear
SetConn=Nothing
GBL_CHK_TempStr=GBL_CHK_TempStr&"数据库连接错误!"
Response.WriteGBL_CHK_TempStr
Response.End
EndIf
EndSub
%>

123下一页阅读全文