Форум программистов, компьютерный форум, киберфорум
Наши страницы
VBScript/JScript/WSH/WMI/HTA
Войти
Регистрация
Восстановить пароль
 
jumpman23
0 / 0 / 0
Регистрация: 03.06.2013
Сообщений: 2
#1

VBS: Выполнение скрипта, только по окончании процесса копирования - VBScript/JScript

04.03.2014, 16:28. Просмотров 1313. Ответов 1
Метки нет (Все метки)

в скрипте запускается копирование файла, и необходимо продолжать выполнение скрипта, только по окончании процесса копирования.

пропустим вводные данные
вкратце так:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 If NOT (FSO.FolderExists("C:\бла бла бла")) Then
    
MsgBox("Сейчас начнется копирование, не откл. от сети не закрывайте всплывающие окна")
 
objFolder.CopyHere sourceDirSpec, PARAM_DIALOG
 
MsgBox("Нажмите Ок для продолжения установки")
 
WshShell.Run 
 
Else
 
WshShell.Run прога из копируемой папки
 
end if
какой метод или параметр можно использовать чтобы в момент начала копирования скрипт дождался его окончания, и только потом начал следующий шаг.

может сам метод копирования другой, но хотелось бы чтобы прогресс копирования был виден.

заранее спасибо!
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
04.03.2014, 16:28
Я подобрал для вас темы с готовыми решениями и ответами на вопрос VBS: Выполнение скрипта, только по окончании процесса копирования (VBScript/JScript):

Проверка доступности IP-адреса через выполнение vbs-скрипта
Друзья, владение программированием минимальны, а задача есть следующая -...

Привязка VBS-скрипта к папке
Вечер добрый. Наверное вас очень сильно достал уже этот вопрос, но все же.....

Запуск vba из vbs скрипта
Прошу помощи. Сам я человек далёкий от VBS. Задача такая.... есть файл excel,...

Запуск файла с vbs скрипта
Как запустить какой-либо файл с vbs скрипта? Прописал путь таким образом но не...

Анализ скрипта VBS WindowsKey
В интернете гуляет скрипт по получению Ключа Windows Set WshShell =...

Запуск скрипта VBS из HTA
Добрый день. Помогите пожалуйста в решении следующей задачи. Есть скрипт...

1
Dmitrii
2601 / 534 / 106
Регистрация: 21.03.2012
Сообщений: 1,043
05.03.2014, 17:54 #2
Лучший ответ Сообщение было отмечено Dragokas как решение

Решение

Метод CopyHere выполняется синхронно. Вот пример корректно работающего сценария:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Dim objFS, objShell, objFolderTarget, objWShell
Dim strSource, strTarget, strProcess, strTemp
strSource = "Z:\Distrib\2GIS"
strTarget = "E:\2GIS"
strProcess = "2GISData_Novosibirsk-185.0.0.msi"
Set objFS = CreateObject("Scripting.FileSystemObject")
If objFS.FolderExists(strSource) Then
    Set objShell = CreateObject("Shell.Application")
    If objFS.FolderExists(strTarget) Then
        Set objFolderTarget = objShell.NameSpace(strTarget)
        objFolderTarget.CopyHere strSource & "\*.*"
    Else
        strTemp = Left(strTarget, InStrRev(strTarget, "\"))
        Set objFolderTarget = objShell.NameSpace(strTemp)
        objFolderTarget.CopyHere strSource
    End If
    Set objFolderTarget = Nothing
    Set objShell = Nothing
    If objFS.FileExists(strTarget & "\" & strProcess) Then
        Set objWShell = CreateObject("WScript.Shell")
        objWShell.Run strTarget & "\" & strProcess, 1
        Set objWShell = Nothing
    End If
Else
    WScript.Echo "Папка-источник не найдена."
End If
Set objFS = Nothing
WScript.Quit 0
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
05.03.2014, 17:54
Привет! Вот еще темы с решениями:

Выполнение сценария из переменной VBS
Необходимо выполнить сценарий заданный в переменной: per = "msgbox ""Hi"""...

Как вызвать WinAPI из VBS-скрипта?
Как в в VBScript-е сделать вызов WinApi - например FindWindow -с помощью...

Создание одного VBS-скрипта с помощью другого
Вопрос такой может ли Vbs скрипт создать другой Vbs скрипт

Создание BAT-файла с помощью VBS-скрипта
Всем большой привет! Помогите создать файл bat через скрипт vbs и записать в...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru