%@ codepage=65001%> <%Session.CodePage=65001%> <% proid=Request("proid") Set conn = Server.CreateObject("ADODB.Connection") DBPath = Server.MapPath("product/product.mdb") conn.Open "driver={Microsoft Access Driver (*.mdb)};pwd=guest;dbq=" & DBPath SET rs = Server.CreateObject("ADODB.Recordset") sqltxt= "SELECT * from wine where proid="& proid rs.Open sqltxt, conn, 3 %>