记笔记。

离开学校,东西都还给老师了,哎。

Select Case str
 Case "insert":
   sql="select * from ["&tablename&"] where id=null"
   rs.open sql,conn,1,3
   rs.addnew
   For Each key In request.Form
     ' response.write "rs("&CStr(key)&")="&request(key)&"<br>"
      rs(CStr(key))=request(key)
   Next
   rs.update
   rs.close
 Case "update":  
   sql="select * from ["&tablename&"] where
 End Select 

相关文章: