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

编辑Tag赚U币
教程Tag:暂无Tag,欢迎添加,赚取U币!

推荐:ASP实例:即时显示当前页面浏览人数
ASP实现即时显示当前页面浏览人数 online.asp文件 以下为引用的内容: <!--#include file="dbconn.asp" --> <% onlineTimeout=10

呵呵,这样,我们只要用两句语句就完成了数据的读取。同样的,通过在sql.asp中加入:

以下为引用的内容:
<%
public Function SelectDataNum(sql)
If sql<>"" then
Opendatabase
Rs.open sql,conn,1,1
If not Rs.eof then
Thedata=Rs.GetRows(-1)
Closedatabase
Num=ubound(Thedata,2)
Else
Closedatabase
End If
End If
SelectDataNum=Num
End Function
%>

我们就可以使用:

以下为引用的内容:
<%
sql = "Select * from cnarticle"
set loadData=new DataTable
Num=loadData.SelectDataNum(sql)
%>

来取得记录条数,可以用于分页或者用户名是否重复的判断。

其它的对数据记录的操作我们新建一个类,使用UpdateTable来完成操作:

以下为引用的内容:
<%
Class DataTable
public Function UpdataSql(sql)
If sql<>"" then
Opendatabase
conn.execute(sql)
Closedatabase
End If
End Function
End Class
%>

以下为引用的内容:
<%
sql = "delete from cnarticle"
set UpdateDate=new DataTable
UpdateDate.UpdataSql(sql)
%>

当然你也这以这样写:

以下为引用的内容:
<%
sql="insert into cnarticle(cn_title,cn_author,cn_content) values(' "&whattitle&" ',' "&whoauthor&" ',' "&whatcontent&" ')"
opendatabase
conn.execute(sql)
closedatabase
%>

考虑到可能删除语句我们会这么写:
sql="delect from cnarticle where id in(1,3,5,6,7,8)"

我新建一个类DeldataTable,直接使用DeldataTable.DeldataSql(tableName,DelField,id)完成记录的删除操作。

以下为引用的内容:
<%
Class DataTable
dim tempvalue
public Function DeldataSql(tableName,DelField,id)
If tableName<>"" and id<>"" then
sql="delete from "&tableName
If isnumeric(id) and instr(id,",")=0 then
sql = sql & " where "&DelField&" = "&id
Else
sql = sql & " where "&DelField&" in ("& id &")"
End If
Opendatabase
conn.execute(sql)
Closedatabase
tempvalue=true
Else
tempvalue=false
End If
DeldataSql=tempvalue
End Function
End Class
%>

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

来源:模板无忧//所属分类:ASP教程/更新时间:2008-08-22
相关ASP教程