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

时间:2015-07-19 20:52:39

标签: mysql vb.net wordpress

我在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

1 个答案:

答案 0 :(得分:0)

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