<%@ LANGUAGE="VBSCRIPT" %> <% Response.Buffer=true 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 if not rs.eof then %>

¼öÁ¤Çϱâ


">
   
ÀÛ¼ºÀÚ     " size="30" maxlength="50" name="writer" class="input">
E-mail     " size="30" maxlength="50" name="email" class="input">
Á¦¸ñ     " maxlength="100" name="subject" class="input">
ºñ¹Ð¹øÈ£        * ¼öÁ¤, »èÁ¦½Ã ÇÊ¿ä <% if Session("admintwk")="true" then %>  (ºñ¹Ð¹øÈ£ : <%=rs("passwd")%>)<% end if %>
³»¿ë     
   

<% end if rs.Close DbCon.Close set rs = nothing set DbCon = nothing %>