<% ' Property of and written by Adam Ford --> dim intCID intCID = request.querystring("CID") ' Create the SQL statement strSQL = "SELECT * from Categories WHERE CID=" & intCID & ";" ' Open a recordset set objRS = objDBConn.execute(strSQL) intCID = empty %>