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

[µo°Ý] Ãö©ó¢þ¢ê¢û±Ò¥Î£A¢ô¢û¢õÀɮ׮榡°ÝÃD¡H

[µo°Ý] Ãö©ó¢þ¢ê¢û±Ò¥Î£A¢ô¢û¢õÀɮ׮榡°ÝÃD¡H

¦U¦ì¹Ù¦ñ¦n
¥Ø«e¥i¥H¨Ï¥Î¢þ¢ê¢ûª½±µ±Ò¥Î£A¢ô¢ûÀɮ׮榡¨ÃÁ×¹L¥¨¶°¦w¥þ©Ê
¦p¨Ï¥Î VBSÀɱҥÎEXCEL¤¤ªº¥¨¶°

¦ý¨Ï¥Î¢þ¢ê¢ûµLªkª½±µ±Ò¥Î£A¢ô¢û¢õÀɮ׮榡¡D¡D¡D«h¥X²{°ÝÃD
½Ð¦U¦ì°ª¤â¡D¦³¾÷·|¯à°µ¬Ý¬Ý¡D¡D¡D»P¸Ñ´b
·P¿E¤£ºÉ¡D¡D¡DÁÂÁÂ

¦^´_ 1# HUNGCHILIN
¤j¤j½Ð´ú¸Õ¬Ý¬Ý¡I
¨Ï¥Î VBSÀɱҥÎEXCEL¤¤ªº¥¨¶°.rar (19 KB)

TOP

¥»©«³Ì«á¥Ñ HUNGCHILIN ©ó 2012-6-20 18:31 ½s¿è
¦^´_  HUNGCHILIN
¤j¤j½Ð´ú¸Õ¬Ý¬Ý¡I
c_c_lai µoªí©ó 2012-6-20 07:30


ÁÂÁÂc_c_lai ¥Sªº¨ó§U...¤p§Ì¦b³o¤@¬q½T¹ê¨«°¾¤F...¶¤£¥X¨Ó

¥H«e¸gÅç»P¸ÕÅç¦b·sª©¤U¤£¤@©w¥¿½T
¦p¤U¥H«e°µªº¸ÕÅç
¨BÆJ1.VBS¬ð¯}XLS¥¨¶°¦w¥þ©Ê¸ÕÅç
¨BÆJ2.°µ§¹«á³sÄò¤S°µ¤F 1­ÓVBS¤@¦¸¶}¦h­ÓXLSÀɸÕÅç
¨BÆJ3.°µVBS+XLS+RARÂàEXE¸ÕÅç
§¡¥i¦æXLS¦¨ªG¦pªþ¥ó autoopenexe¹êÅç.rar (55.76 KB)

