<% mywords= request.QueryString("id") Set objConn = Server.CreateObject("ADODB.Connection") objConn.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("admin/messages.mdb") & ";" set rs = objConn.Execute("select id, name, message from messages where id = " & mywords ) %>

<% response.write rs("Name") %>

<% response.write rs("Message") %>