% Response.Buffer=True %> <%Set conn = Server.CreateObject("Adodb.Connection") DBPath = Server.MapPath("data/data.mdb") conn.Open "Driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath%> <% set rs=server.createobject("adodb.recordset") muber=request("id") rs.open "select * from form4 where email='"&muber&"'" ,conn,1,1 %>
|
![]() |
||||
|
|||||