Серый форум — AHK: FileAppend

Re: AHK: FileAppend

null@example.com (ilya20069) — Sun, 18 Dec 2011 15:05:14 +0000

на XP есть много прог для этого, например, я, пользуюсь Stream Explorer

Re: AHK: FileAppend

null@example.com (creature.ws) — Sun, 18 Dec 2011 14:55:07 +0000

В Win7 –

 
Dir /?
…
 /R          Display alternate data streams of the file.

В XP – увы

Re: AHK: FileAppend

null@example.com (ilya20069) — Sun, 18 Dec 2011 14:46:33 +0000

Благодарю!
FileCopy работает. Остальное мне было известно

Run, cmd /k cd /d "%A_ScriptDir%" && dir /r

Консоль: Недопустимый ключ "r".

Re: AHK: FileAppend

null@example.com (creature.ws) — Sun, 18 Dec 2011 14:12:20 +0000

Может быть пример с комментариями поможет


#NoEnv
#NoTrayIcon
#SingleInstance force
#KeyHistory 0
SetBatchLines, -1
FileEncoding, utf-8

if (A_IsCompiled = 1) {
   Msgbox, 64,, % "Executing from : " A_ScriptFullPath, 3
   ExitApp
}

SplitPath, A_AhkPath,, AhkDir
IfNotExist %AhkDir%\Compiler\Ahk2Exe.exe
{
   MsgBox, 16, Error, Ahk2Exe.exe not found, 3
   ExitApp
}

SplitPath, A_ScriptFullPath,,,, ScriptNameNoEXT
IfExist %A_ScriptFullPath%:%ScriptNameNoEXT%.exe  
{
   ; Если EXE с нужным именем уже записан в поток - запускаем
   MsgBox, 64,, %A_ScriptFullPath%:%ScriptNameNoEXT%.exe `n already exist!, 3
   RunWait %A_ScriptFullPath%:%ScriptNameNoEXT%.exe
   ; И удаляем EXE из потока
   ; Так хотелось бы сделать: 
   ; FileDelete, %A_ScriptFullPath%:%ScriptNameNoEXT%.exe
   ; Так приходится делать:
   FileRead, Script, %A_ScriptFullPath%
   FileDelete, %A_ScriptFullPath%
   FileAppend, %Script%, %A_ScriptFullPath%, UTF-8
   ; Смотрим на содержимое рабочей папки и не видим EXE в потоке
   Run, cmd /k cd /d "%A_ScriptDir%" && dir /r
   ExitApp
}

; Собираем подопытный EXE
RunWait, %AhkDir%\Compiler\Ahk2Exe.exe /in "%A_ScriptFullPath%", hide
; Копируем в поток скрипта
FileCopy, %A_ScriptDir%\%ScriptNameNoEXT%.exe, %A_ScriptFullPath%:%ScriptNameNoEXT%.exe
; Запускаем из потока
RunWait %A_ScriptFullPath%:%ScriptNameNoEXT%.exe
; После запускаем «видимый» EXE
RunWait %A_ScriptDir%\%ScriptNameNoEXT%.exe
; Удаляем видимый EXE
FileDelete, %A_ScriptDir%\%ScriptNameNoEXT%.exe
; Запускаем EXE из потока
RunWait %A_ScriptFullPath%:%ScriptNameNoEXT%.exe
; Смотрим на содержимое рабочей папки и видим EXE в потоке
Run, cmd /k cd /d "%A_ScriptDir%" && dir /r
ExitApp

Имеется в виду, что *.exe ведь в бинарном формате, «как текст» их писать-читать не совсем верно.

Re: AHK: FileAppend

null@example.com (ilya20069) — Sun, 18 Dec 2011 12:42:04 +0000

эмм.. есть другие варианты? Я просто попытался воспроизвести способ гражданина T800
Создать и записать информацию в альт поток получается, запустить оттуда .exe тоже, а записать exe - нет.
Образец exe дать не могу - браузер не воспринимает символы, ну как он выглядит все знают..

Re: AHK: FileAppend

null@example.com (creature.ws) — Sat, 17 Dec 2011 13:18:19 +0000

Вот бы пример кода вашего, в котором fileappend ругается…
//add
А зачем для записи в ntfs поток использовать FileAppend?

AHK: FileAppend

null@example.com (ilya20069) — Sat, 17 Dec 2011 10:07:58 +0000

Каким образом можно добавить в файл строку вида:

MZђThis program cannot be run in DOS mode

Хм.. даже браузер отказывается принимать левые символы.

loc:="F:\1.txt:test.exe"
fileappend, (тут должен быть .exe), *%loc%
   if errorlevel
   msgbox, Stream 1 write error!

Вобщем идея запихнуть целый exe'шник.
Fileappend ругается на unrecognized simbols.