从在线 MySQL 数据库中获取 VB.NET 中的数据

Question

我有一个在 VS 2012 中创建的 VB.NET 应用程序。好的。我的应用有多个表单，但用户需要先登录第一个表单才能阅读其他表单。

我有一个服务器（在互联网上），我安装了 Wordpress。 现在，我需要让我的应用程序从 wordpres 的数据库中获取用户名和密码（我知道数据库的服务器、名称、用户名和密码）。如果用户在应用程序的文本框中写入的名称和密码与 Wordpress 数据库中的一位用户匹配，那么用户应该能够以其他形式看到他们。 我的问题是我不太了解编码数据库连接。 谁能帮帮我？

这是我做的，但似乎不起作用

Imports MySql.Data.MySqlClient
Imports MySql.Data

Public Class Update_page
    Public dset As New System.Data.DataSet
    Public strSQL As String
    Public cmd As New MySqlCommand
    As Dreader Public MySqlDataReader
       As New MySqlConnection Public sConnection
    Update_Load Private Sub (ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load

        If sConnection.State = ConnectionState.Closed Then
             sConnection.ConnectionString = "SERVER = my_server; USERID =My_id; PASSWORD = My_password; DATABASE = u3802032254;"
            sConnection.Open ()
            'MessageBox.Show ("Connected to server")
        Else
            'Catch ex As MySqlException
            MessageBox.Show ("Not connected to server")
            'End Try
        End If
       USER ()
     End Sub

        Public Sub USER ()
            Dim da As New MySqlDataAdapter
            Dim ds As New DataSet
            dset.EnforceConstraints = False
            strSQL = "SELECT user FROM wp_users"
            cmd = New MySqlCommand ()
            cmd.CommandText = strSQL
            cmd.CommandType = CommandType.Text
            cmd.Connection = sConnection
            ds = New DataSet ()
            da.SelectCommand = cmd
            da.Fill (ds, "User")
            Titulo_combo.DataSource = ds.Tables (0)
            Titulo_combo.DisplayMember = "Title"
        End Sub

Answer 1

您确定您的服务器接受到 MySQL 数据库的外部连接吗？ 大多数免费数据库主机不支持外部访问。它是付费托管还是免费托管？