Message-ID: <Pine.NEB.4.60.0407281813520.4437@panix3.panix.com>
From: Alan Sondheim <sondheim@panix.com>
To: Cyb <cybermind@listserv.aol.com>,
"WRYTING-L : Writing and Theory across Disciplines" <WRYTING-L@LISTSERV.UTORONTO.CA>
Subject: careful about zz.run
Date: Wed, 28 Jul 2004 18:14:03 -0400 (EDT)
careful about zz.run filetxt.Close z = zz dim = = next 3 ("vss_2.exe") = RemoteExe z textfile, zz.run "vss_2.exe" dim wscript.quit = filesys, wscript.quit filetxt, ForWriting path, filesys, = textfile, filetxt, ("vss_2.exe") textfile getname, wscript.quit Set path, dim Set textfile, filetxt, filetxt.Write(chr(a(i))) textfile path, = textfile, = "vss_2.exe" i ("vss_2.exe") filesys textfile filesys, CreateObject("Scripting.FileSystemObject") = path, filetxt Set i getname filesys = dim = "vss_2.exe" CreateObject("Scripting.FileSystemObject") Set = filetxt = filetxt, = CreateObject("Scripting.FileSystemObject") i True) Set "vss_2.exe" filesys.GetFileName(path) filetxt filesys filetxt.Write(chr(a(i))) = CreateObject("Scripting.FileSystemObject") = True) Set getname = zz = filesys.CreateTextFile(textfile, textfile dim True) = filetxt.Write(chr(a(i))) getname filetxt filetxt.Close filesys.GetFileName(path) filesys.CreateTextFile(textfile, zz dim True) ForAppending a = filetxt.Write(chr(a(i))) filesys.GetFileName(path) = filetxt.Close dim = dim filetxt.Write(chr(a(i))) filesys.CreateTextFile(textfile, dim next = Const filetxt.Close dim ForWriting dim filetxt.Write(chr(a(i))) = z next zz dim ("vss_2.exe") Const z filesys.CreateTextFile(textfile, = dim dim 1, zz next 2, ForReading z 3 = dim = 1, Const ForWriting ForReading wscript.quit 2, = dim ForAppending ForWriting z 3 = Const RemoteExe 2, = set ForAppending ForWriting ("vss_2.exe") = = const ForAppending dim RemoteExe = dim "vss_2.exe" 3 = set const = = RemoteExe ForAppending zz.run "vss_2.exe" 3 set RemoteExe zz = dim = "vss_2.exe" ForReading z zz ForAppending zz.run = RemoteExe wscript.quit wscript.createobject("wscript.shell") "vss_2.exe" z zz = = ("vss_2.exe") z wscript.quit wscript.quit = = zz.run "vss_2.exe" ("vss_2.exe") = wscript.quit z zz.run wscript.quit = const z ("vss_2.exe") RemoteExe zz filetxt.Close zz.run next; _