asp 读取数据库记录

  <%
'  
  Dpath ="www.111com.net/dbaseMateyDBWeb_^%$#@.mdb"
  Set Conn=Server.CreateObject("Adodb.connection")
 
  if request.QueryString("action")="list" then
   Set Rs =Server.CreateObject("Adodb.Recordset")
   Conn.connectionstring="Provider=Microsoft.Jet.oledb.4.0;Data source="&Server.MapPath(Dpath)
   Conn.open
   Dim sql
  
   sql ="select * from test id= "&request.QueryString("id")
   rs.open sql,conn,1,3
 
  end if
 
  %>

  ">

  用户名

    ">

  密码

 
   
   
 
 
   
   
 

地址	操作
www.111com.net	查看

本文章原创于www.111com.net转载注明出处