¦ý¤W­zÂà¨ì£A¢ô¢û¢õÀɮ׮榡®É.¨Ï¥Î¤W­z°µ¨ì¨BÆJ3ÂàEXE´N¤£¦æ
¯u¬OÅý§Ú¶¤F¦n¤[...¤@ª½¨S·Q¹L.±q¨BÆJ1­«·s¨Ó¹L...¨S·Q¨ìµ²ªG³º¬O³o»ò®e©ö
ÁÂÁÂc_c_lai ¥Sªº¨ó§U...§_«h§ÚÁÙ§x¦b¥H«eªº¸gÅç»P·Qªk¤¤
²{¦æXLSM¦¨ªG¦pªþ¥ó aaaXLSM.rar (56.5 KB)

¦¹¬° XLS/XLSM ¨Ï¥ÎRARÂà´«¬°EXEÀÉ¡A¥Î¥H¬ð¯}EXCEL97~2010¥¨¶°¦w¥þ©Êªº¤èªk

TOP

¦^´_ 3# HUNGCHILIN
½Ð±Ð¤@­Ó§Þ³N¤Wªº°ÝÃD¡A±z¬O«ç»òÀ£¦¨ .EXE Àɪº¡A À³¸Ó¤£¬O  -> Âà´«À£ÁYÀɦ¨¦Û¸ÑÀɧa¡H
§ÚÆ[¹î³o°¦ .exe ¬O¥ý¥h©I¥s .vbs µM«á¤~¥h±Ò°Ê .xlsm ªº¡C
¦pªG¬O¤@¯ëªºÂà´«À£ÁYÀɦ¨¦Û¸ÑÀÉ¡A ¥¦¥u¬O³æ¯Â¦a¸ÑÀ£¦Ó¤w¡A¨Ã¤£·|¦Û°Ê¥h±Ò°Ê .vbs ªº¡C
Ãø¹D¬Oª½±µ¥Ñ VB ¥­¥xÂà´«¦¨ .exe ªº¡H ¦]¬°§Ú¨S¦w¸Ë VB¡A ½Ð°Ý¨º­n¦p¦ó³B²z¡H
·q½Ð«ü±Ð¡I

TOP

¥»©«³Ì«á¥Ñ HUNGCHILIN ©ó 2012-6-21 21:41 ½s¿è

¥L´N¬O Âà´«À£ÁYÀɦ¨¦Û¸ÑÀÉexe
¦Û¸Ñ«á¥ý¥h©I¥s .vbs µM«á¤~¥h±Ò°Ê .xlsm ¡C

©Ò¥H¤~»Ý­n¦³ vbs ©Î¬O §@¬°±Ò°Êªºexe ¤~¯à¹F¨ì¥Ø¼Ð
³o­Ó·Qªk¨Ã¤£¬O§Ú·Q¥X¨Óªº
¨ãÅé§@ªk¦p³sµ²[Âà¶K] ¨Ï¥ÎRAR À£ÁYµ{¦¡¡A¥]¦íEXCELÀÉ»s§@EXE°õ¦æÀÉ¡A¬ð¯}¥¨¶°¦w¥þ©Ê
«Ü²³æ°Õ...§÷®Æ¥þ³£¦b³o¤@©«¤W.¦Û¤v¹ê»Ú´ú¤@´ú´N·|ª¾¹D§@ªk¤F.¤£·|ªá¤Ó¤[®É¶¡

TOP

¦^´_ 5# HUNGCHILIN
¤£¦n·N«ä¡A¬Ý¹M¤F©Ò¦³¤å³¹¡A¤]¸ÕµÛ¥h²£¥Í¥¦ (exe)¡A ³£¥¢±Ñ¤F¡I (·Æ¹«ÂI¦b aaaXLSM.vbs ¤W¡A«ö·Æ¹«¥kÁä¼u¥X¤pµøµ¡¡A
¿ï¾Ü"²K¥[¨ìÀ£ÁY¤å¥ó"¡A   ´z¿ï "«Ø¥ß¦Û§Ú¸ÑÀ£ÁYÀÉ"¡AµM«á¿ï¾Ü "¶i¶¥³]©w" ->  "¦Û¸ÑÀɿﶵ(X)" -> "¤å¦r¤Î¹Ï¥Ü" ???)
§Ú«üªº¬O aaaXLSM.rar ùØÀYªº aaaXLSM.exe¡C
¯à§_´N¥H²{¦³ªº aaaXLSM.vbs¡BaaaXLSM.xlsm¡A¥¦²£¥Íªº aaaXLSM.exe ªºµ{§Ç«ü¾É¤@¤U¡H

TOP

¦^´_  HUNGCHILIN
¤£¦n·N«ä¡A¬Ý¹M¤F©Ò¦³¤å³¹¡A¤]¸ÕµÛ¥h²£¥Í¥¦ (exe)¡A ³£¥¢±Ñ¤F¡I (·Æ¹«ÂI¦b aaaXLSM.vbs ...
c_c_lai µoªí©ó 2012-6-22 08:26


¨ãÅé³Ìªk½Ð¬Ý³o¤@½g
§Ú§â³Ì­«­nºô¤W§@ªÌ¤£·Q»¡ÂèBªº²Ó¸`©ñ¦b³o¸Ì
½Ð·Ó¹Ï°µ
©Ò¦³§÷®Æ¬° XLS+VBS ¨â­ÓÀÉ+RARµ{¦¡...
VBSXLSRARTOEXE»¡©ú.rar (160.45 KB)

TOP

¥»©«³Ì«á¥Ñ c_c_lai ©ó 2012-6-23 07:19 ½s¿è

¦^´_ 7# HUNGCHILIN
­ì¨Ó¦p¦¹¡I §Ú¤Ö¤F"¸ÑÀ£«á¤§°õ¦æ"¨BÆJ¡AÃø©Ç¨C¦¸§¡¥u¦³¸ÑÀ£¦ÓµL°õ¦æ¤§°Ê§@¡C
¸U¤ÀÁÂÁ±zªº«ü¾É¡I
ªþ¤W¦¨ªG¡I
ªÑ²¼¹Ïªí »P©ÔÅQ.vbs¡G
  1. Dim oExcel,fn
  2. fn=Replace(WScript.ScriptFullName,Right(WScript.ScriptFullName,4),".xls")
  3. Set oExcel = CreateObject("Excel.Application")
  4. oExcel.Visible=True
  5. oExcel.Workbooks.Open fn
  6. Set oExcel = Nothing
  7. Wscript.Quit
½Æ»s¥N½X
ªÑ²¼¹Ïªí»P©ÔÅQ.rar (203.24 KB)

TOP

¬ã¨s¤¤ thanks

TOP

        ÀR«ä¦Û¦b : §Ú­Ì³Ì¤jªº¼Ä¤H¤£¬O§O¤H¡D¥i¯à¬O¦Û¤v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD