コメント
スカイプＢＡＮ対策
(30分)
おしえてやるからちょっとこっちこい
+------------------------------------------------------
４．０対応 VISTA対応 64BIT対応
通常
Option Explicit
Dim objWshShell
Set objWshShell = WScript.CreateObject("WScript.Shell")
objWshShell.Run """C:\Program Files\Skype\Phone\Skype.exe"" /secondary"
Set objWshShell = Nothing
６４ＢＩＴ用
Option Explicit
Dim objWshShell
Set objWshShell = WScript.CreateObject("WScript.Shell")
objWshShell.Run """C:\Program Files (x86)\Skype\Phone\Skype.exe"" /secondary"
Set objWshShell = Nothing
親作品・子作品を見る+------------------------------------------------------
４．０対応 VISTA対応 64BIT対応
通常
Option Explicit
Dim objWshShell
Set objWshShell = WScript.CreateObject("WScript.Shell")
objWshShell.Run """C:\Program Files\Skype\Phone\Skype.exe"" /secondary"
Set objWshShell = Nothing
６４ＢＩＴ用
Option Explicit
Dim objWshShell
Set objWshShell = WScript.CreateObject("WScript.Shell")
objWshShell.Run """C:\Program Files (x86)\Skype\Phone\Skype.exe"" /secondary"
Set objWshShell = Nothing
