Импорт mysql.data.mysqlclient Module Module1 [закрыто] ⇐ Html

[Anonymous]

Imports MySql.Data.MySqlClient

Module Module1
Public conn As MySqlConnection
Public cmd As MySqlCommand
Public dr As MySqlDataReader
Public da As MySqlDataAdapter
Public ds As DataSet
Public str As String

Public Sub koneksi()
Try
str = "Server=localhost;uid=root;pwd=1705;database=penjualan"
conn = New MySqlConnection(str)
If conn.State = ConnectionState.Closed Then
conn.Open()
MsgBox("Koneksi berhasil")
End If
Catch ex As Exception
'MsgBox("Koneksi gagal" + ex.Message)
End Try
End Sub
End Module

Module Module1
Public conn As MySqlConnection
Public cmd As MySqlCommand
Public dr As MySqlDataReader
Public da As MySqlDataAdapter
Public ds As DataSet
Public str As String

Public Sub koneksi()
Try
str = "Server=localhost;uid=root;pwd=1705;database=penjualan"
conn = New MySqlConnection(str)
If conn.State = ConnectionState.Closed Then
conn.Open()
MsgBox("Koneksi berhasil")
End If
Catch ex As Exception
'MsgBox("Koneksi gagal" + ex.Message)
End Try
End Sub
End Module


Подробнее здесь: https://stackoverflow.com/questions/795 ... le-module1