Take the tour ×  I am writing a VBScript that I would like to be
able to alter the Zone Identifier, and add Extended Attributes
to various files with. Is this possible without the use addons,
or something like the below?  objShell.run("type
%windir%\notepad.exe > %windir%\calc.exe:notepad.exe")
share|improve this question add comment  1 Answer  up vote 0
down vote accepted  You can handle ADS like other files:  Set
fso = CreateObject("Scripting.FileSystemObject")  Set f =
fso.CreateTextFile("file.exe:Zone.Identifier") f.WriteLine
"[ZoneTransfer]" & vbNewLine & "ZoneId=3"  Set f =
fso.OpenTextFile("file.exe:Zone.Identifier", 1) WScript.Echo
f.ReadAll share|improve this answer Thanks Ansgar Wiechers,
Couldn't find this on msdn, do you have a reference also? – 
user66001 Oct 21 '12 at 19:58 Only this. Since the filesystem
dictates the filename:streamname syntax I figured that there'd
be no reason for it to not work, though, so I ran a quick test,
and found that it does behave as you'd expect. –  Ansgar
Wiechers