एडीओ रिकॉर्ड अद्यतन करें
- पिछला पृष्ठ एडीओ जोड़ें
- अगला पृष्ठ एडीओ मिटाएं
हम SQL के UPDATE का उपयोग कर सकते हैं ताकि डाटाबेस तालिका में किसी रिकॉर्ड को अद्यतन किया जा सके。
डाटाबेस तालिका में रिकॉर्ड अद्यतन करना
हम नॉर्थविंड डाटाबेस में Customers तालिका के किसी रिकॉर्ड को अद्यतन करना चाहते हैं।पहले हमें Customers में सभी रिकॉर्डों को सूचीबद्ध करने के लिए एक तालिका बनानी होगी。
<html>
<body>
<%
set conn=Server.CreateObject(\
conn.Open \
rs.open "SELECT * FROM customers",conn
%>
<h2>List Database</h2>
<table border="1" width="100%">
<tr>
<%
for each x in rs.Fields
response.write("<th>" & ucase(x.name) & "</th>")
next
%>
</tr>
<% do until rs.EOF %>
<tr>
<form method=\
<%
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
%>
</form>
<%rs.MoveNext%>
</tr>
<%
loop
conn.close
%>
</table>
</body>
</html>
यदि उपयोगकर्ता "customerID" स्तम्भ में बटन पर क्लिक करता है, तो एक नया फ़ाइल "demo_update.asp" खुलेगा। यह फ़ाइल इनपुट डोमेन के स्रोत कोड को शामिल करती है कि वह डाटाबेस में रिकॉर्ड के फ़ील्डों के आधार पर है, जिसमें एक "संशोधित करने के लिए अद्यतन" बटन भी है:
<html>
<body>
<h2>Update Record</h2>
<%
set conn=Server.CreateObject(\
conn.Open \
cid=Request.Form(\
if Request.form(\
rs.open \
%>
<form method=\
<table>
<%for each x in rs.Fields%>
<tr>
<td><%=x.name%></td>
<td><input name=\
<%next%>
</tr>
</table>
<br /><br />
<input type=\
</form>
<%
else
sql=sql & \
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>
- पिछला पृष्ठ एडीओ जोड़ें
- अगला पृष्ठ एडीओ मिटाएं
