[Creat0R]

Код:

#include <File.au3>

_FileDeleteEx("C:\Folder", "*.*", "|BOOT.INI|NTDETECT.COM|NTLDR|")

Func _FileDeleteEx($sPath, $sMask, $sExclude_List="")
    Local $aFiles = _FileListToArray($sPath, $sMask)

    For $i = 1 To UBound($aFiles)-1
        If $sExclude_List = "" Or Not StringInStr($sExclude_List, "|" & $aFiles[$i] & "|") Then _
            FileDelete($sPath & "\" & $aFiles[$i])
    Next
EndFunc

[semiono]

C:\Folder - это для чего? Какраз из этой папки и удаляет! Хотя я хотел папку как исключение.
Я переименовал C:\Folder в свой каталог винды C:\~ и скрипт снёс все потроха винды, что только смог
Хотя результат ожидался обратный.

Причём мусор всякий на диске C:\ так и остался не тронутым.

C:\~ (винда)
C:\Ultra$ISO
C:\BOOT.INI
C:\desktop.ini
C:\h2r3F.tmp
C:\h2r35.tmp
C:\h2r86.tmp
C:\New AutoIt v3 Script.au3
C:\NTDETECT.COM
C:\NTLDR
C:\PrePict.htm
C:\Rar$CM06.422
C:\Rar$SF06.203
C:\RECYCLED - это у меня файл ;-)
C:\z.cmd
C:\z.reg

[beve]

Хотя результат ожидался обратный »

Так внимательно разбирай пример CreatOR-a, $sExclude_List="" по-твоему для чего?

[Creat0R]

C:\Folder - это для чего? »

Это исходная папка, в которой нужно удалять всё кроме списка исключении. «C:\» как то не рискнул написать

мусор всякий на диске C:\ так и остался не тронутым »

А функции ведь нужно указать что именно удалять, если используется C:\~, то при чём тут C:\?

Что именно нужно сделать? Удалить всё на диске C: кроме указанных файлов? подробнее задачу следует описывать...

[semiono]

Так внимательно разбирай пример CreatOR-a, $sExclude_List="" по-твоему для чего? »

Внешний лист исключений лучше бы не делать, а прямо описать в скрипте все исключения сразу.

А функции ведь нужно указать что именно удалять »

Если указать что удалять, то можно и батником. Надо указать наоборот то, что не следует удалять.


Я хотел удалить всё с диска C: кроме папки виндовс и загрузочных файлов.
Program Files и Documents and Settings у меня там нет.
Хотя не помешало бы обойти стороной корзину и system volume information, хотя у меня лично таких папок нет, и pagefile.sys тоже не плохо бы учесть, опять же на всякий случай, но можно и не учитывать.

[Creat0R]

Внешний лист исключений лучше бы не делать, а прямо описать в скрипте все исключения сразу »

Это и есть список исключении!

Надо указать наоборот то, что не следует удалять »

Я к тому, что нужны явные указания, скрипт гадать не умеет.

Я хотел удалить всё с диска C: кроме папки виндовс и загрузочных файлов »

Вот значит скрипт, в переменной $sExclude_List указываем файлы и папки которые не нужно удалять (через разделитель |):

Код:

#include <File.au3>

$sExclude_List = "BOOT.INI|NTDETECT.COM|NTLDR|RECYCLED"
$sExclude_List = "|" & $sExclude_List & "|"

$sPath = "C:\Folder"
$aFiles = _FileListToArray($sPath, "*.*")

For $i = 1 To UBound($aFiles)-1
    If Not StringInStr($sExclude_List, "|" & $aFiles[$i] & "|") Then
        If StringInStr(FileGetAttrib($sPath & "\" & $aFiles[$i]), "D") Then
            DirRemove($sPath & "\" & $aFiles[$i], 1)
        Else
            FileDelete($sPath & "\" & $aFiles[$i])
        EndIf
    EndIf
Next

«C:\Folder» заменяем на «C:\».

[semiono]

Код:

Else
	FileSetAttrib($sPath & "\" & $aFiles[$i], "-RASHNOT")
        FileDelete($sPath & "\" & $aFiles[$i])

А вот это было бы так лучше
$sPath = @SystemDrive а почему нету такого?

Помниться как в WinAPI я искал @WorkingDir, там это тоже через голову надо было перевернуться... lstrcat 0_0

[Creat0R]

почему нету такого? »

Есть, как нету?!

Помниться как в WinAPI я искал @WorkingDir »

А зачем? Если есть макрос, который тем же WinAPI и образуется.

[semiono]

Оффтопик... Пожалуйста!!

Код:

Код:

$InstallDir = RegRead("HKLM\Software\Native Instruments\AkoustikPiano","InstallDir")
$file = FileOpen($InstallDir & "\AkoustikPiano.reg", 10)
FileWrite($file, "Windows Registry Editor Version 5.00" & @CRLF & @CRLF)
FileWrite($file, "[HKEY_LOCAL_MACHINE\Software\Native Instruments\AkoustikPiano]" & @CRLF)

Мне надо в зависимости от @OSArch использовать Wow6432Node затычку:

если x86 WinXP то обычно HKLM\Software\Native Instruments.....
если x64 WinXP то так HKLM\Software\Wo6432Node\Native Instruments....

как можно такой код зделать? что вообще с этим @OSArch делать?
так чтоли
If @OSArch = 1 then... ???

И как лучше, два блока написать для разных архитектур, или зделать одну переменную $var под ветку реестра,
которую потом менять по условию?
Напишите полностью код? Если понятно конечно что я спрашиваю?
Да впринцыпе тут всё просто, в разных x86 x64 запись реестра может быть в разных местах,
и различием будет лишь Wo6432Node