Copy fonts using script for unattended vista install
I had to create a vbscript to copy fonts from a network share for an unattended vista (or windows 7) install Const FONTS = &H14& Set objShell = CreateObject("shell.Application") Set objFolder = objShell.Namespace(FONTS) strdir = "\\srv001\REMINST\Drivers\Finalize\Fonts" enumdir(strdir) Sub EnumDir(strdir) dim FSO,f,fc set FSO=Wscript.CreateObject("scripting.FileSystemObject") If fso.FolderExists(strDir) then set f=fso.GetFolder(strDir) set fc=f.files if fc.Count > 2 then for each fl in fc objFolder.CopyHere strdir & "\" & fl.name next End If else wscr...