asp

位置:IT落伍者 >> asp >> 浏览文章

asp教程:asp通用数据操纵函数


发布日期:2019年09月12日
 
asp教程:asp通用数据操纵函数

我是历尽千辛万苦拔山涉水啊终于把这个页面写完了不过这也要多感谢JSP了因为昨天心血来潮的时候突然想学JSP于是找了几篇文章看完后觉得javabean太牛X了有感觉有点象我平时写asp时的处理方式都是一个页面布局另外一个后台处理

正好又看到它的一个通用处理方法于是我也设计了一个ASP的不过只能用在SQL Server里了因为我经常用的都是SQL数据库

下面时我写的页面请多多指教!

使用时可以在提交表单中写

其中

tbl为要操作数据表的名称

keyv为条件语句多个条件可以用 $ 分隔

ON error resume Next

dim keyaconditiontemp临时变量

dim insstrinsstrinsstrdelstrupdstrrltstr

tbl=requestQueryString(tbl)表名

keyv=requestQueryString(keyv)关键字段名

condition=

keya=split(keyv$)

for each i in keya

if temp<> then

end if

condition=left(conditionlen(condition))

操作数据库

dbconnopen connstr connstr是数据库连接字符串这个再通用就不像话了

sqlstr=exec A_Tblinfo &tbl&

记录集为空处理

responseClear()

responseEnd()

插入操作

insstr=insert into [&tbl&](

while not dbrsteof

fldv=requestForm(fld)

insstr=insstr&fld&

end if

wend

rltstr=

rltstr=left(insstr(len(insstr)))&) &left(insstr(len(insstr)))&)

修改操作

updstr=update [&tbl&] set

fld=dbrst(name)

if fldv<> and dbrst(colstat)<> then

end if

wend

rltstr=

rltstr=left(updstr(len(updstr)))&condition

删除操作

delstr=delete from [&tbl&]

responseClear()

responseEnd()

处理数据记录

dbconnexecute rltstr

dbrstclose

dbconnclose

%>

CursorTypeEnum Values

Const adOpenKeyset =

Const adOpenStatic =

LockTypeEnum Values

Const adLockPessimistic =

Const adLockBatchOptimistic =

               

上一篇:asp内置对象ObjectContext详解

下一篇:浅谈MsChart在ASP中的应用