% myDB = Server.MapPath("board.mdb") strConnect = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & myDB Set Dbconnect = Server.CreateObject("ADODB.Connection") Dbconnect.Open(strConnect) Dbconnect.execute("update " & session("linktable") & " set Á¶È¸¼ö = Á¶È¸¼ö + 1 where ÀϷùøÈ£ = " & request.querystring("seqnum") ) strsql="select * from " & session("linktable") & " where ÀϷùøÈ£ = " & request.querystring("seqnum") set reqfield=Dbconnect.execute(strsql) %>
[
Çù·Â¾÷ü ¸ðÁý ] |
|