एएसपी ट्यूटोरियल

एएसपी होम

WP ट्यूटोरियल

वेबपेज परिचय वेबपेज रेजर वेबपेज लेआउट वेबपेज फोल्डर वेबपेज ग्लोबल वेबपेज फॉर्म वेबपेज ऑब्जेक्ट्स वेबपेज फ़ाइलें वेबपेज डेटाबेस वेबपेज हेल्पर्स वेबपेज वेबग्रिड वेबपेज चार्ट वेबपेज ईमेल वेबपेज सुरक्षा वेबपेज प्रकाशित वेबपेज उदाहरण वेबपेज कक्षाएं

ASP.NET रेजर

रेजर इंट्रो रेजर सिंटेक्स रेजर सी # चर रेजर सी # लूप्स रेजर सी # लॉजिक रेजर वीबी चर रेजर वीबी लूप्स रेजर वीबी लॉजिक

एएसपी क्लासिक

एएसपी परिचय एएसपी सिंटेक्स एएसपी चर एएसपी प्रक्रियाएं एएसपी सशर्त एएसपी लूपिंग एएसपी फॉर्म एएसपी कुकीज़ एएसपी सत्र एएसपी आवेदन एएसपी #शामिल करें एएसपी Global.asa एएसपी अजाक्स एएसपी ई-मेल एएसपी उदाहरण

एएसपी संदर्भ

एएसपी वीबी कार्य एएसपी वीबी कीवर्ड एएसपी प्रतिक्रिया एएसपी अनुरोध एएसपी आवेदन एएसपी सत्र एएसपी सर्वर एएसपी त्रुटि एएसपी फाइल सिस्टम एएसपी टेक्स्टस्ट्रीम एएसपी ड्राइव एएसपी फ़ाइल एएसपी फ़ोल्डर एएसपी डिक्शनरी एएसपी एडरोटेटर एएसपी ब्राउज़र कैप एएसपी सामग्री लिंकिंग एएसपी सामग्री रोटेटर एएसपी त्वरित रेफरी

एडीओ ट्यूटोरियल

एडीओ परिचय एडीओ कनेक्ट एडीओ रिकॉर्डसेट एडीओ प्रदर्शन एडीओ क्वेरी एडीओ सॉर्ट एडीओ जोड़ें एडीओ अपडेट एडीओ हटाएं एडीओ डेमो एडीओ स्पीड अप

एडीओ ऑब्जेक्ट्स

एडीओ कमांड एडीओ कनेक्शन एडीओ त्रुटि एडीओ फील्ड एडीओ पैरामीटर एडीओ संपत्ति एडीओ रिकॉर्ड एडीओ रिकॉर्डसेट एडीओ स्ट्रीम एडीओ डेटा प्रकार

एडीओ अपडेट रिकॉर्ड


हम डेटाबेस में किसी तालिका में रिकॉर्ड को अपडेट करने के लिए SQL UPDATE कमांड का उपयोग कर सकते हैं। 


तालिका में रिकॉर्ड अपडेट करें

हम नॉर्थविंड डेटाबेस में ग्राहक तालिका में एक रिकॉर्ड अपडेट करना चाहते हैं। हम पहले एक तालिका बनाते हैं जो ग्राहक तालिका में सभी रिकॉर्ड सूचीबद्ध करती है:

<html>
<body>
<%
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%">
<tr>
<%
for each x in rs.Fields
  response.write("<th>" & ucase(x.name) & "</th>")
next
%>
</tr>
<% do until rs.EOF %>
<tr>
<form method="post" action="demo_update.asp">
<%
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" नामक एक नई फ़ाइल पर ले जाया जाएगा। "Demo_update.asp" फ़ाइल में डेटाबेस तालिका में एक रिकॉर्ड से फ़ील्ड के आधार पर इनपुट फ़ील्ड बनाने के तरीके पर स्रोत कोड होता है। इसमें एक "अपडेट रिकॉर्ड" बटन भी शामिल है जो आपके परिवर्तनों को सहेजेगा:

<html>
<body>

<h2>Update Record</h2>
<%
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
  %>
  <form method="post" action="demo_update.asp">
  <table>
  <%for each x in rs.Fields%>
  <tr>
  <td><%=x.name%></td>
  <td><input name="<%=x.name%>" value="<%=x.value%>"></td>
  <%next%>
  </tr>
  </table>
  <br><br>
  <input type="submit" value="Update record">
  </form>
<%
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>