asp access insert update delete 使用

　　本教程是一篇asp入門篇的初級教程了主要是講asp access insert update delete 簡單的使用哦好了下面我們把它們寫在一個函數裡面然後再舉例說明

　　Function add_del_update(tablenamestrid)
Select Case str
 Case "insert":
   sql="select * from ["&tablename&"] where id=null"
   rsopen sqlconn
   rsaddnew
   For Each key In requestForm
     responsewrite "rs("&CStr(key)&")="&request(key)&"<br>"
      rs(CStr(key))=request(key)
   Next
   rsupdate
   rsclose
 Case "update":  
   sql="select * from ["&tablename&"] where id="&id
   rsopen sqlconn 
   For Each key In requestForm
      if key<>"id" then
        rs(CStr(key))=request(key)
      end if
   Next
   rsupdate
   rsclose
 Case "delete":  
   sql="delete from ["&tablename&"] where id in("&id&")"
   rsopen sqlconn
 Case ""
 End Select
 End Function
%>

　　<%
 向table表中添加一條記錄
 call add_del_update("table""insert""")
修改table表中的id=(id放在上一頁action中也可以是隱藏表單)的記錄  
  id=request("id")
  call add_del_update("table""update"id)
刪除table表中的一些記錄id是上一頁action中也可以是某一表單
  id=request("id")
  call add_del_update("table""delete"id)
%>

From:http://tw.wingwit.com/Article/program/net/201311/14128.html