´ç½Å¿¡°Ô·Î ¶°³ª´Â ²Þ¼Ó¿©Çà - ²Þ¼Ó³ª¶ó(http://www.inyourdream.net)
ID¿Í Password¸¦ ÀÔ·ÂÇϼ¼¿ä.
ÀÔ±¹Çϱâ
|
¿µÁÖ±Ç ½Åû
¸öºÎ¸² °ñ¶ó°ñ¶ó
¼Ò±Ù¼Ò±Ù
µµ¶õµµ¶õ
³«¼¸¶´ç
Âø°¢ÇѾÆÀÌ
¼ýÀÚ¸ÂÃß±â
¼Ò¿øºô±â
ÈçÀû³²±â±â
²Þ¼Ó¿©Çà
Ä£±¸Áý ³î·¯°¡±â
¸ðµÎµå¸²´ÔÀÇ È¨
î¤éÞ´ÔÀÇ È¨
Çö¿ì´ÔÀÇ È¨
º°¾ÆÇØ´ÔÀÇ È¨
ÇÞ»ì´ÔÀÇ È¨
À̳ª´Ï´ÔÀÇ È¨
À¯¸®¾Ë´ÔÀÇ È¨
³È³ÈÀÌ´ÔÀÇ È¨
²ÀÁö´ÔÀÇ È¨
´ë¼º´ÔÀÇ È¨
µî·ÏÇϽǶ§´Â ÇʼöÇ׸ñÀ» ¸ðµÎ ÀÔ·ÂÇÏ¼Å¾ß ÇÕ´Ï´Ù.
À̸§
*
HTML »ç¿ë
Á¦¸ñ
*
¼±ÅÃ
ÀÚÀÛ
»ç¶û
À¯¸Ó
ÀÚÀ¯
̵̧
¾Ë¸²
Áú¹®
±âŸ
³»¿ë
*
> ÇöÀç ´ÙÀ½°ú °°ÀÌ
HTML»ç¿ë > À» ¸¸µé¾î ÀԷ¶õ¿¡ Ãß°¡ÇÏ¿´½À´Ï´Ù. > ¹®Á¦´Â ÀÌ°÷¿¡¼ »õ·Ó°Ô ÀÔ·ÂÇÏ´Â °Í°ú´Â ´ÞÀÌ Å±×ÀÇ Àû¿ëÀÌ µÇÁö ¾Ê½À´Ï´Ù. > °ªÀ» ¹Þ¾ÆµéÀÌ´Â °ÍÀÇ ¼Ò½º´Â ´ÙÀ½°ú °°½À´Ï´Ù. > > <% > Const adOpenForwardOnly = 0 > Const adOpenKeyset = 1 > Const adOpenDynamic = 2 > Const adOpenStatic = 3 > > Dim board_id, board_writer, board_email > Dim board_no, board_title, board_memo, board_homepage, board_count > Dim keyfield, keyword, sortfield, sortword, strSQL > > Server.ScriptTimeOut = 7200 > > '»ç¿ëÀÚ°¡ ÀÔ·ÂÇÑ ±âº»ÀûÀÎ µ¥ÀÌŸ > > board_writer = trim(Request("board_writer")) > board_email = trim(Request("board_email")) > board_title = Replace(trim(Request("board_title")), "'", "''") > board_memo = Replace(trim(Request("board_memo")), "'", "''") > board_homepage = trim(Request("board_homepage")) > > ' Àü´ÞµÇ¾îÁö´Â µ¥ÀÌŸ > board_no = request("board_no") > board_count = request("board_count") > keyfield = request("keyfield") > keyword = request("keyword") > sortfield = request("sortfield") > sortword = request("sortword") > board_pass = request("board_pass") > html=trim(request("html")) > '+++++++++++++++++++++++++++++++ > board_userip=request.servervariables("REMOTE_HOST")'»ç¿ëÀÚ IP > board_useros=request.servervariables("HTTP_USER_AGENT")'»ç¿ëÀÚ ÄÄ Á¤º¸ > '+++++++++++++++++++++++++++++++ > board_count = board_count - 1 > > > > ' ÇöÀç ±Û Á¸ÀçÀ¯¹«È®ÀÎ > strSQL = "SELECT * FROM bulletboard WHERE board_no = " & board_no > > Set rs = Server.CreateObject("ADODB.Recordset") > rs.Open strSQL,DbCon,adOpenKeyset > > > if rs.EOF or rs.BOF then > rs.Close > Set rs = nothing > DbCon.Close > Set DbCon = nothing > %> > > > > <% > elseif board_pass <> rs("board_pass") then > rs.Close > Set rs = nothing > DbCon.Close > Set DbCon = nothing > user_pass = false > %> > > > > > <% > else > > rs.Close > Set rs = nothing > ' ÇöÀç ±Û Á¸ÀçÀ¯¹«È®ÀÎ ³¡ > > > ' ÇöÀç ±ÛÀÇ ¼öÁ¤ > > strSQL = "UPDATE bulletboard SET " &_ > " board_writer= '" & board_writer & "'" & "," &_ > " board_email= '" & board_email & "'" & "," &_ > " board_homepage= '" & board_homepage & "'" & "," &_ > " board_title= '" & board_title & "'" & "," &_ > " board_memo= '" & board_memo & "'" &_ > *************************************** > " board_userip= '" & board_userip & "'" &_ > " board_useros= '" & board_useros & "'" &_ > " board_html= '" & html & "'" &_ > À§ ºÎºÐÀ» ÀÔ·ÂÇÏ¸é ¿¡·¯°¡ ¹ß»ýµË´Ï´Ù.ip,os,html > *************************************** > > " WHERE board_no = " & board_no > > DbCon.Execute(strSQL) > > DbCon.Close > Set DbCon = nothing > Response.Redirect "notice_read_dis.asp?board_no=" & board_no & _ > "&board_count=" & board_count & _ > "&keyfield=" & keyfield & _ > "&keyword=" & keyword & _ > "&sortfield=" & sortfield & _ > "&sortword=" & sortword > > end if > %> > »óÀ§ Dimº¯¿¡ °ªÀ» ³Ö¾îÁ־ °°Àº ¿¡·¯°Åµç¿©. > Âü ÀÌ°ÍÀ» µÎ°³ÀÇ Ã¼Å©¹Ú½º·Î ÅÂ±× Á¦ÇÑ°ú Àû¿ëÀ¸·Î ÇÒ¸é ¾îÄÉÇؾßÇÒ±î¿ä Áö±ÝÀÇ ¹æ¹ýÀÌ Á» ¹®Á¦°¡ ÀÖ´Â°Í °°¾Æ¼¸® ¸»ÀÌÁ®. -----------------------------------------------------------
Ãß°¡ÇÒ À̹ÌÁö¸¦ ÀÔ·ÂÇϼ¼¿ä.
À̹ÌÁö 1
À̹ÌÁö¼³¸í 1
Ãß°¡ÇÒ ÀڷḦ ÀÔ·ÂÇϼ¼¿ä.
ÀÚ·á 1
ÀÚ·á¼³¸í 1
Ãß°¡ÇÒ ½ÎÀÌÆ®¸¦ ÀÔ·ÂÇϼ¼¿ä.
°ü·Ã½ÎÀÌÆ® 1
½ÎÀÌÆ®¼³¸í 1
Password
*