<%
set titulo=request.Form("titulo")
set cn=server.CreateObject("adodb.connection")
cn.CursorLocation = 3
caminhodb="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("dados/bd")
cn.open caminhodb
set dados=server.CreateObject("adodb.recordset")
dados.open"select * from informativos where titulo like '%" & titulo & "%' order by id desc ", cn
%>
Bytech 1 - Tecnologia a Serviço da Informática
