Creat0R
Ты не понимаешь суть базового понятия "цикл".
+
Несколько раз перечитал твое
Цитата:
Как я могу сделать так, что если в том окне, которое появится после нажатия на 'Отмена' (в первом окне), пользователь нажимает в нём 'Нет', то будет запущено первое окно снова. Т.е нужно как-то вернуться на метку, которая будет стоять перед выводом первого окна.
|
В твоем описании задачи все окна "первые"...
Поэтому могут лишь подправить твой скрипт:
Код:

While 1
$var = FileSelectFolder("Select a folder.", "")
If NOT @error Then
$iMsgBoxAnswer = MsgBox(292,"Msg","you sure?")
Select
Case $iMsgBoxAnswer = 6 ;Yes
$var = StringReplace($var, "|", @CRLF)
MsgBox(64,".....","Вы выбрали: " & $var)
FileWrite ( "c.tmp", $var )
Exit
Case $iMsgBoxAnswer = 7 ;No
Case Else
Exit
EndSelect
Else
Exit
EndIf
Wend
SyCraft
Цитата:
Не подскажите где я вновь учудил?
|
Везде:
1. У оператора
MsgBox другой синтаксис
MsgBox(0,"", "",1)
2. Считывать значения редактируемых переменных нужно в цикле
Код:

While 1
$msg = GuiGetMsg()
$SecondPath = GUICtrlRead($Output)
$FirstPath = GUICtrlRead($Input)
...
3. Следи за условными переходами! У тебя
$cache будет копироваться только, если копируется
$download!
Сделай так:
Код:

While 1
...
If $msg = $GUI_EVENT_CLOSE Or $msg = $Close Then
Exit
ElseIf $msg = $Start Then
MsgBox(0,"Идет копирование файлов","Дождитесь окончания копирования файлов",1)
If GUICtrlRead($Bookmaarks) = 1 Then
...
EndIf
...
EndIf
WEnd
4. Учись отлаживать свои скрипты сам! Мне очень помогает вставка в проверяемое место
MsgBox(0,"", "",1).
Например, в твой скрипт я вставил вместо
FileCopy("$FirstPath$\profile\opera6.adr", "$SecondPath$\profile\*.*",1)
проверку
MsgBox(0,"","$FirstPath$\profile\opera6.adr TO $FirstPath$\profile\*.*").
Тут же все твои косяки вылезли наружу.
5. Много мелких недочетов. В частности, зачем циклишь объявление опции
Opt("ExpandVarStrings",1)? Обычно это делается в начале скрипта.