###前提・実現したいこと
タイトル通りですが、外字を利用したシステムを使用する前に、指定のフォントが入っているか判定。
フォントがインストールされていない場合はインストールしたいと考えております。
###発生している問題・エラーメッセージ
'下記で取得した、ユーザーごとのフォルダーパスに指定のフォント「aaa.ttf」が存在すればインストールされていることになるのか?。 'フォントはレジストリ登録する必要があるから完全な判定にはなりえない?。 System.Environment.GetFolderPath(System.Environment.SpecialFolder.Fonts)
###該当のソースコード
'C#(調査したサイトからの引用。) Type shellType = Type.GetTypeFromProgID("Shell.Application"); dynamic shellApp = Activator.CreateInstance(shellType); dynamic folder = shellApp.NameSpace(System.Environment.SpecialFolder.Fonts); folder.CopyHere(System.IO.Path.GetFullPath(@".\aaa.ttf")); vb.net版(変換中。) Dim shelltype As Type = Type.GetTypeFromProgID("Shell.Application") Dim shellApp = Activator.CreateInstance(shelltype) Dim folder = shellApp.Namespace 'Option Strict Onでは遅延バインディングエラー。
###試したこと
C#のサンプルより変換しているのですが、dynamic型との際に難儀しております。
Option Strict offにせず別の手法でプログラム側からインストールすることは可能でしょうか。
※vbsでのサンプルは多く見受けられましたが、採用する予定はございません。
###補足情報(言語/FW/ツール等のバージョンなど)
vb.net vb2015