' Get the path of the SQL Server's OSQL.exe utilityFunction GetOsqlPath() As String Dim regKey As Microsoft.Win32.RegistryKey = _ Microsoft.Win32.Registry.LocalMachine.OpenSubKey( _ "SOFTWAREMicrosoftMicrosoft SQL Server80ToolsClientSetup") If regKey Is Nothing Then Return "" End If Dim osqlPath As String = System.IO.Path.Combine(CType(regKey.GetValue _ ("SQLPath"), String), "Binnosql.exe") regKey.Close() Return osqlPathEnd Function