asp 讀取數據庫記錄

　　asp教程 讀取數據庫教程記錄
  <%
  
  Dpath ="wwwliannet/dbaseMateyDBWeb_^%$#@mdb"
  Set Conn=ServerCreateObject("Adodbconnection")
 
  if requestQueryString("action")="list" then
   Set Rs =ServerCreateObject("AdodbRecordset")
   Connconnectionstring="Provider=MicrosoftJetoledb;Data source="&ServerMapPath(Dpath)
   Connopen
   Dim sql
  
   sql ="select * from test id= "&requestQueryString("id")
   rsopen sqlconn
 
  end if
 
  %>

　　
  <input name="uid" type="text" id="uid" value="<%=rs("uid")%>">

　　用戶名

　　
    <input name="pwd" type="text" id="pwd" value="<%=rs("pwd")%>">

　　密碼

　　</p>
<table width="" border="">
  <tr>
    <td width="">地址</td>
    <td width="">操作</td>
  </tr>
  <tr>
    <td>wwwcnnet</td>
    <td><a href="?id=">查看</a></td>
  </tr>
</table>
 

From:http://tw.wingwit.com/Article/program/net/201311/14176.html