Найти ip подключенной базы данных MYSQL в VB.net

Question

Мне нужно вернуть данные ip-соединения ODBC Mysql-соединения, чтобы визуально убедиться, что я успешно подключился к нужной базе данных на правильном сервере с использованием VB.net.

В VB6 я использовал для анализа строки ADOX.Catalog.ActiveConnection, но это не работает в VB.net. Строка не возвращается.

Какой метод сейчас используется для получения IP-адреса успешного соединения ODBC? Поиск ObjectBrowser и MSDN не помогает в этом отношении.

не ответ - но больше проблем

Ответ ниже выглядел как офигительный простой способ сделать это. Если бы это было так просто. Я застрял в течение многих часов, пытаясь решить DNS - и столкнулся с ошибками сокетов на windows7 в коде разрешения.

осматривая, я наткнулся на этот код MSDN, который является прямым подходом от ADOX. Однако он не будет компилироваться, так как он задыхается от компиляции ConnectionStringSettings, протестуя против того, что он не определен, даже если он является членом сборки System.Net.Configuration. Что не так с синтаксисом ADOX.

и я привык думать, что кодирование VB было проще, чем Java! Можно было бы подумать, что MSDN привел бы примеры скомпилированного кода.

Imports System.Net

Private Shared Function GetConnectionStringByName(ByVal name As String) As String
    GetConnectionStringByName = "OK"
    ' Assume failure 
    Dim returnValue As String = Nothing

    ' Look for the name in the connectionStrings section. 
    Dim settings As ConnectionStringSettings = ConfigurationManager.ConnectionStrings("MySql")

    ' If found, return the connection string. 
    If Not settings Is Nothing Then
        returnValue = settings.ConnectionString()
    End If

    ' Return returnValue
End Function

Answer 1

Вы можете выполнить SQL-запрос,

SHOW VARIABLES LIKE 'hostname'

Это вернет имя хоста сервера MySQL. Вы можете легко разрешить IP-адрес из имени хоста, используя Dns.Resolve

Рекомендации:

1. 13.7.5.41 ПОКАЗАТЬ ПЕРЕМЕННЫЕ Синтаксис
2. 5.1.4 Системные переменные сервера