Подключение к онлайн-базе данных MySQL с использованием VB.Net

Question

Я искал вокруг и не смог найти ничего подобного.

Answer 1

Imports System.Data.SqlClient
Imports MySql.Data.MySqlClient
Public Class LoginForm1
    Dim MySQLConnection As MySqlConnection
    Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Me.Close()
    End Sub

    Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Me.Close()
    End Sub

    Private Sub Cancel_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel.Click
        End
    End Sub
Private Sub OK_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
        MySQLConnection = New MySqlConnection
        MySQLConnection.ConnectionString = "server=db4free.net;Port=3306; User ID=db4freeusername; password=db4freepassword; database=nameofyourdatabase"
        MySQLConnection.Open()

        Dim MyAdapter As New MySqlDataAdapter
        Dim SqlQuary = "SELECT * From nameofthetable WHERE Username='" & UsernameTextBox.Text & "' AND password = '" & PasswordTextBox.Text & "';"
        Dim Command As New MySqlCommand
        Command.Connection = MySQLConnection
        Command.CommandText = SqlQuary
        MyAdapter.SelectCommand = Command
        Dim Mydata As MySqlDataReader
        Mydata = Command.ExecuteReader
        If Mydata.HasRows = 0 Then
            MsgBox("Error During Login:Please Enter Valid Data")
        Else
            Form1.Show()
            Me.Hide()
        End If
    End Sub
End Class

Answer 2

Вам необходимо установить Connector / Net , который предоставит вам полного поставщика ADO.Net для MySql, который вы можете использовать. Имейте в виду, что это программное обеспечение GPL, то есть если вы распространяете его как часть коммерческого продукта, вы также должны распространять свой исходный код. Это открытый юридический вопрос, но в последний раз я слышал, что большинство веб-сайтов согласны с этим, потому что вы не распространяете свой серверный код. Однако у настольных приложений может быть проблема.

Answer 3

Прежде всего вам необходимо установить MySQL коннектор для .NET .

Imports MySql.Data.MySqlClient

Dim myConnection As MySqlConnection = New MySqlConnection()
Dim myConnectionString As String = "Server=SERVERNAME;Database=DATABASE;Uid=root;Pwd=password;"
myConnection.ConnectionString = myConnectionString
myConnection.Open()

//execute queries, etc

myConnection.Close()

Answer 4

Установите коннектор MySQL для .NET и APACHE, также установите XAMPP, чтобы вы могли использовать phpMyAdmin

Answer 5

Я использую C #:

const String ConnectionString = "Driver={MySQL ODBC 5.1 Driver};Server=localhost;Port=3306;Database=test;User=root;Password=;Option=3;";

OdbcConnection conn = new OdbcConnection(ConnectionString);

conn.Open();

OdbcCommand command = new OdbcCommand();

command.CommandType = CommandType.StoredProcedure;

command.Connection = conn;

command.CommandText = "insert into search (tempsearchKey, state, suburb) values ('" + tempsearchKey+"','"+state+"','"+suburb+"')";

command.ExecuteNonQuery();

command.Cancel();

установка драйвера odbc с сайта mysql

и преобразовать это в VB.NET,

Может быть, эта ссылка может помочь:

http://dev.mysql.com/tech-resources/articles/ebonat-load-and-search-mysql-data-using-vbnet-2005.html