2015-07-19 149 views
-2

我有一个在VS 2012中创建的VB.NET应用程序。好吧。我的应用程序有多种形式,但用户需要首先登录到第一种形式才能阅读任何其他形式。从在线MySQL数据库中提取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 
+0

请发布确切的错误消息,它会帮助我们帮助你 – Saragis

+0

好吧,它根本就没有连接。 –

+0

请尝试以下格式:“Server = myServerAddress; Database = myDataBase; Uid = myUsername; Pwd = myPassword;” – Saragis

回答

0

你确定你的服务器接受到MySQL数据库的外部连接? 大多数免费的数据库主机不支持外部访问。这是一个付费或免费托管?

+0

付费,是的。它确实是因为我有一个特殊的窗口,包含所需的端口,传递和地址。 –