mahmood744
چهارشنبه 10 مرداد 1397, 02:00 صبح
سلام به همه دوستان
من یک کد ساده اتصال به MySql.Data.MySqlClient را نوشتl
Imports MySql.Data.MySqlClient
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim connstring As String = "server=example.com;userid=example_user;password=ex ample_password;database=example_database"
Dim conn As MySqlConnection = Nothing
Try
conn = New MySqlConnection(connstring)
conn.Open()
Dim query As String = "SELECT * FROM table_name;"
Dim da As New MySqlDataAdapter(query, conn)
Dim ds As New DataSet()
da.Fill(ds, "table_name")
Dim dt As DataTable = ds.Tables("table_name")
For Each row As DataRow In dt.Rows
For Each col As DataColumn In dt.Columns
Console.Write(row(col).ToString() + vbTab)
Next
Console.Write(vbNewLine)
Next
Catch ex As Exception
Console.WriteLine("Error: {0}", e.ToString())
Finally
If conn IsNot Nothing Then
conn.Close()
End If
End Try
End Sub
End Class
و همچنین فایل MySql.Data.DLL را هم اضافه کرده ام
و هیچ خطایی نمی دهد و درست است
اما متاسفانه با اجرا و کامپایل برنامه خطا تعریف نشده MySql.Data.MySqlClient را می دهد
Error 5 Type 'MySqlDataAdapter' is not defined
Error 3 Type 'MySqlConnection' is not defined.
Error 4 Type 'MySqlConnection' is not defined.
نمی دونم چرا بعد از کامپایل خطا میده اما قبلش سالمه
لطفا راهنمایی کنید
با تشکر بسیار
من یک کد ساده اتصال به MySql.Data.MySqlClient را نوشتl
Imports MySql.Data.MySqlClient
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim connstring As String = "server=example.com;userid=example_user;password=ex ample_password;database=example_database"
Dim conn As MySqlConnection = Nothing
Try
conn = New MySqlConnection(connstring)
conn.Open()
Dim query As String = "SELECT * FROM table_name;"
Dim da As New MySqlDataAdapter(query, conn)
Dim ds As New DataSet()
da.Fill(ds, "table_name")
Dim dt As DataTable = ds.Tables("table_name")
For Each row As DataRow In dt.Rows
For Each col As DataColumn In dt.Columns
Console.Write(row(col).ToString() + vbTab)
Next
Console.Write(vbNewLine)
Next
Catch ex As Exception
Console.WriteLine("Error: {0}", e.ToString())
Finally
If conn IsNot Nothing Then
conn.Close()
End If
End Try
End Sub
End Class
و همچنین فایل MySql.Data.DLL را هم اضافه کرده ام
و هیچ خطایی نمی دهد و درست است
اما متاسفانه با اجرا و کامپایل برنامه خطا تعریف نشده MySql.Data.MySqlClient را می دهد
Error 5 Type 'MySqlDataAdapter' is not defined
Error 3 Type 'MySqlConnection' is not defined.
Error 4 Type 'MySqlConnection' is not defined.
نمی دونم چرا بعد از کامپایل خطا میده اما قبلش سالمه
لطفا راهنمایی کنید
با تشکر بسیار