% q_no = request.form("q_no") if q_no <> "" then set conn = Server.CreateObject("ADODB.Connection") conn.open "hanmonten", "hanmonten", "4229" sql = "select * from han_qna where q_no=" & q_no set rs = Server.CreateObject("ADODB.RecordSet") rs.open sql, conn, 3 title = rs("title") contents = rs("contents") contents = ">>" & contents contents = replace(contents, chr(13) & chr(10), chr(13) & chr(10) & ">>") end if %>
|
|