获取.NET版本

Share

1. ;获取.NET版本，此函数在nsis.sf.net中有
   
2. Function GetDotNETVersion
   
3. Push $0
   
4. Push $1
   
5. 
   
6. System::Call "mscoree::GetCORVersion(w .r0, i ${NSIS_MAX_STRLEN}, *i) i .r1"
   
7. StrCmp $1 "error" 0 +2
   
8. StrCpy $0 "not found"
   
9. 
   
10. Pop $1
    
11. Exch $0
    
12. FunctionEnd
    
13. 
    
14. Function GetNetFrameworkVersion
    
15. ;获取.Net Framework版本,支持
    
16. Push $1
    
17. Push $0
    
18. ReadRegDWORD $0 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v3.5" "Install"
    
19. ReadRegDWORD $1 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v3.5" "Version"
    
20. StrCmp $0 1 KnowNetFrameworkVersion +1
    
21. ReadRegDWORD $0 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v3.0\Setup" "InstallSuccess"
    
22. ReadRegDWORD $1 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v3.0\Setup" "Version"
    
23. StrCmp $0 1 KnowNetFrameworkVersion +1
    
24. ReadRegDWORD $0 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v2.0.50727" "Install"
    
25. ReadRegDWORD $1 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v2.0.50727" "Version"
    
26. StrCmp $1 "" +1 +2
    
27. StrCpy $1 "2.0.50727.832"
    
28. StrCmp $0 1 KnowNetFrameworkVersion +1
    
29. ReadRegDWORD $0 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v1.1.4322" "Install"
    
30. ReadRegDWORD $1 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v1.1.4322" "Version"
    
31. StrCmp $1 "" +1 +2
    
32. StrCpy $1 "1.1.4322.573"
    
33. StrCmp $0 1 KnowNetFrameworkVersion +1
    
34. ReadRegDWORD $0 HKLM "SOFTWARE\Microsoft\.NETFramework\policy\v1.0" "Install"
    
35. ReadRegDWORD $1 HKLM "SOFTWARE\Microsoft\.NETFramework\policy\v1.0" "Version"
    
36. StrCmp $1 "" +1 +2
    
37. StrCpy $1 "1.0.3705.0"
    
38. StrCmp $0 1 KnowNetFrameworkVersion +1
    
39. StrCpy $1 "not .NetFramework"
    
40. KnowNetFrameworkVersion:
    
41. Pop $0
    
42. Exch $1
    
43. FunctionEnd

复制代码