Noomorph
24-05-2009, 12:17
Если вы хотя бы немножко знаете VBScript, то скорее всего легко справитесь с этой проблемой.
Скрипт не мой! Но он мне очень нужен рабочим.
Скрипт взят отсюда: http://msdn.microsoft.com/en-us/library/ms810604.aspx (Code Sample 2 (http://msdn.microsoft.com/en-us/library/ms810604.aspx#ntfs5_codesamp2) )
На всякий случай, скрипт прикреплен к сообщению.
Что в нем происходит:
Открывается InputBox - вводим имя исходного файла.
Открывается второй InputBox - вводим имя конечного файла.
Скрипт создает конечный файл как жесткую связь с исходным файлом (вдруг кто в танке, хотя и вряд ли: очень (!!!) грубо грубо говоря - копирует исходный файл).
Где происходит ошибка (отладку проводил на PrimalScript):
dim oHL
set oHL = CreateObject("HardLink.Object.1")
oHL.CreateNewHardLink sHardLinkName, sTargetFile
На второй строчке (в смысле, set oHL = ...) и происходит ошибка. Еще раз оговорюсь, что с VBScript я практически не знаком, но мне очень нужна ваша помощь! :blush2:
Скрипт не мой! Но он мне очень нужен рабочим.
Скрипт взят отсюда: http://msdn.microsoft.com/en-us/library/ms810604.aspx (Code Sample 2 (http://msdn.microsoft.com/en-us/library/ms810604.aspx#ntfs5_codesamp2) )
На всякий случай, скрипт прикреплен к сообщению.
Что в нем происходит:
Открывается InputBox - вводим имя исходного файла.
Открывается второй InputBox - вводим имя конечного файла.
Скрипт создает конечный файл как жесткую связь с исходным файлом (вдруг кто в танке, хотя и вряд ли: очень (!!!) грубо грубо говоря - копирует исходный файл).
Где происходит ошибка (отладку проводил на PrimalScript):
dim oHL
set oHL = CreateObject("HardLink.Object.1")
oHL.CreateNewHardLink sHardLinkName, sTargetFile
На второй строчке (в смысле, set oHL = ...) и происходит ошибка. Еще раз оговорюсь, что с VBScript я практически не знаком, но мне очень нужна ваша помощь! :blush2: