<% ID = request.querystring("IDE") Dim AdoCon Dim RsEnq Dim SQLEN set AdoCon = server.createobject("ADODB.CONNECTION") set RsEnq = server.createobject("ADODB.RECORDSET") AdoCon.Open "Driver={MICROSOFT ACCESS DRIVER (*.mdb)};DBQ=" & server.mappath("/DB/fh.mdb") SQLEN = "select projectID,ShowINCity,ShowINLoc from project_details where projectID=" & ID RsEnq.Open SQLEN, AdoCon,3,3 %> New Page 1
Project Name :
Project Id   ">
Show In Emirates Page <%=RsEnq("ShowINCity")%>

Show In Location Page <%=RsEnq("ShowINLoc")%>