Автор Тема: [Новая функция] Добавить ещё 1 файл в изменение.  (Прочитано 2542 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн apTmusic [?]

  • Новичок
  • *
  • Сообщений: 1
  • Репутация: 0
  • Пол: Мужской
    • Награды
Есть скрипт:
Код: AutoIt [Выделить]
#NoTrayIcon
If Not IsAdmin() Then
    ShellExecute(@AutoItExe, $CMDLineRaw, @WorkingDir, "runas", @SW_SHOWNORMAL)
    Exit
 EndIf
$drives = DriveGetDrive('FIXED')
For $i = 1 To $drives[0]
    $aOut = _FileSearch($drives[$i], "MasterServers.vdf", 1)
    FileSetAttrib("MasterServers.vdf", "+R")
    If $aOut[0] = 0 Then
    Else
For $a = 1 To $aOut[0]
    FileInstall('MasterServers2.vdf', $aOut[$a], 1)
Next
    EndIf
Next
Func _FileSearch($sPath, $sFileMask, $iFlag = 0)    ;Функция для поиска файла
    Local $sOutBin, $sOut, $aOut, $sRead, $hDir, $sAttrib
    Switch $iFlag
        Case 1
            $sAttrib = ' /A-D'
        Case 2
            $sAttrib = ' /AD'
        Case Else
            $sAttrib = ' /A'
    EndSwitch
    $sOut = StringToBinary('0' & @CRLF, 2)
    $aMasks = StringSplit($sFileMask, ';')
    For $i = 1 To $aMasks[0]
        $hDir = Run(@ComSpec & ' /U /C DIR "' & $sPath & '\' & $aMasks[$i] & '" /S /B' & $sAttrib, @SystemDir, @SW_HIDE, 6)
        While 1
            $sRead = StdoutRead($hDir, False, True)
            If @error Then
                ExitLoop
            EndIf
            If $sRead <> "" Then
                $sOut &= $sRead
            EndIf
        Wend
    Next
    $aOut = StringRegExp(BinaryToString($sOut, 2), '[^\r\n]+', 3)
    If @error Then
        Return SetError(1)
    EndIf
    $aOut[0] = UBound($aOut)-1
    Return $aOut
 EndFunc


Нужно добавить, чтобы он ещё заменял файл rev_MasterServers.vdf по мимо MasterServers.vdf

Русское сообщество AutoIt

[Новая функция] Добавить ещё 1 файл в изменение.
« Отправлен: Сентябрь 17, 2013, 15:08:12 »

Оффлайн madmasles [?]

  • Глобальный модератор
  • *
  • Сообщений: 7790
  • Репутация: 2317
  • Пол: Мужской
  • Награды За модерирование форума
    • Награды
  • Версия AutoIt: 3.3.x.x
ПредупреждениеЗа нарушение правил форума (пункт Б.5):
Цитировать
Имя темы должно нести смысловую нагрузку (отражать суть вопроса/проблемы)
Правильно сформулированное название темы привлекает больше внимания, и шансы получить конкретный ответ увеличиваются.

Данные правила могут пополняться локальными правилами раздела.
Как правильно называть темы

"[Новая функция]  Добавить ещё 1 файл в изменение." - это неприемлемое название темы, переименуйте тему иначе она будет закрыта, а вам возможно будет выдан бан на несколько дней.

С уважением, ваш Глобальный модератор.

Оффлайн madmasles [?]

  • Глобальный модератор
  • *
  • Сообщений: 7790
  • Репутация: 2317
  • Пол: Мужской
  • Награды За модерирование форума
    • Награды
  • Версия AutoIt: 3.3.x.x
Тема закрыта.

Русское сообщество AutoIt

Re: [Новая функция] Добавить ещё 1 файл в изменение.
« Ответ #2 Отправлен: Сентябрь 21, 2013, 09:07:10 »

 

Похожие темы

  Тема / Автор Ответов Последний ответ
45 Ответов
30334 Просмотров
Последний ответ Ноябрь 25, 2010, 09:10:17
от aleratorio
5 Ответов
13368 Просмотров
Последний ответ Ноябрь 26, 2009, 14:53:56
от CreatoR
12 Ответов
8514 Просмотров
Последний ответ Январь 12, 2011, 08:57:02
от CreatoR
3 Ответов
3860 Просмотров
Последний ответ Май 18, 2011, 00:05:47
от CreatoR
11 Ответов
6448 Просмотров
Последний ответ Июнь 20, 2010, 23:08:43
от CreatoR
0 Ответов
2250 Просмотров
Последний ответ Январь 09, 2012, 12:08:49
от C2H5OH
1 Ответов
2149 Просмотров
Последний ответ Март 29, 2012, 17:14:33
от AZJIO
0 Ответов
1694 Просмотров
Последний ответ Сентябрь 17, 2013, 15:15:25
от madmasles
2 Ответов
2555 Просмотров
Последний ответ Январь 02, 2014, 16:19:32
от fatalist420
4 Ответов
1246 Просмотров
Последний ответ Сентябрь 15, 2016, 20:30:58
от louie1743shkirondo