This worked for me on W7
note that @WindowsDir return the path with no "" at the end. you must include that at the beginning of the "Fonts" folder.
#Include <APIConstants.au3>
#Include <StaticConstants.au3>
#Include <WinAPIEx.au3>
Opt('MustDeclareVars', 1)
dim $font, $source
$source="\\server\Apps\NewInstalls\fonts\AllFonts\" ; plug the location of you fonts
FileCopy($source&'addict.ttf', @WindowsDir & "\Fonts",1)
$font = @WindowsDir & '\Fonts\ADDICT.TTF'
_WinAPI_AddFontResourceEx($font)