asp+access数据库实现站内搜归类.pdfVIP

% db=#qqun_qqclg.mdb Set conn = Server.CreateObject(ADODB.Connection) connstr=Provider=Microsoft.Jet.OLEDB.4.0;Data Source= Server.MapPath(db) conn.Open connstr set rs=server.CreateObject(adodb.recordset) search=request.Form(search) sql=select * from qqsys where qq link %search% or name like %search% or sf like %search% or jieshao like %search% rs.open sql,conn,1,1 if rs.eof and bof then response.Write( 没有找到相关内容 ) else while not rs.eof response.Write(rs(qq)) response.Write(rs(name)) response.Write(rs(sf)) response.Write(rs(jie)) response.Write(br) r