คือผมต้องการติดต่อ mysql จากเครื่องอื่นต้องทำไงบ้าง
โปรแกรมที่ใช้ VB 2008
ฐานข้อมูล Appserv Mysql
ผมติดต่อในเครื่องที่ติดตั้งฐานข้อมูลได้แต่ติดต่อจากเครื่องอื่นมาที่เครื่องติดต่อฐานข้อมูลไม่ได้ พอผมลองใส่ IP มันก็ติดต่อไม่ได้ไม่รู้ว่าต้องลงไรเพิ่มหรือเปล่า ผมเคยทำใน VB6 ได้ แต่ 2008 มันไม่ยอมติดต่อ
ส่วนที่ติดต่อเครื่องที่ลง Appserv Mysql ติดต่อได้
Code (VB.NET)
Imports MySql.Data
Imports MySql.Data.MySqlClient
Dim Conn As New MySqlConnection
Dim strConn As String
strConn = "Host=localhost;"
strConn &= "Uid=root;"
strConn &= "Pwd=root;"
strConn &= "Database=test;"
Conn.ConnectionString = strConn
Try
Conn.Open()
MsgBox("MySQL Connect Successfully")
Catch ex As Exception
MsgBox(ex.Message)
End Try
Conn.Close()
เครื่องที่ไม่ลง Appserv Mysql ติดต่อไม่ได้ทั้งที่ Group เดียวกัน วงเดียวกันเครื่องแม่ 192.168.5.1 เครื่องลูก 192.168.5.10
Imports MySql.Data
Imports MySql.Data.MySqlClient
Dim Conn As New MySqlConnection
Dim strConn As String
strConn = "Host= 192.168.5.1;" //ผมใช้ทั้ง Server ,Data Source ไม่ได้เลย
strConn &= "Uid=root;"
strConn &= "Pwd=root;"
strConn &= "Database=test;"
Conn.ConnectionString = strConn
Try
Conn.Open()
MsgBox("MySQL Connect Successfully")
Catch ex As Exception
MsgBox(ex.Message)
End Try
Conn.Close()
มัน error ว่า Host 'Computer10-PC' is not allowed to connect to this Mysql server
Dim objConn As MySqlConnection
Dim objCmd As MySqlCommand
Sub Page_Load(sender As Object, e As EventArgs)
Dim strConnString As String
strConnString = "Server=localhost;User Id=root; Password=root; Database=mydatabase; Pooling=false"
objConn = New MySqlConnection(strConnString)
objConn.Open()
If objConn.State = ConnectionState.Open Then
Me.lblText.Text = "MySQL Connected"
Else
Me.lblText.Text = "MySQL Connect Failed"
End IF
End Sub
Sub Page_UnLoad()
objConn.Close()
objConn = Nothing
End Sub
Load balance : Server 04
