VBÖ´ÐÐRARÀïÃæµÄÎļþ
VBÖ´ÐÐRARÀïÃæµÄÎļþ£¿ ÊÂÏÈÒѾ֪µÀÁËrarÖÐÓÐʲôÎļþµÄÇé¿öÏ£¬¾ÍÊÇ˵Èç¹ûÎÒÓÃÒ»¸ö°´Å¥£¬Ö±½Ó´ò¿ª»òÕßÖ¸ÏòÕâ¸örarÀïÃæµÄÎļþ£¬rarÊÇ×Ô¼º¼ÓÃܵ쬲¢ÇÒ²»ÈÃËüµ¯³ö½âѹËõµÄ´°¿Ú¡£ ´úÂëÔõôд°¡£¿
ÏȽâѹËõ£¬¿ÉÒÔµ÷ÓÿØÖÆÌ¨°æ±¾µÄRAR£¬»òÕßʹÓÃunrar.dll ²¹³äһϣ¬¾ÍÊÇ˵Èç¹ûÎÒ´ò°üÁËÒ»¸öÒôÀÖÎļþ1.mp3 ,µ±µãÏÂÕâ¸ö°´Å¥µÄʱºò£¬ÊÇÖ±½ÓÓÃϵͳµÄ¹ØÁªÎļþ´ò¿ªÕâ¸öÎļþ£¬²¢²»ÊǽâѹËõŶ ҪʹÓÃѹËõ°üÖеÄÎļþ£¬±ØÈ»¾ÍÒª½âѹ³öÀ´¡£ Â¥Ö÷µÄÏë·¨¾Í²»ÏÖʵ¡£ ½âѹËõÖ®ºóµ÷Óà ShellExecute()ÒýÓà ҪʹÓÃѹËõ°üÖеÄÎļþ£¬±ØÈ»¾ÍÒª½âѹ³öÀ´¡£ Â¥Ö÷µÄÏë·¨¾Í²»ÏÖʵ¡£ Êǵ쬰üÀ¨rar×Ô¼ºÒªÓÃÀïÃæµÄÎļþ¶¼ÐèÒª½âѹºó²Ù×÷ ûÓÐÖ±½Ó´ò¿ªµÄ£¬Äã½çÃæÉϵãһϾʹò¿ª£¬Ò²ÊÇrarÈí¼þ½âѹµ½ÁÙʱÎļþ¼Ð´ò¿ªµÄÒýÓà ûÓÐÖ±½Ó´ò¿ªµÄ£¬Äã½çÃæÉϵãһϾʹò¿ª£¬Ò²ÊÇrarÈí¼þ½âѹµ½ÁÙʱÎļþ¼Ð´ò¿ªµÄ ÕâÑùÒ²Ðа¡£¬µ«ÊÇÔõôʵÏÖ°¡£¿£¿ Óà WinRAR Èí¼þÖеĿØÖÆÌ¨³ÌÐò UnRAR.exe ºÍ API À´Íê³É°É£º VB code: Shell "F:\WinRAR\UnRar.exe x -ep -o+ -inul X:\Temp\Temp.rar 1.mp3 X:\Test\", vbHide 'X:\Temp\Temp.rar ÊÇѹËõ°üµÄÍêÕû·¾¶ '1.mp3 ÊÇÒªÊͷŵÄѹËõ°üÖеÄÎļþ 'X:\Test\ ÊÇÊͷŵÄÄ¿µÄ·¾¶£¬×¢Òâ×îºó±ØÐëÓÐ\ DoEvents ShellExecute 0, "Open", "X:\Test\readme.txt&qu
Ïà¹ØÎÊ´ð£º
ÔÚvbÖÐÔõôÅжϣ¬²åÈëµ½Êý¾Ý¿âÖеÄÖµÊÇÖØ¸´µÄ£¬±¾È˲ŸսӴ¥VBÓïÑÔ£¬ÉõÊÇÓÐºÃ¶àµØ·½»¹²»¶®£¬»¹Çë¸÷λ´óÏÀÃǸø³ö´úÂ룬ллÁËѽ£¡£¡£¡ ²åÈë֮ǰselectһϰ¢¡£ »òÕßдһ¸ö×éºÏSQL²åÈëÓï¾ä£¬ÀýÈç IF not Exist( & ......
ÎÒÔÚÓÃVBдһ¸ö½«ÊÓÆµÎļþÉÏ´«µ½Ô¶³ÌÊý¾Ý¿âµÄС³ÌÐò£¬ÏÖÔÚÏëÒªÓýø¶ÈÌõÀ´ÏÔʾµ±Ç°ÉÏ´«µÄ½ø¶È£¬ÇëÎÊÒªÔõô×öÄØ£¿ÎÒÊǸöÐÂÊÖ£¬ËùÒÔÂé·³´ó¼Ò°ÑÒâ¼ûдÇå³þһЩ£¬ÓдúÂë×îºÃÀ²£¬Ð»Ð»£¡ ÒªÍêÈ«ÕýÈ·±È½ÏÀ§ÄÑ¡£ ¹À¼ÆÏ° ......
¸Õ½Ó´¥vb6.0£¬ÓÐЩÃþ²»µ½µÄ¸Ð¾õ£¬¾´Çë¸÷λ´óϺ¸øµã½¨Ò飡£¡£¡ ²»»á°É£¬ÍƼöѧϰ.NET¡£Ë³±ãÍÆ¼öʵÓôúÂëÍøÕ¾http://bingning.net/free/source/index.html¡£ Èç¹ûû»ù´¡ ¾ÍÓÃÒ×ÓïÑÔ°É ÖÐÎıà³ÌÄØ ´úÂë¶¼ÊÇÖÐÎÄ ......
Êý¾Ý¿âÃ²ËÆÒѾÁ¬½ÓÉÏÁËvb£¬£¬¿ÉÊÇΪʲôÊý¾Ý¿âÉϵÄÊý¾Ý²»ÄÜÏÔʾÔÚ¿ò±íÖÐÄ󣿣¿£¿ ¾ßÌåµÄ´úÂ룿 ÎÞÂëÎÞÕæÏ࣡ Äã°ÑÀºÇò±§ÔÚ»³À¾ÍÄÜԶͶµÃ3·Ö£¿ Âé·³¸÷λ´óϺÁ˰¡¡£¡£¡£ Private Sub Comm1_Click() & ......