´ç½Å¿¡°Ô·Î ¶°³ª´Â ²Þ¼Ó¿©Çà - ²Þ¼Ó³ª¶ó(http://www.inyourdream.net) ÀÔ±¹Çϱâ | ¿µÁÖ±Ç ½Åû
  • ¸öºÎ¸² °ñ¶ó°ñ¶ó
  • ¼Ò±Ù¼Ò±Ù
  • µµ¶õµµ¶õ
  • ³«¼­¸¶´ç
  • Âø°¢ÇѾÆÀÌ
  • ¼ýÀÚ¸ÂÃß±â
  • ¼Ò¿øºô±â
  • ÈçÀû³²±â±â
  • ²Þ¼Ó¿©Çà
  • Ä£±¸Áý ³î·¯°¡±â
  • ¸ðµÎµå¸²´ÔÀÇ È¨
  • î¤éÞ´ÔÀÇ È¨
  • Çö¿ì´ÔÀÇ È¨
  • º°¾ÆÇØ´ÔÀÇ È¨
  • ÇÞ»ì´ÔÀÇ È¨
  • À̳ª´Ï´ÔÀÇ È¨
  • À¯¸®¾Ë´ÔÀÇ È¨
  • ³È³ÈÀÌ´ÔÀÇ È¨
  • ²ÀÁö´ÔÀÇ È¨
  • ´ë¼º´ÔÀÇ È¨
  • 俵ÀÌ / 2000-10-21 / ¿ÀÈÄ 7:10:25 / 203.255.3.190
    Á¶È¸¼ö : 136
    [Áú¹®] µ¥ÀÌÅÍ º£À̽º¿¡ Æнº¿öµå°¡ ¾Èµé¾î°¡¿ä
    > ´Ù Àßµé¾î°¡´Âµ¥ Æнº¿öµå¸¸ ¾Èµé¾î°¡³×¿ä
    > ¾Ë·ÁÁÖ¼¼¿ä. ¿¡·¯´Â ¾ø´Âµ¥ Æнº¿öµå¸¸ ¹®Á¦ÀÔ´Ï´Ù
    >
    > <%
    > ' »ç¿ëÀÚ Á¤º¸ ÀÔ·Â
    > USER_ID = Request("USER_ID")
    > USER_PASSWORD = Request("USER_PASSWORD")
    > USER_NAME = Request("USER_NAME")
    > USER_NAME1 = Request("USER_NAME1")
    > COUNTRY = Request("COUNTRY")
    > TEL = Request("TEL")
    > FAX = Request("FAX")
    > EMAIL = Request("EMAIL")
    > ADDRESS = Request("ADDRESS")
    >
    >
    > '½Ã¸®¾ó ³Ñ¹ö »ý¼º¿£Áø ¼Ò½º----------------------------------
    > '**************************************************************************
    >
    > set DBconnection = server.CreateObject("ADODB.connection")
    > DBconnection.Open ("DSN=sql;UID=sa;PWD=")
    >
    > 'À§ÀÇ ADOdbÄ¿³Ø¼Ç °³Ã¼°¡ µé¾î°¡¾ßÁö µ¥ÀÌŸº£À̽º¿Í ¿¬°á
    > '#########################################################################
    >
    >
    > sql = "select top 1 num from member order by num desc"
    >
    > 'Ä¿³Ø¼Ç ÀÎÀÚ¸¦ ¹Ù²ãÁáÀ½ DBconnection
    > set aa = DBconnection.execute (sql)
    >
    > if aa.EOF then
    > num_1 = 1 + 1 '³Ñ¹ö°¡ Çϳªµµ ¾øÀ¸¸é
    > else
    > num_1 = 1 + aa("num") '³Ñ¹ö°¡ ÀÖÀ¸¸é °¡ÀåÅ«¼öÀÇ +1 : º¸¶ó³Ý Àü¿ë
    > end if
    >
    > 'else
    > ' num_1 = 1 + aa("no") '³Ñ¹ö°¡ ÀÖÀ¸¸é °¡ÀåÅ«¼öÀÇ +1 Áö¿ìÁö ¸»°Í
    >
    >
    > num = len(num_1) '³Ñ¹öÀÇ ±æÀÌ
    >
    > '#############################################################################
    > 'À̺κÐÀÌ À߸ø µÇ¾ú´Ù¸é...¾Æ·¡ ºÎºÐÀÇ no ¶ó´Â Çʵ尡 ¾ø¾î¼­ no ´ë½Å¿¡ numÀ» ³Ö¾úÀ¾´Ï´Ù.
    >
    > 'response.write num_1 & "/" & aa("no")& "|"
    > 'À§ÀÇ °ÍÀÌ ¾Æ´Ï¶ó...
    > 'response.write num_1 & "/" & aa("num_1")& "|" 'À̺κп¡·¯³­´Ù
    > 'ÀÌ°É·Î ¹Ù²î¾î¾ß °ÚÁÒ..,.
    > '###########################################################################
    >
    > totalnum = 13 - num '13ÀÚ¿¡¼­ »©±â ³Ñ¹öÀÇ ±æÀÌ
    >
    > number = 1
    >
    > Result = left("0000006000000" & CStr(Number), totalnum) '13ÀÚ¸®¼ýÀÚ¿¡¼­ ³²Àº ¼ö ¿À¸¥ÂʺÎÅÍ ÀÚ¸£±â
    >
    >
    >
    >
    > jumin = Result & num_1 '¿À¸¥ÂʺÎÅÍ ÀÚ¸¥¼ö ¿¡ ¼øÂ÷³Ñ¹ö ºÙÀ̱â
    >
    > response.write jumin & "
    "
    >
    > '¿©±â±îÁö-------------------------------------------------
    >
    >
    >
    > ' ÀÛÀº µû¿ÈÇ¥ ÀúÀåÀ» À§ÇÑ Replace »ç¿ë
    > INTRO = Request("INTRO")
    > INTRO = Replace(INTRO,"'","''")
    >
    >
    > ' µ¥ÀÌÅͺ£À̽º ¿¬°á ¼³Á¤
    >
    > Set dbCon = Server.CreateObject("ADODB.Connection")
    > dbCon.Open ("DSN=sql;UID=sa;PWD=;")
    > ' ¾ÆÀ̵ð Áߺ¹ ¿©ºÎ °Ë»ç
    >
    >
    > sqlstr = "select Count(Num) from member where USER_ID ='" & USER_ID & "'"
    >
    > set Rs = dbCon.execute(sqlstr)
    >
    > if Rs(0) = 0 then
    >
    >
    > ' Áߺ¹µÇ´Â ¾ÆÀ̵𰡠¾øÀ» °æ¿ì Å×ÀÌºí¿¡ ȸ¿øÁ¤º¸ ÀúÀå
    > sqlstr = "INSERT INTO member(USER_ID, USER_PASSWORD, USER_NAME,USER_NAME1,COUNTRY,TEL,FAX, EMAIL,ADDRESS,INTRO,REGISTER,JUMIN)"
    > sqlstr = sqlstr & " VALUES ('" & USER_ID & "','" & USER_PASSWORD & "','" & USER_NAME & "','" & USER_NAME1 & "','" & COUNTRY & "','" & TEL &"','" & FAX & "','" &EMAIL & "','" & ADDRESS & "','" & INTRO & "',getdate(),'" & JUMIN &"')"
    > Set MemberInsert = dbCon.execute(sqlstr)
    > %>
    >
    >
    >
    >
    > ¡¡¡¡ <% else ' Áߺ¹µÇ´Â ¾ÆÀ̵𰡠ÀÖ´Â °æ¿ì Áߺ¹ ¸Þ½ÃÁö Ãâ·Â %>
    > ¡¡¡¡
    >
    > ¡¡¡¡¡¡<%end if%>
    >
    >
    > boranet
    >
    >
    >
    >
    >
    >
    > <%time1 = date() & " " &hour(now) & ":" & minute(now) & ":" & second(now)%>

    > <%'·ÎµòÀÌ ¼öÁ¤ SQL ·Î ³¯Â¥ ¸¸µå´Â¹ý...
    > Que = "select convert(varchar(24), getdate(), 113)"
    > Set Rs = DBconnection.Execute(QUE)
    > time2 = Rs(0)
    > 'reg1 & reg2
    > %>
    >
    >

    >
    >
    >
    >
    >
    >
    >
    >
    >
    >

    >
    >
    >
    >
    >
    >
    >
    >
    >

    >

     


    >
    >

     


    >

    >
    >
    >
    >
    >
    >

    >

    >


    >

    ÀÇ
    > ȸ¿øÀÌ µÇ½Å°ÍÀ»


    >

    ÃàÇϵ帳´Ï´Ù.


    >

    >

    >
    >
    >
    >
    >
    >
    >
    >
    >
    >
    >
    -----------------------------------------------------------

    USER_PASSWORD = Request("USER_PASSWORD")

    À̺κп¡¼­ Æнº¿öµå°¡ Á¦´ë·Î ³Ñ¾î ¿À´ÂÁö üũÇØ º¸½Ã±â ¹Ù¶ø´Ï´Ù.

    ±×·³...

    Byte * 200 Byte À̳»·Î ÀÔ·ÂÇϼ¼¿ä À̸§ : Æнº¿öµå :