Plugins von IE auslesen

[Maxx]

Hallo Thomas

Gibt es da eine Liste mit allen möglichen Plugins, die ich abfragen muß?

Meine (vermutlich veraltete Liste) ist:

  
<script type="text/vbscript" language="VBScript">  
  
if(TestActiveX("Adobe.SVGCtl")) Then  
  document.write("SVG Viewer<br>")  
  End If  
  
if(TestActiveX("SWCtl.SWCtl.1"))  Then  
  document.write("Shockwave Director<br>")  
  End If  
  
if(TestActiveX("ShockwaveFlash.ShockwaveFlash.7")) Then  
  document.write("Shockwave Flash<br>")  
  End If  
  
if(TestActiveX("rmocx.RealPlayer G2 Control.1")) Then  
  document.write("RealPlayer<br>")  
  End If  
  
if(TestActiveX("QuickTimeCheckObject.QuickTimeCheck.1")) Then  
  document.write("QuickTime<br>")  
  End If  
  
if(TestActiveX("MediaPlayer.MediaPlayer.1")) Then  
  document.write("Windows Media Player<br>")  
  End If  
  
if(TestActiveX("PDF.PdfCtrl.5")) Then  
  document.write("Acrobat Reader<br>")  
  End If  
  
Function TestActiveX(plugin)  
  On Error Resume Next  
  Set Obj = CreateObject(plugin)  
  
  If IsObject(Obj) Then  
    TestActiveX=1  
  Else  
    TestActiveX=0  
  End If  
  
End Function  

Fütter google doch einfach mit einem der obigen Begriffe. Dann gibt es sicher noch mehr davon.

Viel Spaß

Jochen