Avatar of RKoons
Flag for United States of America

asked on 

Virtual Basic Question...

I found the following vbs script that will install fonts into the fonts folder of a Windows 7 workstation:

Const FONTS = &H14&

Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(FONTS)
objFolder.CopyHere "location\font.ttf"

The only thing you have to do is replace "location", with where the fonts are stored, and the font name, for "font".

I am planning on using this with Group Policy to automate font installation.

The problem is: after it has run once, when the user logs in again, it will ask them if they want to replace to font that is already installed.

I am NOT a vbs expert (unfortunately) so what I need is:

How can I add some code so that it checks if the font already exists before it installs it?

Windows 7Visual Basic ClassicActive Directory

Avatar of undefined
Last Comment
Jeff Darling

8/22/2022 - Mon