教你數據庫簡單實現添加,顯示,修改,刪除的方法

作者：來源：發布時間：2011-6-8 11:35:56 點擊：

本文章將給大家用最精簡的實例介紹到實現顯示、添加、修改、刪除的比較簡便的方法，雖然是以ASP例子介紹，但同樣適用于PHP、JSP、ASP.NET等語言。文中用到了java script腳本，大家也可從中學到部分的java script知識，希望給大家帶來幫助和啟發。

　　因為近幾天工作太忙，就不祥細的寫原理文章了，我在代碼里面寫的注釋非常清楚，相信懂點網頁編程的朋友應該都能夠看懂。

　　聲明：希望各位朋友轉載時，不要把原有作者版權去掉，謝謝合作。

　　由于本人寫作水平有限，寫的不好的地方，還請大家多多包涵，如要批評或意見，請加我QQ。

　　以下正文開始：

　　功能介紹：

　　平時很多人至少需要做三個表單才能實現數據的顯示、添加、修改、刪除，本文講的是只用一個添加表單，就可實現數據的顯示、添加、修改、刪除功能。用此方法寫程序時，至少可以省兩倍的精力。

　　實現例子：

　　例子說明：

數據庫名：db.mdb
表名：pub_doc
字段：id和memo1-----memo30 (多少個字段大家可以自己設置)
公用部分：
公用部分，可以存成單個文件，用include調用。

<%
'數據庫連接
db="db.mdb"
set conn=server.createobject("adodb.connection")
conn.open "provider=microsoft.jet.oledb.4.0;data source="& server.mappath(db)

'發布時間：2005年12月30日晚
'文章作者：翟振凱 (小琦)
'個人站：http://www.xiaoqi.net
'技術站：http://www.iisvs.net
'商業站：http://www.iisvs.com
'論壇站：http://www.tdqy.com
'QQ：53353866 22336848

'添加數據函數
function add_form(sl)'添加數據函數

'response.write request("act")
'response.end

if request("act")="add_save" and sl<>"" then

'------------------生成SQL語句----------------小琦

'--------循環memo
                        For i = 1 To sl
                                zd_name=zd_name&"memo"&i&","
                        if request("memo"&i&"")<>"" then
                                zd_value=zd_value&"'"&request("memo"&i&"")&"'"&","
                        else
                                zd_value=zd_value&"'"&null&"'"&","
                        end if
                        next
'//--------循環memo

'去掉最后的“,”
zd_name=left(zd_name,len(zd_name)-1)
zd_value=left(zd_value,len(zd_value)-1)

sql="Insert into pub_doc("&zd_name&")values("&zd_value&")"

'//------------------生成SQL語句----------------小琦
conn.execute(sql)
response.write "添加數據成功!"
Response.End
end if

end function

'修改數據函數
function edit_form(sl)'修改數據函數

if request("id")<>"" and request("act")="edit_save" and sl<>"" then

'------------------生成SQL語句----------------小琦

'--------循環memo
                zd_name="" '字段名子
                        For i = 1 To sl
                                zd_name=zd_name&"memo"&i&"="
                        if request("memo"&i&"")<>"" then
                                zd_name=zd_name&"'"&request("memo"&i&"")&"'"&","
                        else
                                zd_name=zd_name&"'"&null&"'"&","
                        end if
                        next
'//--------循環memo