% strConnect = "DSN=patentkimsdb;UID=;PWD=;" part = request("part") searchkey = request("searchkey") page = request("page") number=cint(Request("number")) ref=cint(Request("ref")) Set DbCon=Server.CreateObject("ADODB.Connection") DbCon.Open (strConnect) sql = "SELECT * FROM qna where number=" & number Set rs=Server.CreateObject("ADODB.Recordset") rs.CursorType=3 rs.Open sql , DbCon %>
|
|