Bilgisayarda .Net Yüklü Olup Olmadığını Anlamak
-
selamlar,
bir cd klavuzu yaptım, cd basılıp insanlara dağıtılacak. klavuzu .net ile yazdım. Bilgisayarında .net yüklü olmayan kullanıcılar programı açamayacakları için vbscript ile .net yüklü olup olmadığını kontrol ettirmem gerektir. Yüklü değilse cd içinde ki .net setup ını çalıştırıyorum.
belki işinize yarar paylaşayım
Option Explicit
Dim oShell
Dim value
''#If the key isn't there when we try to read it, an error will be generated
''# that we will later test for, so we want to automatically resume execution.
On Error Resume Next
''#Try reading the registry value
Set oShell = CreateObject("WScript.Shell")
value = oShell.RegRead("HKLM\SOFTWARE\Microsoft\.NETFramework\Policy\v2.0\50727")
''#Catch the error
If Err.Number = 0 Then
''#Error code 0 indicates success
oShell.Run("c:\klavuz.exe")
Else
''#Any other error code indicates failure
oShell.Run("c:\netsetup.exe")
End Ifbunu not defterine kaydedip uzantısını ".vbs" yapmanız yeterli olacaktır.
not: vbscript ile o an programın çalıştığı yolu alıp(Application.StartupPath olayı), o düzeydeki exeyi çalıştırabilirsiniz. google a yazıp bulursunuz