Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

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ÖÐÔõôÅжϣ¬²åÈëµ½Êý¾Ý¿âÖеÄÖµÊÇÖØ¸´µÄ£¬±¾È˲ŸսӴ¥VBÓïÑÔ£¬ÉõÊÇÓÐºÃ¶àµØ·½»¹²»¶®£¬»¹Çë¸÷λ´óÏÀÃǸø³ö´úÂ룬ллÁËѽ£¡£¡£¡
²åÈë֮ǰselectһϰ¢¡£
»òÕßдһ¸ö×éºÏSQL²åÈëÓï¾ä£¬ÀýÈç
IF not Exist(
& ......

ÔõôÓÃVB×öÔ¶³ÌÉÏ´«ÎļþʱµÄ½ø¶ÈÌõ£¿

ÎÒÔÚÓÃVBдһ¸ö½«ÊÓÆµÎļþÉÏ´«µ½Ô¶³ÌÊý¾Ý¿âµÄС³ÌÐò£¬ÏÖÔÚÏëÒªÓýø¶ÈÌõÀ´ÏÔʾµ±Ç°ÉÏ´«µÄ½ø¶È£¬ÇëÎÊÒªÔõô×öÄØ£¿ÎÒÊǸöÐÂÊÖ£¬ËùÒÔÂé·³´ó¼Ò°ÑÒâ¼ûдÇå³þһЩ£¬ÓдúÂë×îºÃÀ²£¬Ð»Ð»£¡
ÒªÍêÈ«ÕýÈ·±È½ÏÀ§ÄÑ¡£
¹À¼ÆÏ° ......

³õѧvb£¬Çë¸÷λ´óϺ¸øµã½¨Òé - .NET¼¼Êõ / VB.NET

¸Õ½Ó´¥vb6.0£¬ÓÐЩÃþ²»µ½µÄ¸Ð¾õ£¬¾´Çë¸÷λ´óϺ¸øµã½¨Ò飡£¡£¡
²»»á°É£¬ÍƼöѧϰ.NET¡£Ë³±ãÍÆ¼öʵÓôúÂëÍøÕ¾http://bingning.net/free/source/index.html¡£

Èç¹ûû»ù´¡ ¾ÍÓÃÒ×ÓïÑÔ°É ÖÐÎıà³ÌÄØ ´úÂë¶¼ÊÇÖÐÎÄ ......

ÓйØvbµÄÎÊÌâ - VB / »ù´¡Àà

Êý¾Ý¿âÃ²ËÆÒѾ­Á¬½ÓÉÏÁËvb£¬£¬¿ÉÊÇΪʲôÊý¾Ý¿âÉϵÄÊý¾Ý²»ÄÜÏÔʾÔÚ¿ò±íÖÐÄ󣿣¿£¿
¾ßÌåµÄ´úÂ룿

ÎÞÂëÎÞÕæÏ࣡

Äã°ÑÀºÇò±§ÔÚ»³À¾ÍÄÜԶͶµÃ3·Ö£¿

Âé·³¸÷λ´óϺÁ˰¡¡£¡£¡£
Private Sub Comm1_Click()
& ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