ADO ਰਿਕਾਰਡ ਅੱਪਡੇਟ ਕਰਨਾ

ਅਸੀਂ SQL ਦੇ UPDATE ਦੀ ਮਦਦ ਨਾਲ ਡਾਟਾਬੇਸ ਤੇਲਕ ਵਿੱਚ ਕੋਈ ਰਿਕਾਰਡ ਅੱਪਡੇਟ ਕਰ ਸਕਦੇ ਹਾਂ。

ਡਾਟਾਬੇਸ ਤੇਲਕ ਵਿੱਚ ਰਿਕਾਰਡ ਅੱਪਡੇਟ ਕਰਨਾ

ਅਸੀਂ Northwind ਡਾਟਾਬੇਸ ਵਿੱਚ Customers ਤੇਲਕ ਦੇ ਕੋਈ ਰਿਕਾਰਡ ਅੱਪਡੇਟ ਕਰਨਾ ਚਾਹੁੰਦੇ ਹਾਂ। ਪਹਿਲਾਂ ਅਸੀਂ Customers ਵਿੱਚ ਸਾਰੇ ਰਿਕਾਰਡਾਂ ਦੇ ਸ਼ੂਟਲਸਟ ਲਈ ਇੱਕ ਤੇਲਕ ਬਣਾਉਣਾ ਚਾਹੁੰਦੇ ਹਾਂ。



<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "c:/webdata/northwind.mdb"
set rs=Server.CreateObject("ADODB.Recordset")
rs.open "SELECT * FROM customers",conn
%>
<h2>List Database</h2>
<table border="1" width="100%">

<%
for each x in rs.Fields
  response.write("<th>" & ucase(x.name) & "</th>")
next
%>

<% do until rs.EOF %>



<%
for each x in rs.Fields
  if lcase(x.name)="customerid" then>
    <td>
    <input type="submit" name="customerID" value="<%=x.value%>">
    </td>
  <%else%>
    <td><%Response.Write(x.value)%></td>
  <%end if
next
%>


<%rs.MoveNext%>

<%
loop
conn.close
%>

</body>
</html>

如果用户点击 "customerID" 列中的按钮，会打开一个新文件 "demo_update.asp"。此文件包含了创建输入域的源代码，这些输入域基于数据库中记录的字，同时也含有一个保存修改的“更新按钮”：




Update Record

<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "c:/webdata/northwind.mdb"
cid=Request.Form("customerID")
if Request.form("companyname")="" then
  set rs=Server.CreateObject("ADODB.Recordset")
  rs.open "SELECT * FROM customers WHERE customerID='" & cid & "'",conn
  %>
  

  
  <%for each x in rs.Fields%>
  
  <%next%>
  

  <%=x.name%>
  

  

  


  
  

<%
else
  sql="UPDATE customers SET "
  sql=sql & "companyname='" & Request.Form("companyname") & "',"
  sql=sql & "contactname='" & Request.Form("contactname") & "',"
  sql=sql & "address='" & Request.Form("address") & "',"
  sql=sql & "city='" & Request.Form("city") & "',"
  sql=sql & "postalcode='" & Request.Form("postalcode") & "',"
  sql=sql & "country='" & Request.Form("country") & "'"
  sql=sql & " WHERE customerID='" & cid & "'"
  on error resume next
  conn.Execute sql
  if err<>0 then
    response.write("No update permissions!")
  else 
    response.write("Record " & cid & " was updated!")
  end if 
end if
conn.close
%>
</body>
</html>