Серый форум — KiXtart: удаление содержимого папок

Re: KiXtart: удаление содержимого папок

null@example.com (Flasher) — Fri, 13 Nov 2015 17:16:20 +0000

Тады ой. Места перепутал.

Re: KiXtart: удаление содержимого папок

null@example.com (o5andrey) — Fri, 13 Nov 2015 15:10:52 +0000

open(1, "F:\Wallpapers\temp.txt")

Open (FileHandle, "filename", mode)
FileHandle: A numeric expression indicating the handle number of the file to open. Possible values range from 1 to 10.
Mode: Optional parameter that indicates what should happen if the file does not exist.

Re: KiXtart: удаление содержимого папок

null@example.com (Flasher) — Fri, 13 Nov 2015 10:19:10 +0000

Да на здоровье.

o5andrey пишет:

1 - для идентификации какой файл.

Вовсе нет. Это режим открытия.

Mode
Optional parameter that indicates what should happen if the file does not exist. This parameter can have the following values:
0 If the file does not exist, Open( ) fails with return code 2 (default).
1 If the file does not exist, Open( ) will create a new file.
2 Opens the file for read access (default).
4 Opens the file for write access.

Re: KiXtart: удаление содержимого папок

null@example.com (o5andrey) — Fri, 13 Nov 2015 10:08:18 +0000

...для их обработки кавычки ... не требуются
chr(34) - это кавычка. Повторяюсь, не нужно ими обрамлять значение переменных вне комстроки.

Дошло наконец... А я специально всё это... думал надо как и вручную. Просветили.

Почему 1 у open, если это к созданию файла?

Кикстарт может открыть 10 файлов: 1 - для идентификации какой файл. http://www.kixtart.org/manual/

$l - это что за стока такая?

Строка из блокнота.

Проверка на ошибку в цикле как раз заблокирует возможность удалить оставшеется.

У меня цикл и так ни разу и не выполнялся.

В любом случае папка %Temp% при наличии залоченных данных командой RD не удалится, у уж точно глупо делать это в отношении системной папки.

Да-да. Ещё раз спасибо за ответы.

Re: KiXtart: удаление содержимого папок

null@example.com (Flasher) — Fri, 13 Nov 2015 05:53:24 +0000

Этот скрипт вообще какой-то неправильный. Почему 1 у open, если это к потенциальному созданию файла?
$l - это что за строка такая? И проверка на ошибку в цикле как раз заблокирует возможность удалить оставшееся.
И ещё раз:

Flasher пишет:

для их обработки кавычки ... не требуются

chr(34) - это кавычка. Повторяюсь, не нужно ими обрамлять значение переменных вне комстроки.
В любом случае папка %Temp% при наличии залоченных данных командой RD не удалится, у уж точно глупо делать это в отношении системной папки.

Re: KiXtart: удаление содержимого папок

null@example.com (o5andrey) — Fri, 13 Nov 2015 05:29:57 +0000

(Папку можно заново потом создавать.) А вот этот скрипт выдавал ошибку 2 (ERROR_FILE_NOT_FOUND: The system cannot find the file specified.) Меня вообще интересует как заставить его подставлять. Кодировки в файлах ANSI, делал и OEM...

open(1, "F:\Wallpapers\temp.txt") ?
WHILE @error = 0
	$l = chr(34) + readline(1) + chr(34)        
  $l
	RD $l /s
	? "Error: " @error
LOOP    
? close(1)
sleep 6

Re: KiXtart: удаление содержимого папок

null@example.com (Flasher) — Fri, 13 Nov 2015 05:18:07 +0000

Так RD удаляет папку, а не только её содержимое. Команды эти ещё из cmd взяты. А что касается переменных, то для их обработки кавычки (за исключением вызова комстроки) не требуются. Полагаю, это касается любых языков.

Re: KiXtart: удаление содержимого папок

null@example.com (o5andrey) — Fri, 13 Nov 2015 05:13:11 +0000

Скажите, а RD в kixtart поддерживает переменные? Так вообще можно: RD $l /s или нет. Просто в кавычках работает: rd "C:\cxz\fgh" /s.

Re: KiXtart: удаление содержимого папок

null@example.com (o5andrey) — Fri, 13 Nov 2015 01:51:15 +0000

У методов самого kixtart есть проблемы с нечитабельными символами (в т.ч. с кириллицей, Юникодом).

...там есть занятые программами файлы.

Просветили. Благодарю.

Re: KiXtart: удаление содержимого папок

null@example.com (Flasher) — Thu, 12 Nov 2015 20:37:10 +0000

По большому счёту нет смысла. Тот же бэйсик (почти). У методов самого kixtart есть проблемы с нечитабельными символами (в т.ч. с кириллицей, Юникодом). Насчёт %Temp% решаемо только циклом и частиным удалением, т.к. там есть занятые программами файлы.

Re: KiXtart: удаление содержимого папок

null@example.com (o5andrey) — Thu, 12 Nov 2015 15:55:07 +0000

Спасибо. Работает... Надо покумекать... Тут похоже выходит нет смысла использовать kixtart.
Только у меня в списке была папка C:\Documents and Settings\Andrey\Local Settings\Temp, она осталась набитой...

Re: KiXtart: удаление содержимого папок

null@example.com (Flasher) — Thu, 12 Nov 2015 12:23:32 +0000

$List  = "F:\Wallpapers\temp.txt"
$Title = " Опустошение папок     "
$FSO   = CreateObject("Scripting.FileSystemObject")
If $FSO.FileExists($List)
   $List = $FSO.OpenTextFile($List)
   Do
      $Folder = Trim($List.ReadLine)
      If $FSO.FolderExists($Folder)
         $Mask = $FSO.BuildPath($Folder, "*")
         $FSO.DeleteFolder($Mask, 1)
         $FSO.DeleteFile($Mask, 1)
      EndIf
   Until $List.AtEndOfStream
   $List.Close
   MessageBox("Папки пусты!", $Title, 4160)
Else MessageBox("Файла '" + $List + "' не существует!", $Title, 4144)
EndIf

KiXtart: удаление содержимого папок

null@example.com (o5andrey) — Thu, 12 Nov 2015 07:36:59 +0000

Здравствуйте.
В txt-файле есть список папок (в столбик) без двойных кавычек и знака "\" на конце. Нужно опустошить все эти папки. Сначала я написал так:

open(1, "F:\Wallpapers\temp.txt")
WHILE @error = 0
	$l = chr(34) + readline(1) + chr(34)
	RD $l /s ;не подставляет
	@error
LOOP
close(1)
sleep 4

Потом так:

open(1, "F:\Wallpapers\temp.txt")
$FSO = CreateObject("Scripting.FileSystemObject")
WHILE @error = 0
	$l = chr(34) + readline(1) + "\*" + chr(34)
	$FSO.DeleteFile $l, true ;unexpected
LOOP
close(1)
$FSO = 0

Переменная $l не заменяется значением... Помогите.