Queste informazioni sono reperibili tramite la seguente chiave di registro:
HKEY_LOCAL_MACHINE\SOFTWARE\Navision\Microsoft Business Solutions-Navision
Questa chiave ha una sottochiave che rappresenta la versione installata (xes W1 4.00) che a sua volta contiene un valore Path che rapprasenta il percorso in cui è stato installato il client di Navision
Di seguito il codice per ottenere le informazioni in VB.Net:
Public Shared Function GetNavisionVersion() As String
Dim value As String = String.Empty
Try
Dim key As Microsoft.Win32.RegistryKey
key = Microsoft.Win32.Registry.LocalMachine.OpenSubKey( _
"SOFTWARE\Navision\Microsoft Business Solutions-Navision", False)
value = key.GetSubKeyNames()(0)
Catch ex As Exception
Throw New System.ApplicationException("Navision Client is not installed.", ex)
End Try
Return value
End Function
Public Shared Function GetNavisionClientPath() As String
Dim value As String = String.Empty
Try
Dim key As Microsoft.Win32.RegistryKey
key = Microsoft.Win32.Registry.LocalMachine.OpenSubKey( _
"SOFTWARE\Navision\Microsoft Business Solutions-Navision\" & _
GetNavisionVersion(), False)
value = key.GetValue("Path").ToString()
Catch ex As Exception
Throw New System.ApplicationException("Navision Client is not installed.", ex)
End Try
Return value
End Function