Серый форум — Как скопировать файлик под пользователем в папку "ProgramFiles"

Re: Как скопировать файлик под пользователем в папку "ProgramFiles"

null@example.com (alexii) — Mon, 22 Jul 2013 04:52:02 +0000

Qwest, не забудьте: GP — на машину, а не на пользователя. И ещё не забудьте дать права компьютерам домена на разделённый ресурс.

Re: Как скопировать файлик под пользователем в папку "ProgramFiles"

null@example.com (Qwest) — Mon, 22 Jul 2013 04:32:28 +0000

Спасиб попробую

Re: Как скопировать файлик под пользователем в папку "ProgramFiles"

null@example.com (alexii) — Mon, 22 Jul 2013 03:21:11 +0000

А что там писать?

Option Explicit

Dim strSourceFile
Dim strDestPath


If WScript.Arguments.Count = 2 Then
    With WScript.CreateObject("Scripting.FileSystemObject")
        strSourceFile = WScript.Arguments.Item(0)
        strDestPath   = .BuildPath(WScript.CreateObject("Shell.Application").NameSpace("shell:ProgramFiles").self.Path, WScript.Arguments.Item(1))
        
        If .FileExists(strSourceFile) Then
            If .FolderExists(strDestPath) Then
                .CopyFile strSourceFile, strDestPath & "\", True
            Else
                ' bla-bla-bla
            End If
        Else
            ' bla-bla-bla
        End If
    End With
Else
    ' bla-bla-bla
End If

WScript.Quit 0

В GP создаёте вызов в примерно таком виде: "<Путь к скрипту\Имя.vbs>" //b "\\Server\Share\File.txt" "My Company\My Program", где «\\Server\Share\File.txt» — путь к исходному файлу, «My Company\My Program» частичный путь к результирующей папке («%ProgramFiles%» будет добавлена автоматически).

Re: Как скопировать файлик под пользователем в папку "ProgramFiles"

null@example.com (Qwest) — Mon, 22 Jul 2013 02:35:30 +0000

alexii пишет:

Qwest, очень просто: исполнить скрипт с административными правами. Можете использовать для этого, например, GP на машину (не на пользователя): у учётной записи SYSTEM есть права для записи в %ProgramFiles%.

А можешь написать пример?

Re: Как скопировать файлик под пользователем в папку "ProgramFiles"

null@example.com (alexii) — Fri, 19 Jul 2013 19:47:13 +0000

Qwest, очень просто: исполнить скрипт с административными правами. Можете использовать для этого, например, GP на машину (не на пользователя): у учётной записи SYSTEM есть права для записи в %ProgramFiles%.

Как скопировать файлик под пользователем в папку "ProgramFiles"

null@example.com (Qwest) — Fri, 19 Jul 2013 10:21:40 +0000

Задача скопировать файлики лицензии в папку программы которая находиться в "ProgramFiles" куда доступ только на чтение и выполнение.

Подскажите пожалуйста код скрипта.

Спасибо !