´ç½Å¿¡°Ô·Î ¶°³ª´Â ²Þ¼Ó¿©Çà - ²Þ¼Ó³ª¶ó(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
*