Ai galera comecei a fuçar no vb.net e mysql usando o mysql.data.dll como conector
usando o componente datagriedviwe
eu consigo visualizar o bando de dados...mais no caso nao salva nada que altero
pois esta faltando os comandos pra "update" "delete" etc
so que estou perdido onde colocar = /
estou perdido agora se alguem puder me ajudar
usando o componente datagriedviwe
eu consigo visualizar o bando de dados...mais no caso nao salva nada que altero
pois esta faltando os comandos pra "update" "delete" etc
so que estou perdido onde colocar = /
Imports MySql.Data.MySqlClient
Public Class Form1
Dim conn As New MySqlConnection
Dim myCommand As New MySqlCommand
Dim myAdapter As New MySqlDataAdapter
Dim myData As New DataTable
Dim SQL As String
Dim delete As String
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim conn As MySqlConnection
conn = New MySqlConnection
conn.ConnectionString = "server=localhost;user id=root;password=e150671;database=escola"
SQL = "SELECT * FROM escola.alunos"
delete = " SELECT * from DELETE escola.alunos"
Try
conn.Open()
Try
myCommand.Connection = conn
myCommand.CommandText = SQL
myAdapter.SelectCommand = myCommand
myAdapter.Fill(myData)
DataGrid1.DataSource = myData
Catch myerro As MySqlException
MsgBox("Erro de leitura no banco de dados : " & myerro.Message)
End Try
MessageBox.Show("Conexão aberta com sucesso")
conn.Close()
Catch myerro As MySqlException
MessageBox.Show("Erro ao conectar com o Banco de dados : " & myerro.Message)
Finally
conn.Dispose()
End Try
End Sub
Public Class Form1
Dim conn As New MySqlConnection
Dim myCommand As New MySqlCommand
Dim myAdapter As New MySqlDataAdapter
Dim myData As New DataTable
Dim SQL As String
Dim delete As String
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim conn As MySqlConnection
conn = New MySqlConnection
conn.ConnectionString = "server=localhost;user id=root;password=e150671;database=escola"
SQL = "SELECT * FROM escola.alunos"
delete = " SELECT * from DELETE escola.alunos"
Try
conn.Open()
Try
myCommand.Connection = conn
myCommand.CommandText = SQL
myAdapter.SelectCommand = myCommand
myAdapter.Fill(myData)
DataGrid1.DataSource = myData
Catch myerro As MySqlException
MsgBox("Erro de leitura no banco de dados : " & myerro.Message)
End Try
MessageBox.Show("Conexão aberta com sucesso")
conn.Close()
Catch myerro As MySqlException
MessageBox.Show("Erro ao conectar com o Banco de dados : " & myerro.Message)
Finally
conn.Dispose()
End Try
End Sub
estou perdido agora se alguem puder me ajudar