スクリプトを使用してフォントをインストールする

未だにVBScriptについて新しい話題を提供してくれるHey, Scripting Guy!に運用で使えそうなスクリプトがあったのでご紹介。

Const FONTS = &H14& 
 
Set objShell = CreateObject("Shell.Application") 
Set objFolder = objShell.Namespace(FONTS) 
objFolder.CopyHere "C:\Scripts\Myfont.ttf"

Fontのコピーってなかなか手間だったりするのですが、このスクリプトを利用すれば楽ちんですね。

ちなみにFontメーカーによってインストールメディア以外からの配布を禁止していたりする事があるので、その点だけ注意してください。(実際には出来てしまうのですが。)

スクリプトを使用してフォントをインストールする方法はありますか

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です