Ошибка подключения Visual Studio 2015 к базе данных MySQL

Я пытаюсь подключиться к локальной базе данных MySQL в Visual Studio 2015. Это код, который я использую.

Imports System.Data.Sql

Импортирует System.Data.SqlClient

Открытый класс SQLControl

Public SQLCon As New SqlConnection With {.ConnectionString = "Server=localhost,3306;user=root;database=database;pwd=xxxx;"}
Public SQLCmd As SqlCommand

Public Function HasConnection() As Boolean
    Try
        SQLCon.Open()

        SQLCon.Close()
        Return True
    Catch ex As Exception
        MsgBox(ex.Message)
        Return False
    Finally
        SQLCon.Dispose()
    End Try
End Function

Я получаю сообщение об ошибке: «Внутренняя ошибка сопутствующего подключения. Ошибка состояния: 18»

ИЛИ Я получаю сообщение об ошибке: «Соединение было успешно установлено с сервером, но затем произошла ошибка во время установления связи между входами (поставщик: поставщик TCP, ошибка: 0 - установленное соединение было прервано программным обеспечением вашей хост-машины .)

Какая ошибка, которую я получаю, кажется случайной. Я изменил многие настройки безрезультатно, включая порт сервера до 1433, что дает мне те же ошибки.

Мне было интересно, есть ли способ решить это через VS 2015 или, возможно, сами настройки сервера.

Замечание: я могу подключиться к базе данных без проблем через серверный проводник VS и другие программы на этом компьютере (Anypoint Studio), но это не соответствует цели проекта.

mysql,vb.net,visual-studio-2015,

0

Ответов: 1


1

Дрю был прав. Я использовал класс SQL вместо класса MySQL.

Импортирование класса MySQL.Data.MySQLClient и использование MySQLConnection вместо SqlConnection решают проблему:

Imports MySql.Data.MySqlClient


Public Class MySQLControl

Public MySQLCon As New MySqlConnection With {.ConnectionString = "Server=localhost;user=root;database=database;pwd=xxxx;"}
Public MySQLCmd As MySqlCommand

Public Function HasConnection() As Boolean
    Try
        MySQLCon.Open()

        MySQLCon.Close()
        Return True
    Catch ex As Exception
        MsgBox(ex.Message)
        Return False
        MySQLCon.Close()
    Finally
        MySQLCon.Dispose()
    End Try
End Function
MySQL, vb.net, зрительно-студия-2015,
Похожие вопросы