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>