I see in this doc (https://learn.microsoft.com/en-us/windows/win32/shell/folder-copyhere ) that we can pass flag to remove this type of modal :
But actually nothing works, the modals don't go away
My code to install font, that I want without alert modal:
Set objFSO = CreateObject("Scripting.FileSystemObject")
objStartFolder = CStr(WScript.Arguments.Item(0))
Const FONTS = &H14&
Set objShell = CreateObject("Shell.Application")
Set objFontFolder = objShell.Namespace(FONTS)
Set objFolder = objFSO.GetFolder(objStartFolder)
Set colFiles = objFolder.Files
For Each objFile in colFiles
objFontFolder.CopyHere objFile.Path, 16
Next