![]() |
#2
dzt00012012-11-08 09:53
|
<%
Dim conn,strConn
Set conn=Server.CreateObject("ADODB.Connection")
conn.Open "provider=microsoft.Jet.OLEDT.4.0; Data Source="&Server.MapPath("attempt/yingyong0220.mdb")
dim rs,strsql
trSql="Select * from user20 Where name Like'%"& Request.Form("example1")&"%'"
Set rs=conn.execute(strsql)
%>