´ç½Å¿¡°Ô·Î ¶°³ª´Â ²Þ¼Ó¿©Çà - ²Þ¼Ó³ª¶ó(http://www.inyourdream.net) ÀÔ±¹Çϱâ | ¿µÁÖ±Ç ½Åû
  • ¸öºÎ¸² °ñ¶ó°ñ¶ó
  • ¼Ò±Ù¼Ò±Ù
  • µµ¶õµµ¶õ
  • ³«¼­¸¶´ç
  • Âø°¢ÇѾÆÀÌ
  • ¼ýÀÚ¸ÂÃß±â
  • ¼Ò¿øºô±â
  • ÈçÀû³²±â±â
  • ²Þ¼Ó¿©Çà
  • Ä£±¸Áý ³î·¯°¡±â
  • ¸ðµÎµå¸²´ÔÀÇ È¨
  • î¤éÞ´ÔÀÇ È¨
  • Çö¿ì´ÔÀÇ È¨
  • º°¾ÆÇØ´ÔÀÇ È¨
  • ÇÞ»ì´ÔÀÇ È¨
  • À̳ª´Ï´ÔÀÇ È¨
  • À¯¸®¾Ë´ÔÀÇ È¨
  • ³È³ÈÀÌ´ÔÀÇ È¨
  • ²ÀÁö´ÔÀÇ È¨
  • ´ë¼º´ÔÀÇ È¨
  • Á¤¼ö / 2000-08-09 / ¿ÀÈÄ 4:07:00 / 203.230.248.195
    Á¶È¸¼ö : 117
    [Áú¹®] ´Ù½Ã Á» ºÁÁÖ¼¼¿ä....
    > > loop µ¹¸®½Ç¶§..
    > > dbrec.movenext ÇØÁּ˴ÂÁö¿ä.. ´ÙÀ½·¹ÄÚµå·Î...
    >
    > À§¿¡¼­ ¸»¾¸ÇϽŠ·çÇÁ¹®¿¡¼­ÀÇ DbRec.MoveNext´Â ÀÌ¹Ì ³Ö¾î ÀÖ¾ú±¸¿ä....±×¿Í °ü·ÃÇؼ­ Áú¹®À» ÇÏ·Á±¸ ÇÕ´Ï´Ù...ÀÌ·¡ Àú·¡ ÇÏ´Ùº¸´Ï...¾Æ·¡Ã³·³ for¹® ¾È¿¡ º¯¼öÁöÁ¤À» ÇÏ¿© ·¹Äڵ带 ½áÁÖ¾î¾ß µÇ´Â °Å °°¾Æ¼­ Çغôµ¥ ¾Ï°ÍµÎ ¾È³ª¿À³×¿ä..±×·¯´Ï±î ±×Àü¿¡´Â numÀ» for¹® ¹Û¿¡¼­ ÁöÁ¤ÇÏ¿´¾ú°Åµç¿ä...±×·¡µÎ ±×¶© ¸Ç óÀ½ ·¹ÄÚµå¶óµÎ ³ª¿Ô¾ú´Âµ¥...±×·±µ¥....
    >
    > listsql="SELECT num FROM "&tb&" Where "&sqlList&" and ref= "&nref&" ORDER BY num ASC"
    >
    > DbRec.Open listsql,DbCon
    >
    > For i=1 to DbRec.EOF
    >
    > num=DbRec(0)
    > response.write(num)
    >
    > DbRec.MoveNext
    >
    > next
    >
    > DbRec.Close
    >
    > ±×¸®°í...Á¤ÀÛ ÇÊ¿äÇÑ °Ç À§Ã³·³ ÇϳªÀÇ º¯¼ö¿¡ °á°ú°ªÀ» ´ã¾Æ ...À̸¦ ¹Û¿¡¼­ ¾µ¼ö ÀÖ´Â ¹æ¹ýÀÌ ¾ø´ÂÁö...À§ °æ¿ì°¡ µÈ´Ù±¸ ÇÏ´õ¶óµÎ for¹® ¾È¿¡¼­ numº¯¼öÀÇ ÁöÁ¤ºÎÅÍ »ç¿ë±îÁö ´Ù ÇØ¾ß ÇÏ´Â °á°ú°¡ ºú¾îÁöÀݾƿä..
    >
    > Àú´Â num¿¡ ¾ò°íÀÚÇÏ´Â ¿©·¯°³ÀÇ ÀÎÀÚ¸¦ ´ã¾Ò´Ù°¡ ¹Ø¿¡¼­ ³ªÁß¿¡ ´Ù¸¥ ÆÄÀÏÀÇ ¸µÅ©ºÎºÐ¿¡¼­ ÀÎÀÚ·Î ³Ñ°ÜÁÖ·Á±¸ Çϴµ¥...¾îÂî ÇØ¾ß µÇ´ÂÁö....¾î°ÅÁö·Î¶óµµ for¹®¾È¿¡¼­ numÀÇ »ç¿ë±îÁö ÇÏ¿©¾ß¸¸ ÇÏ´Â ¹æ¹ý¹Û¿¡ ¾ø´ÂÁö ¾Ë°í ½Í¾î¿ä..
    >
    >
    > Áö±Ý º¸´Ï ¾î°ÅÁö·Î Èûµé°Í °°¾Æ¿ä...¹Ù·Î¹Ø¿¡¼­ ·¹ÄÚµå¼ÂÀ» ¶Ç ¿­¾î°¡Áö±¸ ·çÇÁ¸¦ µ¹¸®¸é¼­ ´ÙÀ½ÆÄÀÏ·Î ¸µÅ©±îÁö ÇÏ°í Àְŵç¿ä...±×·¡¼­ À§¿¡¼­ Close·Î ´Ý¾ÆÁÖ°í Çß´ø°Çµ¥....¼¿·ºÆ®ÀÇ Á¶°ÇµÎ ´Ù¸£±¸Çؼ­ °°ÀÌ ¾µ¼öµÎ ¾ø±¸...±×·¡µÎ µÑ´Ù ·çÇÁ¸¦ µ¹·Á¼­ ´ÙÀ½ÆÄÀÏÀÇ ÀÎÀÚ·Î µé¾î°¡¾ß Çϰŵç¿ä..
    >
    >
    >
    -----------------------------------------------------------

    Á¦°¡ ¸¸µé¾ú´ø °Ë»ö¼­ºñ½º ºÎºÐÀÇ Äڵ带 ÂüÁ¶ÇÏ¿© º¾´Ï´Ù..
    ½Ã°£ÀÌ Âѱâ´Â °ü°è·Î ´ÔÀÇ DB¿¡ ¸ÂÃç Äõ¸®¹®À» ÀÛ¼ºÇÏÁö ¸øÇÏ¿´½À´Ï´Ù...

    ±×¸®°í Áú¹®ÀÇ ¿äÁö¸¦ ÀÚ¼¼È÷ ÀÌÇظ¦ ÇÏÁö ¸øÇÏ°Ú±º¿ä..
    Á¦°¡ ³»°øÀÌ ºÎÁ·Çؼ­ Àΰ¡...??

    ±×³É ÂüÁ¶¸¸Çϼ¼¿ä...
    ¹è¿­À» ÀÌ¿ëÇÏ¿© ·¹ÄÚµå¼Â°ªÀ» °è¼Ó °¡Áö°í ÀÖÀ» ¼ö Àְڳ׿ä...

    ±×´ÙÁö ÁÁÀº ÄÚµå´Â ¾Æ´ÏÁö¸¸ µµ¿ò µÇ±æ ¹Ù¶ø´Ï´Ù.....


    """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
    Set Rs=Server.CreateObject("ADODB.Recordset")
    Rs.CursorType=1
    sql3="select * from Process Where Terminal='"&Terminal&"' and Year='"&Year1&"' ORDER BY Month ASC"
    Rs.Open sql3, DbCon


    if Rs.eof then
    Response.write "ÇØ´çµ¥ÀÌÅÍ°¡ ¾ø½À´Ï´Ù.."
    else
    Count = Rs.RecordCount 'Àüü ·¹ÄÚµå ¼ö °è»ê


    Dim A_Month(12) 'A--> Array 12=>1~12¿ù
    Dim A_Up(12)
    Dim A_Down(12)
    Dim A_Ts(12)
    Dim A_Total(12)

    For i=1 to Count

    if Rs.EOF then
    exit for
    end if

    A_Month(i)=Int(Rs("Month"))
    A_Up(i)=Int(Rs("Up"))
    A_Down(i)=Rs("Down")
    A_Ts(i)=Rs("Ts")
    A_Total(i)=A_Up(i)+A_Down(i)+A_Ts(i)

    Rs.MoveNext
    Next



    """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""


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