[wpkg-users] deleting fonts - vbs?

[C. Mortimer]

Hello all,

I'm no VBS writter and have used the VBS script provided on
http://wpkg.org/Fonts to install fonts successfully:

--------------------------------------
Const FONTS = &H14&

Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(FONTS)
MyDir = left(Wscript.ScriptFullName,len(Wscript.ScriptFullName)-
len(Wscript.ScriptName)-1)

objFolder.CopyHere MyDir &"\MyNewFont.ttf"
--------------------------------------

What I don't know is how to delete fonts in a similar manner to
installing them.  I've tried replacing .CopyHere with .DeleteFile, I
get a VBScript runtime error.  This is probably my ignorance of VBS,
anyone help me with this?

Many thanks

Chris