Based on the advice provided at http://www.tweakguides.com/VA_4.html to prevent Windows Vista from "intelligently" rearranging column formats in Windows Explorer, I have written a script to automate the process a little.
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
'Remove the "filthy" reg keys first.
regKey = "HKCU\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\BagMRU\"
WScript.Echo "Deleting " & regKey & VbCrLf
WshShell.RegDelete regKey
regKey = "HKCU\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\Bags\"
WScript.Echo "Deleting " & regKey & VbCrLf
WshShell.RegDelete regKey
'Then recreate a clean Bags key, with sub-keys and FolderType value.
regKey = "HKCU\Software\Classes\Local Settings\Software\Microsoft\ Windows\Shell\Bags\AllFolders\Shell\FolderType"
WScript.Echo "Creating " & regKey & " as 'NotSpecified' REG_SZ " & VbCrLf
WshShell.RegWrite regKey, "NotSpecified", "REG_SZ"
WScript.Echo "Now define the columns of your preference in Windows Explorer," & VbCrLf
WScript.Echo "and click the Apply to Folders button in Folder Options." & VbCrLf
But it is refusing to delete the registry key
E:\archive\settings\Windows Vista Explorer columns.vbs(9, 1) WshShell.RegDelete:
Unable to remove registry key "HKCU\Software\Classes\Local Settings\Software\Mi
crosoft\Windows\Shell\BagMRU\".
The suggestion is to put trailing "\" to indicate a key, which I did. Any ideas?