ERRO 91
Grato.
se for usando breakpoints vai ver e entender certinho o caminho, e ver q faz o mesmo q fosse sequencial no botão o código, mas separado em partes especificas em outras classes...
Agora eu estou com um erro que não entendir o porque ainda será que é alguma referencia que falta, vejam a imagem da tela do form ele simplesmente não carrega ocorre este erro e aproveito para passa o codigo que acredito esteja correto.
Citação:Imports MySql.Data.MySqlClient
Imports System
Imports MySql.Data
Imports MySql.Data.MySqlClient.MySqlDataReader
Imports MySql.Data.MySqlClient.MySqlConnection
Public Class FrmFerrtas
Dim Banco, obj As New Conn
Dim Conexao As New Conn
Dim objConexao As New MySqlConnection(Conexao.strCon)
Dim cmd As New MySqlCommand
Dim sql As String
Private Sub FrmFerrtas_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub BtGrava_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtGrava.Click
sql = [Ô]INSERT INTO TbFerrtas(Re[ô]gistro,Data,Cod,Nome,Empresa,Estq,UltDta,Obs)values([ô]Registro[ô],[ô]Data[ô],[ô]Cod[ô],[ô]Nome[ô],[ô]Empresa[ô],[ô]Estq[ô],[ô]UltDta[ô],[ô]Obs[ô])[Ô]
Dim objCmd As New MySqlCommand(sql, objConexao)
objCmd.Parameters.AddWithValue([Ô]Registro[Ô], TxtReg.Text)
objCmd.Parameters.AddWithValue([Ô]Data[Ô], TxtDta.Text)
objCmd.Parameters.AddWithValue([Ô]Cod[Ô], TxtCod.Text)
objCmd.Parameters.AddWithValue([Ô]Nome[Ô], TxtNome.Text)
objCmd.Parameters.AddWithValue([Ô]Empresa[Ô], TxtEmpresa.Text)
objCmd.Parameters.AddWithValue([Ô]Estq[Ô], TxtEstq.Text)
objCmd.Parameters.AddWithValue([Ô]UltDta[Ô], TxtUltDta.Text)
objCmd.Parameters.AddWithValue([Ô]Obs[Ô], TxtObs.Text)
Try
objConexao.Open()
objCmd.ExecuteNonQuery()
Catch ex As Exception
MessageBox.Show(ex.ToString)
Finally
objConexao.Close()
End Try
End Sub
End Class
Favor como posso resolver este problema, em novo projeto o erro não ocorre, porque pensei que poderia ser algo com a maquina que uso ou meu vs.net 2005 está com algum pal, mais ainda bem que não o problema está relacionado com algo no codigo ou referencia. Olhem por favor.
Grato.
http://www.vbmania.com.br/index.php?modulo=forum&metodo=abrir&id=447403&pagina=1
O que é isto.
TbFerrtas([txt-color=#e80000]Re[ô]gistro[/txt-color],Data,Cod,Nome,Empresa,Estq,UltDta,Obs)values([ô]Registro[ô],[ô]Data[ô],[ô]Cod[ô],[ô]Nome[ô],[ô]Empresa[ô],[ô]Estq[ô],[ô]UltDta[ô],[ô]Obs[ô])[Ô]
Pode mora um erro nisto.
Citação:aqui foi na hora de colar acabei teclando na aspa simples, mais eu corrigir só não editei aqui no VbMania. Vou olha o link para tentar resolver já informo.TbFerrtas(Re[ô]gistro,Data,Cod,Nome,Empresa,Estq,UltDta,Obs)values([ô]Registro[ô],[ô]Data[ô],[ô]Cod[ô],[ô]Nome[ô],[ô]Empresa[ô],[ô]Estq[ô],[ô]UltDta[ô],[ô]Obs[ô])[Ô]
Pode mora um erro nisto.
Grato
https://www.youtube.com/watch?v=aBqSTILhZ_Q
http://itsourcecode.com/content/how-organize-crud-vbnet-and-mysql-database
http://www.sourcecodester.com/tutorials/visual-basic/6212/organizing-mysql-connection-and-crud-visual-basic-2008-and-mysql
Vou olha seus links tambem.
Grato.