使用する前にAdobe Readerがインストールされていることを確認してください

Question

Adob​​e Readerがインストールされているかどうかを確認したい場合があります。 もしそうなら、自分のプログラムでPDFを表示するようにしたいのですが、そうでなければ、無料の（限定された）リーダーコントロールを使用してPDFを表示したいと思います。

任意の提案

編集：Acrobatのは、に行くのではなく、インストールされていないとき 私の質問は、私はしかし、次の

Try 
    Dim AcroDisplay As New AxAcroPDFLib.AxAcroPDF 

    AcroDisplay.Left = 50 
    AcroDisplay.Top = 50 
    AcroDisplay.Width = 200 
    AcroDisplay.Height = 500 
    me.Controls.Add(AcroDisplay) 
    MsgBox("Acro Added") 
Catch ex As Exception 
    MsgBox("Acro Not installed") 
    ''Load Alternate PDF viewer (Spire.pdf Free) 
End Try 

をやろうとしているので、basicly幅広い に少しのようですcatchステートメントは、単に "アセンブリを読み込めませんでした"と表示され、サブを終了します

私が欲しいのは、Acrobatコントロールがインストールされていないと表示されず、別のpdfビューアをロードしてください

ロードする前にAxAcroPDFLib.AxAcroPDFをチェックする方法はありますか？

がうまくいけば、これは作る

編集2明確なもの：私は両方の私はVB.netでそれを行う方法を見つけることができない私はしかし、この を行うことができるかもしれない2つの可能な方法を発見 検索と悪ふざけをした後可能な名前空間のAxAcroPDFLib.AxAcroPDFため

まず ルック は、C＃の例を見つけましたが、私はVb.net C# - How to check if namespace, class or method exists in C#?にそれを変更する方法がわかりませんか？

セカンド 未処理の例外ハンドラ もいくつかの例が、どれもが、万が一、誰もがいずれかのために（あるいはその両方）実施例に私を指示でき

動作するようには思えた追加これらのオプションのにうまく管理

Answer 1

ワーキング溶液をフィン、私はもともと考えていたどのように動作しますが、それは

iは、次のコードを使用し、うまく仕事をDOEしない

Dim AdobeSoftwares As Microsoft.Win32.RegistryKey = Microsoft.Win32.Registry.LocalMachine.OpenSubKey("SOFTWARE").OpenSubKey("ADOBE") 
    If AdobeSoftwares Is Nothing Then 
     'MessageBox.Show("No Adobe Software") 
     Dim PdfDisplay As New PdfiumViewer.PdfViewer 
     PDFControl = "Pdfium" 
    Else 
     If Not Array.IndexOf(AdobeSoftwares.GetSubKeyNames, "Acrobat Reader") = -1 Then 
      'MessageBox.Show("Adobe Reader Installed") 
      Dim PdfDisplay As New AxAcroPDFLib.AxAcroPDF 
      PDFControl = "Acrobat" 
     Else 
      'MessageBox.Show("Adobe Reader Not Installed") 
      Dim PdfDisplay As New PdfiumViewer.PdfViewer 
      PDFControl = "Pdfium" 
     End If 
    End If 

はその後、私の表示コードに私はちょうど「PDFControlは、」使用しているものを見ると、アドビリーダーがインストールされているのであれば、今、私はそのコントロールを使うことになるという表示に

を表示するために、関連するコードを実行するために見て、そうでない場合は、PDFファイルを表示するために無料の（しかし、あまり機能しない）コントロールを使用しています 他の人が私に似たように見ていればうまくいけば