¸÷λºÃ£¬ÎÒÏÖÔÚÒªÓÃһ̨¼ÆËã»úͬʱ¼à¿Ø32̨ÐźŽÓÊÕ»ú£¨ÓõÄÊÇMOXA¿¨À©Õ¹32¸ö´®¿Ú£©¡£Ïȵ÷ÊÔ8̨¡£ÏÖÔÚµÄÎÊÌâÊÇ£¬ÎÒÓÐÁ½¸öÃüÁîÐèÒªÏò½ÓÊÕ»ú·¢ËÍ£¬Ò»¸öÊǼà¿Ø½ÓÊÕ»úÉϵÄÐźÅËø¶¨×´Ì¬£¬Ò»¸öÊÇ»ñÈ¡½ÓÊÕ»úÄ¿Ç°µÄ¸÷À๤×÷״̬¡£ÐźÅËø¶¨×´Ì¬ÒѾµ÷ºÃÁË£¬µ«ÎҾͲ»ÖªµÀÔõô¼ÓÈëµÚ¶þ¸öÃüÁîÁË¡£ÎÒ·¢µÚÒ»¸öÃüÁîµÄ·½Ê½ÊÇͨ¹ýÒ»¸öʱ¼ä¿Ø¼þÿ¸ô500ºÁÃë¾Íͬʱͨ¹ý8¸öMSCOMM¿Ø¼þÏò8̨½ÓÊÕ»ú£¨Òò´ËÎÒÓÃÁË8¸ö´®¿Ú£©·¢Ë͵ÚÒ»¸öÃüÁȻºó¼ÆËã»úÊÕµ½½ÓÊÕ»ú·µ»ØµÄ×Ö·û´®£¬ÔÚ¸Ã×Ö·û´®ÖвéÕÒ²¢ÅжÏÐźÅÊÇ·ñËø¶¨¡£µ«µÚ¶þ¸öÃüÁî¾Í¸ã²»¶®¸ÃÔõô°ìÁË£¬ÎÒ³¢ÊÔÁËÒ»ÏÂÓÖÌí¼ÓÁ˵Ú9¸öMSCOMM¿Ø¼þ£¬Ïëͨ¹ý¸Ã¿Ø¼þÏòij¸ö£¨»òÕß8¸öÈ«²¿£©´®¿Ú·¢µÚ¶þ¸öÃüÁµ«¾Í²»ÐÐÁË£¬ÒªÃ´Ìáʾ¶Ë¿Úû´ò¿ª£¬¸ÄÁËÒ»ÏÂÓÖÌáʾ´®¿ÚÒѾÔÚʹÓã¨ÒòΪÔÚ·¢µÚ¶þ¸öÃüÁîµÄͬʱʱ¼ä¿Ø¼þÔÚ²»Í£µØÏò¸Ã´®¿Ú·¢µÚÒ»¸öÃüÁ£¬ÎÒÒ²Ïë¹ýÔÚ·¢µÚ¶þ¸öÃüÁîʱ°ÑµÚÒ»¸öÃüÁî·¢Ë͹رÕÁË£¬µ«Ò²Ã»·¨£¬ÒòΪʱ¼ä¿Ø¼þÔÚÄÄÀï¿ØÖÆ×Å£¬¶øÇÒÈç¹ûÎҹرÕÁ˵ÚÒ»¸öÃüÁÄÇô¼à¿ØµÄÄ¿µÄ¾ÍʧЧÁË¡£ÏëÇë½Ì´ó¼ÒÕâÖÖÎÊÌâ¸ÃÔõô½â¾ö¡£
ÎÒÔÙ˵¼òµ¥µã¾ÍÊÇ£¬µÚÒ»¸öÃüÁî±ØÐëÒÔÒ»¶¨Ê±¼ä¶ÎÑ»·²»Í£µØÏòN̨»úÆ÷·¢ËÍ£¨Ò²¾ÍÊÇÏòN¸ö´®¿Ú·¢ËÍ£©£¬ÒÔ´ïµ½¼à¿Ø»úÆ÷ÐźÅËø¶¨µÄÄ¿µÄ£¬¶øµÚ¶þ¸öÃüÁîÊÇÑ¡ÖÐij̨»úÆ÷£¨Õą̂»úÆ÷°üÀ¨ÔÚÉÏÃæµÄN̨»úÆ÷ÖУ©ºóÒªÏÔʾµÄ¹¤×÷״̬¡£
ÒÔÏÂÊDz¿·Ö³ÌÐò
Private Sub Form_Load()
Dim a2, a3, a4, a5, a6, a7, a8 As Long
Dim b2, b3, b4, b5, b6, b7, b8 As Long
Dim c2, c3, c4, c5, c6, c7, c8 As Long
Dim d2, d3, d4, d5, d6, d7, d8 As Long
Dim e2, e3, e4, e5, e6, e7, e8 As Long
Dim f2, f3, f4, f5, f6, f7, f8 As Long
Dim g2, g3, g4, g5, g6, g7,
ÔÚÏÂÊÇvbµÄÐÂÊÖ£¬Ïëд¶Î³ÌÐò£¬ÔÚvbÖУ¬Ê¹ÓÃwscriptµ÷ÓÃһЩÍⲿµÄÃüÁµ«ÊdzÌÐòÖ´ÐÐÒ»Ö±ÓдíÎó£¬Çë¸÷λ¸ßÊÖ°ïæ½â´ðÏ£¬Ð»Ð»¡£
´úÂëÈçÏ£º
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......