ایڈو دکھانا

دکھائی دینے والی وجوہات کو دکھا جاتا ہے

مثال

دکھائی دینے والی وجوہات کو دکھا جاتا ہے
آپ کو پہلے ایک داٹا بنک کنکشن قائم کرنا چاہئیگا، بعد ازاں ایک ریکارڈ سیٹ قائم کرنا اور اس میں موجود وجوہات کو HTML میں دکھانے کا کام کریں۔
دکھائی دینے والی وجوہات کو دکھا جاتا ہے
دکھائی دینے والی وجوہات کو دکھا جاتا ہے
HTML جدول میں عنوان شامل کریں
کس طرح سے آپ HTML جدول میں عنوان شامل کرسکتے ہیں تا کہ وہ مزید پڑھا جاسکے؟
HTML جدول میں رنگ شامل کریں
کس طرح سے آپ HTML جدول میں رنگ شامل کرسکتے ہیں تا کہ وہ مزید خوبصورت بن جائے؟

فیلڈ کا نام اور فیلڈ کا ارزش دکھا جاتا ہے

آپ کا یہ ناام "Northwind" دا داٹا بنک ہے اور آپ چاہئیں کہ "Customers" جدول کی وجوہات کو دکھائی دیں (یاد رکھیئے کہ اس فائل کو .asp کی توسیع سے محفوظ رکھیئے):

<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
do until rs.EOF
  for each x in rs.Fields
    Response.Write(x.name)
    Response.Write(" = ")
    Response.Write(x.value & "<br />") 
  next
  Response.Write("<br />")
  rs.MoveNext
loop
rs.close
conn.close
%>
</body>
</html>

فیلڈ کا نام اور فیلڈ کا ارزش کو HTML جدول میں دکھا جاتا ہے

آپ اس کد کے ذریعے بھی "Customers" جدول کی دکھائی دینے والی وجوہات کو HTML جدول میں دکھا سکتے ہیں:

<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 Companyname, Contactname FROM Customers", conn
%>
<table border="1" width="100%">
<%do until rs.EOF%>
   <tr>
   <%for each x in rs.Fields%>
      <td><%Response.Write(x.value)%></td>
   <%next
   rs.MoveNext%>
   </tr>
<%loop
rs.close
conn.close
%>
</table>
</body>
</html>

HTML جدول میں عنوان شامل کریں

آپ کا یہ HTML جدول کا عنوان شامل کرنا چاہئیگا تا کہ وہ مزید پڑھا جاسکے:

<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")
sql="SELECT Companyname, Contactname FROM Customers"
rs.Open sql, conn
%>
<table border="1" width="100%">
  <tr>
  <%for each x in rs.Fields
    response.write("<th>" & x.name & "</th>")
  next%>
  </tr>
  <%do until rs.EOF%>
    <tr>
    <%for each x in rs.Fields%>
      <td><%Response.Write(x.value)%></td>
    <%next
    rs.MoveNext%>
    </tr>
  <%loop
  rs.close
  conn.close
  %>
</table>
</body>
</html>