´ç½Å¿¡°Ô·Î ¶°³ª´Â ²Þ¼Ó¿©Çà - ²Þ¼Ó³ª¶ó(http://www.inyourdream.net)
ID¿Í Password¸¦ ÀÔ·ÂÇϼ¼¿ä.
ÀÔ±¹Çϱâ
|
¿µÁÖ±Ç ½Åû
¸öºÎ¸² °ñ¶ó°ñ¶ó
¼Ò±Ù¼Ò±Ù
µµ¶õµµ¶õ
³«¼¸¶´ç
Âø°¢ÇѾÆÀÌ
¼ýÀÚ¸ÂÃß±â
¼Ò¿øºô±â
ÈçÀû³²±â±â
²Þ¼Ó¿©Çà
Ä£±¸Áý ³î·¯°¡±â
¸ðµÎµå¸²´ÔÀÇ È¨
î¤éÞ´ÔÀÇ È¨
Çö¿ì´ÔÀÇ È¨
º°¾ÆÇØ´ÔÀÇ È¨
ÇÞ»ì´ÔÀÇ È¨
À̳ª´Ï´ÔÀÇ È¨
À¯¸®¾Ë´ÔÀÇ È¨
³È³ÈÀÌ´ÔÀÇ È¨
²ÀÁö´ÔÀÇ È¨
´ë¼º´ÔÀÇ È¨
µî·ÏÇϽǶ§´Â ÇʼöÇ׸ñÀ» ¸ðµÎ ÀÔ·ÂÇÏ¼Å¾ß ÇÕ´Ï´Ù.
À̸§
*
HTML »ç¿ë
Á¦¸ñ
*
¼±ÅÃ
ÀÚÀÛ
»ç¶û
À¯¸Ó
ÀÚÀ¯
̵̧
¾Ë¸²
Áú¹®
±âŸ
³»¿ë
*
> > > > <% > > F_ID2 = Trim(request("F_Stc_ID2")) > > F_Passwd1 = Trim(request("F_Stc_Passwd1")) > > > > Set db = Server.CreateObject("ADODB.Connection") > > db.Open strConn > > > > Set rs = Server.CreateObject("ADODB.RecordSet") > > > > sql1 = "select * from MBMPS10T" > > sql1 = sql1 & " where IDNO='" & F_ID2 & "'" > > > > rs.Open sql1,db > > > > if (rs.EOF or rs.BOF) then > > > > SQL2 = "INSERT INTO MBMPS10T (ITEMNO,SPASSWORD) VALUES " > > SQL2 = SQL2 & "('" & F_ID2 & "'" > > SQL2 = SQL2 & ",'" & F_Passwd1 & "')" > > > > db.Execute(SQL2) > > > > else > > > > SQL2 = "UPDATE MBMPS10T SET SPASSWORD = '"& F_Passwd1 &"'" > > SQL2 = SQL2 & " WHERE IDNO = '"& F_ID2 &"'" > > > > db.Execute(SQL2) > > %> > > > > ³»¿ë.... ¤Ñ¤Ñ; > > > > <% > > end if > > > > rs.Close > > db.Close > > Set rs = Nothing > > Set db = Nothing > > %> > > > > ´Ù °íÃƴµð... ¤Ñ¤Ñ;;; Á©·Î ½Ã·¯ÇÏ´Â 500¿À·ù°¡... > > > > ¤Ñ¤Ñ;;;; ¸Ó°¡ Ʋ¸°°ÇÁö... ¤Ñ¤Ña > > > > ¸øã°Ú¾î¿ä... ¤Ñ_¤Ì > > > > ¸¾Àº ±ÞÇÏ°í... µ¹°Ú³×¿ä... ¤Ì_¤Ì > ----------------------------------------------------------- > > > ÀÌ·¸°Ô Äڵ带 ¹Ù²ÛÈÄ SQL¹®ÀåµéÀ» Ãâ·Â½ÃÄÑ Á¦´ë·Î Äõ¸®°¡ Çü¼ºÀÌ µÇ´ÂÁö È®ÀÎ ÇÏ¿© º¸¼¼¿ä.. > > > > <% > Response.Buffer = Flase > %> > > > <% > F_ID2 = Trim(request("F_Stc_ID2")) > F_Passwd1 = Trim(request("F_Stc_Passwd1")) > > Set db = Server.CreateObject("ADODB.Connection") > db.Open strConn > > Set rs = Server.CreateObject("ADODB.RecordSet") > > sql1 = "select * from MBMPS10T" > sql1 = sql1 & " where IDNO='" & F_ID2 & "'" > > Response.Write sql1 &"
" > > rs.Open sql1,db > > if (rs.EOF or rs.BOF) then > > SQL2 = "INSERT INTO MBMPS10T (ITEMNO,SPASSWORD) VALUES " > SQL2 = SQL2 & "('" & F_ID2 & "'" > SQL2 = SQL2 & ",'" & F_Passwd1 & "')" > > Response.Write SQL2 &"
" > > db.Execute(SQL2) > > else > > SQL2 = "UPDATE MBMPS10T SET SPASSWORD = '"& F_Passwd1 &"'" > SQL2 = SQL2 & " WHERE IDNO = '"& F_ID2 &"'" > > Response.Write SQL2 &"
" > > db.Execute(SQL2) > %> > > ³»¿ë.... ¤Ñ¤Ñ; > > <% > end if > > rs.Close > db.Close > Set rs = Nothing > Set db = Nothing > %> > -----------------------------------------------------------
Ãß°¡ÇÒ À̹ÌÁö¸¦ ÀÔ·ÂÇϼ¼¿ä.
À̹ÌÁö 1
À̹ÌÁö¼³¸í 1
Ãß°¡ÇÒ ÀڷḦ ÀÔ·ÂÇϼ¼¿ä.
ÀÚ·á 1
ÀÚ·á¼³¸í 1
Ãß°¡ÇÒ ½ÎÀÌÆ®¸¦ ÀÔ·ÂÇϼ¼¿ä.
°ü·Ã½ÎÀÌÆ® 1
½ÎÀÌÆ®¼³¸í 1
Password
*