Что нового

Небольшое изменение скрипта FileCopy

Tosyk

Новичок
Сообщения
206
Репутация
0

joiner

Модератор
Локальный модератор
Сообщения
3,556
Репутация
628
убрать функцию
CheckIsSave_
 
Автор
Tosyk

Tosyk

Новичок
Сообщения
206
Репутация
0
убрать функцию
CheckIsSave_
без неё вообще не работает

я коменчу:
Код:
;        If Not CheckIsSave_($_sName) Then
;            FileSearch_($_sName)
;        EndIf


так же вот в этой функции в конце у меня filedelete:
Код:
Func SaveListSave_()
    Local $_iA, $_hFile = FileOpen($sListFileSave, 2 +8)
    For $_iA = 1 To $aListFileSave[0]
        FileWrite($_hFile, $aListFileSave[$_iA]& @CRLF)
    Next
    FileClose($_hFile)
    FileDelete($sListFileSave)
EndFunc

Сообщение автоматически объединено:

Может быть есть ещё мысли? Как можно сделать копирование двух файлов?
Сообщение автоматически объединено:

подскажите пожалуйста, всю голову уже сломал:

Код:
Func FileSearch_($_sName)
    Local $_iA, $_sFile
    For $_iA = 1 To $aListFileSearch[0]
        $_sFileName = StringRegExpReplace($aListFileSearch[$_iA], '(^.*)\\(.*)$', '$2')
        $_sFileName = StringRegExpReplace($_sFileName, '(^.*)\.(.*)$', '$1')
        Switch $_sFileName
            Case $_sName, $_sName& '_dx10'
                $aListFileSave[0] += 1
                ReDim $aListFileSave[$aListFileSave[0] +1]
                $aListFileSave[$aListFileSave[0]] = $_sFileName
                FileCopy_($aListFileSearch[$_iA])
                If $iUpdate Then
                    $aListFileSearch[$_iA] = $aListFileSearch[0]
                    ReDim $aListFileSearch[$aListFileSearch[0]]
                    $aListFileSearch[0] -= 1
                EndIf
                Return 1
        EndSwitch
    Next
EndFunc

видимо что-то добавить в эту функцию. тут как-то происходит выбор файла из двух, который и будет потом скопирован. но перекрёстных ссылок столько много я не могу ничего понять
 
Последнее редактирование:
Верх