Запуск VBScript через CScript

Часто необходимо, чтобы VB-скрипт выполнялся не через wscript.exe, а при помощи cscript.exe. Можно конечно в качестве стандартного сервера сценариев указать cscript, но это не удобно, т.к. не все наши скрипты требуют такого способа выполнения. Я рекомендую в начало скрипта вставить код проверки и в случае чего перезапустить скрипт через cscript:

Dim WshShell
If StrComp(Right(WScript.FullName, 11), “wscript.exe”, vbTextCompare) = 0 Then
Set WshShell = CreateObject(”WScript.Shell”)
WshShell.Run “cscript.exe ” & Chr(34) & WScript.ScriptFullName & Chr(34)
WScript.Quit
End If
WScript.Interactive = True