我是歷盡千辛萬苦拔山涉水啊終於把這個頁面寫完了不過這也要多感謝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 =
From:http://tw.wingwit.com/Article/program/net/201311/12466.html