Paul said:
According to this article, one of the Acronis updates ends up in
%TMP%\AcronisUpdates
http://kb.acronis.com/content/27297
If you do find the file, post back where it was located.
Paul
Since I couldn't get the "dir" command to do what I wanted, I
played around with vbscript. I couldn't find a good primer, so
this is just cobbled together from other scripts on the web.
**************************** listdir4.vbs *****************************
' // **************************************
' // Script to list files on a partition and include file size.
' // List is tab separated, filesize first, full file path second
' // No error handling (this is my first script in this language).
' //
' // User inputs - topDir = the thing (drive letter) you want to list
' // outputs - OutputFile = the place to store the list
' //
' // Presents a MsgBox when the script run is finished.
' //
' // Could this be written better ? Absolutely. There is undoubtedly
' // a better way to write output. As for the syntax, I have no idea
' // how variables or storage or scoping works here. This is just
' // someone else's script slightly re-arranged. An example of
' // an improvement, would be to pass parameters from the command line.
Dim objFSO
Dim tab
tab=chr(9)
topDir = "D:\"
set objFSO = CreateObject("Scripting.FileSystemObject")
' Create text file to store output data
Set OutputFile = objFSO.CreateTextFile("ScriptOutput.txt", True)
Set objFolder = objFSO.GetFolder(topDir)
ScanSubFolders(objFolder)
' Close text file
OutputFile.Close
MsgBox " LISTDIR4 finished "
' Program exits here...
' // **************************************
Sub scanSubFolders(objFolder)
Set colFiles = objFolder.Files
Set colFolders = objFolder.SubFolders
For Each objFile in colFiles
Outputfile.write(objFile.size)
Outputfile.write(tab)
Outputfile.writeLine(objFile.Path)
Next
For Each objSubFolder In colFolders
ScanSubFolders(objSubFolder)
Next
End Sub
********************* End Of listdir4.vbs *****************************
This script sorts the output from the first script, and uses the
same filename as the first script for its input. Wait until the
first script is finished, before running the second.
**************************** sortdir4.vbs *****************************
' // **************************************
' // Script to post-process "listdir4.vbs" output.
' // Sorts output by file size, for easy inspection.
' //
' // (Scripted separately, because this script may run out of RAM.)
' // (Uses 256MB of RAM to sort a 180,000 line file.)
' //
' // Input (and Output) format
' // Filesize_Integer Tab_Character Full_File_Path_String_spaces_and_all
' //
' // No error handling (this is my second script in this language).
' //
' // User inputs - (The input text file, default "ScriptOutput.txt")
' // outputs - (The output text file, default "ScriptOutputSorted.txt")
' //
' // Presents a MsgBox when the script run is finished.
' //
' // Could this be written better ? Absolutely. Pass filenames as
' // command line parameters.
' For the first two constants, see
http://www.w3schools.com/ado/ado_datatypes.asp
' MaxCharacters may need to be adjusted.
Const adDecimal = 14
Const adVarChar = 200
Const MaxCharacters = 280
Const adFldIsNullable = 32
Const ForReading = 1
Set DataList = CreateObject("ADOR.Recordset")
DataList.Fields.Append "LineText", adVarChar, MaxCharacters, adFldIsNullable
DataList.Fields.Append "SortField", adDecimal, MaxCharacters, adFldIsNullable
DataList.Open
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("ScriptOutput.txt", ForReading)
Do Until objFile.AtEndOfStream
strLine = objFile.ReadLine
arrFields = Split(strLine, vbTab)
strField = arrFields(0)
DataList.AddNew
DataList("LineText") = strLine
DataList("SortField") = strField
DataList.Update
Loop
objFile.Close
DataList.Sort = "SortField, LineText"
Set OutputFile = objFSO.CreateTextFile("ScriptOutputSorted.txt", True)
Do Until DataList.EOF
strLine = DataList.Fields.Item("LineText")
Outputfile.writeLine(strLine)
DataList.MoveNext
Loop
OutputFile.Close
MsgBox " SORTDIR4 finished "
' Program ends here...
********************* End Of sortdir4.vbs *****************************
Paul