ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ¦p¦ó ´¡¤J ¸ê®Æ§¨¤¤§t¤l¸ê®Æ§¨ªº ¹Ï¤ù

¦^´_ 19# GBKEE
³o¦¸¥i¥HÅã¥Ü¥X¹Ï¤ù¤F
·PÁÂGBKEE¤j¤jªºÀ°§U

TOP

¦^´_ 26# GBKEE
¦A°Ý¤@­Ó°ÝÃD....
®É¶¡ÂIªº°ÝÃD¤w¸Ñ¨M
¦ý¬O¤S¹J¨ì¤@­Ó°ÝÃD¤F
¥Ø«eªº¥¨¶°¥u¯à§ì¨ì«ü©w®É¶¡ÂI¤U­±ªº¹Ï¤ù
¦pªG¸Ì­±ÁÙ¦³¤l¸ê®Æ§¨
¨º«ç»ò¿ì©O

TOP

¦^´_ 28# GBKEE
§Ú¬ÝÀ´¤F~
·PÁÂ~
¸ò4#ªºµ{¦¡½X®t¤F¤@ÂI
Private Sub ¤l¸ê®Æ§¨(TheFolder)
    Dim fs As Object, f As Object
    Set fs = CreateObject("Scripting.FileSystemObject").GetFolder(TheFolder)
=========================================================
    Private Sub ¤l¸ê®Æ§¨(¸ê®Æ§¨ As Variant)
        Dim fs  As Object, f As Variant
        Set fs = CreateObject("Scripting.FileSystemObject").GetFolder(¸ê®Æ§¨)
¥i¥H½Ð°Ý¤W­±¸ò¤U­±ªº®t§O¶Ü

TOP

        ÀR«ä¦Û¦b : °µ¸Ó°µªº¨Æ¬O´¼¼z¡A°µ¤£¸Ó°µªº¨Æ¬O·Mè¡C
ªð¦^¦Cªí ¤W¤@¥DÃD