Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [решено] Autoit

Ответить
Настройки темы
[решено] Autoit

Новый участник


Сообщения: 8
Благодарности: 0

Профиль | Отправить PM | Цитировать


Всем привет снова нужна ваша помощь вот
Код: Выделить весь код
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Program Files (x86)\koda_1.7.3.0\Forms\Form1.kxf
$Form1_1 = GUICreate("Form1", 532, 110, 192, 124)
$Button1 = GUICtrlCreateButton("Folder№1", 8, 8, 75, 25)
$Button2 = GUICtrlCreateButton("Folder№2", 8, 40, 75, 25)
$Input1 = GUICtrlCreateInput("", 88, 8, 433, 21)
$Input2 = GUICtrlCreateInput("", 88, 40, 433, 21)
$Button3 = GUICtrlCreateButton("Copy", 8, 72, 75, 25)
$Progress1 = GUICtrlCreateProgress(88, 72, 430, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

		Case $Button1
        $path = FileSelectFolder ( "", "", "")
		GUICtrlSetData($Input1, $path & "\")
		Case $Button2
		$path = FileSelectFolder ( "", "", "")
		GUICtrlSetData($Input2, $path & "\")
		Case $Button3
		FileCopy("$ GUICtrlRead($Input1) $", "$ GUICtrlRead($Input2) $", 9)
	EndSwitch
WEnd
Вопрос как мне взять пути из Input для копирования и прикрутить к нему прогресс бар?

Отправлено: 12:24, 28-08-2021

 

Ветеран


Сообщения: 27449
Благодарности: 8086

Профиль | Отправить PM | Цитировать


Цитата ZmeyRepack:
как мне взять пути из Input для копирования »
Код: Выделить весь код
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <WindowsConstants.au3>
#include <FileConstants.au3>

#Region ### START Koda GUI section ### Form=C:\Program Files (x86)\koda_1.7.3.0\Forms\Form1.kxf
$Form1_1 = GUICreate("Form1", 532, 110, 192, 124)
$Button1 = GUICtrlCreateButton("Folder№1", 8, 8, 75, 25)
$Button2 = GUICtrlCreateButton("Folder№2", 8, 40, 75, 25)
$Input1 = GUICtrlCreateInput("", 88, 8, 433, 21)
$Input2 = GUICtrlCreateInput("", 88, 40, 433, 21)
$Button3 = GUICtrlCreateButton("Copy", 8, 72, 75, 25)
$Progress1 = GUICtrlCreateProgress(88, 72, 430, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()

	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

		Case $Button1
			$path = FileSelectFolder("Select source folder", "", $FSF_CREATEBUTTON + $FSF_NEWDIALOG + $FSF_EDITCONTROL, GUICtrlRead($Input1), $Form1_1)

			If Not @error Then
				GUICtrlSetData($Input1, $path)
			EndIf
		Case $Button2
			$path = FileSelectFolder("Select destination folder", "", $FSF_CREATEBUTTON + $FSF_NEWDIALOG + $FSF_EDITCONTROL, GUICtrlRead($Input2), $Form1_1)

			If Not @error Then
				GUICtrlSetData($Input2, $path)
			EndIf
		Case $Button3
 			FileCopy(GUICtrlRead($Input1) & "\*.*", GUICtrlRead($Input2), $FC_OVERWRITE + $FC_CREATEPATH)
	EndSwitch
WEnd
Цитата ZmeyRepack:
и прикрутить к нему прогресс бар? »
Получить файлы из исходного каталога $Input1, посчитать их количество или занимаемый объём (в зависимости от того, что именно Вы собираетесь считать за 100%), затем перебирать в цикле, копируя по одному, одновременно обновляя ProgressBar.
Это сообщение посчитали полезным следующие участники:

Отправлено: 17:51, 28-08-2021 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

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


Новый участник


Сообщения: 8
Благодарности: 0

Профиль | Отправить PM | Цитировать


Здравствуй Iska снова выручаешь. Получить файлы из исходного каталога $Input1, посчитать их количество. Только каталог должен быть копирован без изменений сохранив структуру под папок.

Отправлено: 18:13, 28-08-2021 | #3


Ветеран


Сообщения: 27449
Благодарности: 8086

Профиль | Отправить PM | Цитировать


Тогда смотрите в сторону DirCopy(). Если нужен ProgressBar — то рекурсивный разбор каталога $Input1 для подсчёта количества/объёма, затем ещё один рекурсивный разбор $Input1 и DirCreate() для каждого с последующим FileCopy() и обновлением ProgressBar.
Это сообщение посчитали полезным следующие участники:

Отправлено: 18:32, 28-08-2021 | #4


Новый участник


Сообщения: 8
Благодарности: 0

Профиль | Отправить PM | Цитировать


Спасибо буде копать!!!

Отправлено: 20:23, 28-08-2021 | #5



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [решено] Autoit

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
AutoIt и Jabber morgan1991 AutoIt 4 28-07-2010 23:52
AutoIt bgs AutoIt 6 01-02-2010 21:20
MsExcel2007 и AutoIT Veter_cmd AutoIt 1 10-07-2009 16:45
Разное - Autoit vampirqueen Программирование и базы данных 2 30-06-2008 04:59
SMS и AUTOIt mikola1983 AutoIt 0 02-04-2008 07:43




 
Переход