Dim lngI, objArgs
Set objArgs = WScript.Arguments 'Создаём объект WshArguments
For lngI = 0 To objArgs.Count - 1
WScript.Echo (objArgs(lngI)) 'Выводим значение lngI-го параметра
Next
А как прочитать аргументы, если код VBS выполняется из HTML? Команда запуска типа: run.hta /arg1
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший