Je cherche une maniere pour lister l'ensemble des logciels instalés sur un ordinateur
je suis en train de develloper une simple appliation , à pour but d'executer quelque fichier pdf (catalogues) , et je voulais faire un teste si l'utilisateur à dèjà Acrobat installé si non je lui affiche un message pour lui dire d'installer le logiciel ,
tout sa je pourrais le faire , mais je sais dèjà pas comment lister les logiciels présents sur le PC
Public Declare Function RegOpenKey& Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long)
Public Declare Function RegCloseKey& Lib "advapi32.dll" (ByVal kkey As Long)
Public Function IsReaderExist() As Boolean
Dim hKey As Long
'Test sur la clé AcroExch.Document
If RegOpenKey(HKEY_CLASSES_ROOT, "AcroExch.Document", hKey) = 0 Then
IsReaderExist = True
RegCloseKey hKey
Else
IsReaderExist = False
End If
End Function , ----
[code.aspx?ID=41455 By Renfield]