´ç½Å¿¡°Ô·Î ¶°³ª´Â ²Þ¼Ó¿©Çà - ²Þ¼Ó³ª¶ó(http://www.inyourdream.net) ÀÔ±¹Çϱâ | ¿µÁÖ±Ç ½Åû
  • ¸öºÎ¸² °ñ¶ó°ñ¶ó
  • ¼Ò±Ù¼Ò±Ù
  • µµ¶õµµ¶õ
  • ³«¼­¸¶´ç
  • Âø°¢ÇѾÆÀÌ
  • ¼ýÀÚ¸ÂÃß±â
  • ¼Ò¿øºô±â
  • ÈçÀû³²±â±â
  • ²Þ¼Ó¿©Çà
  • Ä£±¸Áý ³î·¯°¡±â
  • ¸ðµÎµå¸²´ÔÀÇ È¨
  • î¤éÞ´ÔÀÇ È¨
  • Çö¿ì´ÔÀÇ È¨
  • º°¾ÆÇØ´ÔÀÇ È¨
  • ÇÞ»ì´ÔÀÇ È¨
  • À̳ª´Ï´ÔÀÇ È¨
  • À¯¸®¾Ë´ÔÀÇ È¨
  • ³È³ÈÀÌ´ÔÀÇ È¨
  • ²ÀÁö´ÔÀÇ È¨
  • ´ë¼º´ÔÀÇ È¨
  • ²ÀÁö / 2001-08-23 / ¿ÀÈÄ 4:48:19 / 168.126.91.65
    Á¶È¸¼ö : 118
    [Áú¹®] ¿À³ë... ¶Ç ÅÂŬ ¤Ñ¤Ñ;;y
    > <!--#include file="../include/ConnectString.asp"-->
    > <%
    > 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
    %>

    <!--#include file="../include/ConnectString.asp"-->
    <%
    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 &"<br>"

    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 &"<br>"

    db.Execute(SQL2)

    else

    SQL2 = "UPDATE MBMPS10T SET SPASSWORD = '"& F_Passwd1 &"'"
    SQL2 = SQL2 & " WHERE IDNO = '"& F_ID2 &"'"

    Response.Write SQL2 &"<br>"

    db.Execute(SQL2)
    %>

    ³»¿ë.... ¤Ñ¤Ñ;

    <%
    end if

    rs.Close
    db.Close
    Set rs = Nothing
    Set db = Nothing
    %>
    Byte * 200 Byte À̳»·Î ÀÔ·ÂÇϼ¼¿ä À̸§ : Æнº¿öµå :