Что нового

Перемещение файлов между хостами

Detre

Новичок
Сообщения
70
Репутация
0
Господа, поправьте меня, если пишу не в ту тему. Вопрос возможно банальный, но произошел затуп. В функции есть два хоста\инпута (GUICtrlCreateInput), первый локальный(Выбирает файл с моего компа) $rHostName3 , второй указывает директорию на удаленной машине $rHostName . Не понимаю как правильно прописать $rHostName3. Как это выглядит сейчас, прилагаю ниже.

Код:
Func _Button4()
$rHostName = GUICtrlRead($iHostName)
$rHostName3 = GUICtrlRead($iHostName3)
Global $txt=FileOpenDialog("Open", "C:\","Все файлы (*.*)")
GUICtrlSetData($iHostName3,$txt)
FileCopy($rHostName3 , "\\" & $rHostName &"\C$", 1)
EndFunc


Как только не игрался с $rHostName3, волосы дыбом уже. Заранее огромное спасибо.
 

ra4o

AutoIT Гуру
Сообщения
1,165
Репутация
246
Так ?
Код:
Func _Button4()
$rHostName = GUICtrlRead($iHostName)
$rHostName3 = GUICtrlRead($iHostName3)
If Not $rHostName3 Then ;Вызываем диалог выбора файла, если ранее ничего не внесли в $iHostName3 и там пусто
   $txt=FileOpenDialog("Open", "C:\","Все файлы (*.*)")
      If @error then Return ;При отказе от выбора файла выход из функции без копирования
   GUICtrlSetData($iHostName3,$txt)
  $rHostName3 =  $txt
EndIf
FileCopy($rHostName3 , "\\" & $rHostName &"\C$", 1)
EndFunc
 
Последнее редактирование:
Автор
Detre

Detre

Новичок
Сообщения
70
Репутация
0
Так ?
Код:
Func _Button4()
$rHostName = GUICtrlRead($iHostName)
$rHostName3 = GUICtrlRead($iHostName3)
If Not $rHostName3 Then ;Вызываем диалог выбора файла, если ранее ничего не внесли в $iHostName3 и там пусто
   $txt=FileOpenDialog("Open", "C:\","Все файлы (*.*)")
      If @error then Return ;При отказе от выбора файла выход из функции без копирования
   GUICtrlSetData($iHostName3,$txt)
EndIf
FileCopy($rHostName3 , "\\" & $rHostName &"\C$", 1)
EndFunc
Однозначно лайк дружище)
 
Верх