%Set conn = Server.CreateObject("ADODB.Connection") conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../db/cliffharveyangling.mdb") sql = "SELECT * FROM products where promotion = 'm' ORDER BY item" set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, conn, 3, 3%>
|
|||||||||||||||||||||||||||||