ASP快速开发方法之数据操作_ASP教程

2024-05-04 11:03:29

字体：大中小

来源：转载

供稿：网友

推荐：ASP实例：即时显示当前页面浏览人数
ASP实现即时显示当前页面浏览人数 online.asp文件以下为引用的内容：<%onlineTimeout=10

这是我自己的心得，给大家作个参考。
我的目的是让开发变得简单，尽可能少地考虑实现语句，更多地把精力用于思考业务逻辑。希望我的文章对大家有所启发和帮助。

好吧，让我们进入正题：

先看以下例子：

以下为引用的内容：
<%
db_path = "database/cnbruce.mdb"
Set conn= Server.CreateObject("ADODB.Connection")
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(db_path)
conn.Open connstr
Set rs = Server.CreateObject ("ADODB.Recordset")
sql = "Select * from cnarticle"
rs.Open sql,conn,1,1
if rs.EOF and rs.BOF then
response.write ("暂时还没有文章")
else
Do Until rs.EOF
response.write("文章标题是:"& rs("cn_title"))
response.write(" 文章作者是:"& rs("cn_author"))
response.write(" 文章加入时间是:"& rs("cn_time"))
response.write(" 文章内容是:"& rs("cn_content"))
response.write("<hr>")
rs.MoveNext
Loop
end if
rs.close
Set rs = Nothing
conn.close
set conn=Nothing
%>

嗯，这是一个典型的读取数据并显示的例子，参见：http://www.cnbruce.com/blog/showlog.asp?cat_id=26&log_id=448
嗯，确实简单。从上至下，很容易明白。但是当你对多个表进行读插删改的时候，当你的代码里有很多HTML/js混杂的时候，你会有疑问：为什么有这么多东西要重复呢？
所以一般我们把一些简单的操作独立出来，写成类或者函数放进包含文件(include)。

那么以上的操作我们可以使用两个文件来实现：

conn.asp

showit.asp

以下为引用的内容：

<%
Set rs = Server.CreateObject ("ADODB.Recordset")
sql = "Select * from cnarticle"
rs.Open sql,conn,1,1
if rs.EOF and rs.BOF then
response.write ("暂时还没有文章")
else
Do Until rs.EOF
response.write("文章标题是:"& rs("cn_title"))
response.write(" 文章作者是:"& rs("cn_author"))
response.write(" 文章加入时间是:"& rs("cn_time"))
response.write(" 文章内容是:"& rs("cn_content"))
response.write("<hr>")
rs.MoveNext
Loop
end if
rs.close
Set rs = Nothing
conn.close
set conn=Nothing
%>

参考：http://www.cnbruce.com/blog/showlog.asp?cat_id=26&log_id=448

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

分享：ASP教程：解决ASP脚本运行超时的方法
最近在学习服务器知识。有时候遇到asp脚本运行超时的错误，真是麻烦。找了相关资料，其中有一些解决方法。IIS默认的脚本超时时间是90秒这样的话如果你是上传软件或者传送数据大于90秒的时