CADASTRADO DE CLIENTE
Olá amigos do fórum estou de novo pedindo um help sobre vb.net 2005
Estou migrando do vb6.0 para vb.net 2005 e iniciando em mysql bom vamos ao que interessa.
Amigos vou explicar passo a passo
fiz uma conexão que está em um modulo entre o vb.net 2005 e o mysql que está funcionando perfeitamente segue o código abaixo para algum amigo que
queria usar com referência .
Module Module1
Public MySQLConn As MySql.Data.MySqlClient.MySqlConnection
Public Function InicializaConexão() As Boolean
MySQLConn = New MySql.Data.MySqlClient.MySqlConnection([Ô]Server=localhost;Database=syslocadora;Uid=root;Pwd=131082[Ô])
Try
MySQLConn.Open()
Return True
Catch erro As Exception
MessageBox.Show([Ô]Ocorreu um erro ao inicializar a conexão: [Ô] & erro.ToString())
Return False
End Try
End Function
Public Function ExecutarSQL(ByVal query As String) As MySql.Data.MySqlClient.MySqlDataReader
Dim MySQLCmd As New MySql.Data.MySqlClient.MySqlCommand(query, MySQLConn)
Return MySQLCmd.ExecuteReader()
End Function
End Module
Mas o que eu estou precisando é o seguinte como fazer um insert into na tabela cliente do meu banco de dados mysql a conexão está pronto
eu ficarei muito grato
Estou migrando do vb6.0 para vb.net 2005 e iniciando em mysql bom vamos ao que interessa.
Amigos vou explicar passo a passo
fiz uma conexão que está em um modulo entre o vb.net 2005 e o mysql que está funcionando perfeitamente segue o código abaixo para algum amigo que
queria usar com referência .
Module Module1
Public MySQLConn As MySql.Data.MySqlClient.MySqlConnection
Public Function InicializaConexão() As Boolean
MySQLConn = New MySql.Data.MySqlClient.MySqlConnection([Ô]Server=localhost;Database=syslocadora;Uid=root;Pwd=131082[Ô])
Try
MySQLConn.Open()
Return True
Catch erro As Exception
MessageBox.Show([Ô]Ocorreu um erro ao inicializar a conexão: [Ô] & erro.ToString())
Return False
End Try
End Function
Public Function ExecutarSQL(ByVal query As String) As MySql.Data.MySqlClient.MySqlDataReader
Dim MySQLCmd As New MySql.Data.MySqlClient.MySqlCommand(query, MySQLConn)
Return MySQLCmd.ExecuteReader()
End Function
End Module
Mas o que eu estou precisando é o seguinte como fazer um insert into na tabela cliente do meu banco de dados mysql a conexão está pronto
eu ficarei muito grato
Coloque assim em um botão
query = [Ô]INSERT INTO SUA_TABELA(Campo1,Campo2,Campo3)VALUES([ô][Ô] & TextBox1.Text & [Ô][ô],[ô][Ô] & TextBox2.Text & [Ô][ô],[ô][Ô] & TextBox3.Text & [Ô][ô][Ô]
CMD = New MySqlCommand(query, MySQLConn)
CMD.ExecuteNonQuery()
Onde Campo é o campo correspondente na tabela
Onde Textbox é o textbox onde vai o valor que será gravado
query = [Ô]INSERT INTO SUA_TABELA(Campo1,Campo2,Campo3)VALUES([ô][Ô] & TextBox1.Text & [Ô][ô],[ô][Ô] & TextBox2.Text & [Ô][ô],[ô][Ô] & TextBox3.Text & [Ô][ô][Ô]
CMD = New MySqlCommand(query, MySQLConn)
CMD.ExecuteNonQuery()
Onde Campo é o campo correspondente na tabela
Onde Textbox é o textbox onde vai o valor que será gravado
olá amigos do fórum boa noite peço um help neste insert into no my sql
Dim Cnn As New MySql.Data.MySqlClient.MySqlCommand
With Cnn
.Connection = MySQLConn
.CommandType = CommandType.Text
.CommandText = [Ô]INSERT INTO Usuarios [Ô] & _
[Ô](CLIENTE, ENDERECO, BAIRRO, CIDADE, UF, CEP, FONE, CELULAR, EST_CIVIL, CPF, RG, SEXO, DATA_CADASTRO, NASCIMENTO, DEP1, CPF_DEP1, RG_DEP1, ATIVO)VALUES ([ô][Ô] & _
TXTC1.Text & [Ô],[ô][Ô] & _
TXTC2.Text & [Ô][ô],[ô][Ô] & _
TXTC3.Text & [Ô][ô],[ô][Ô] & _
TXTC4.Text & [Ô][ô],[ô][Ô] & _
TXTC5.Text & [Ô][ô],[ô][Ô] & _
TXTC6.Text & [Ô][ô],[ô][Ô] & _
TXTC7.Text & [Ô][ô],[ô][Ô] & _
TXTC8.Text & [Ô][ô],[ô][Ô] & _
TXTC9.Text & [Ô][ô],[ô][Ô] & _
TXTC10.Text & [Ô][ô],[ô][Ô] & _
TXTC11.Text & [Ô][ô],[ô][Ô] & _
TXTC12.Text & [Ô][ô],[ô][Ô] & _
TXTC13.Text & [Ô][ô],[ô][Ô] & _
TXTC14.Text & [Ô][ô],[ô][Ô] & _
TXTC15.Text & [Ô][ô],[ô][Ô] & _
TXTC16.Text & [Ô][ô],[ô][Ô] & _
TXTC17.Text & [Ô][ô],[ô][Ô] & _
TXTC18.Text & [Ô][ô]);[Ô]
.ExecuteNonQuery() [txt-color=#e80000]aqui está o erro está é mensagem abaixo [/txt-color]
End With
[txt-color=#e80000]You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near [ô]/[ô],[ô][ô],[ô][ô],[ô][ô],[ô][ô],[ô] -[ô],[ô]( ) -[ô],[ô] -[ô],[ô][ô],[ô] / /[ô],[ô][ô],[ô][ô],[ô][ô],[ô][ô],[ô] , , [ô] at line 1
[/txt-color]
amigos como resolver este erro
e desde já agradeço a todos pela ajuda
Dim Cnn As New MySql.Data.MySqlClient.MySqlCommand
With Cnn
.Connection = MySQLConn
.CommandType = CommandType.Text
.CommandText = [Ô]INSERT INTO Usuarios [Ô] & _
[Ô](CLIENTE, ENDERECO, BAIRRO, CIDADE, UF, CEP, FONE, CELULAR, EST_CIVIL, CPF, RG, SEXO, DATA_CADASTRO, NASCIMENTO, DEP1, CPF_DEP1, RG_DEP1, ATIVO)VALUES ([ô][Ô] & _
TXTC1.Text & [Ô],[ô][Ô] & _
TXTC2.Text & [Ô][ô],[ô][Ô] & _
TXTC3.Text & [Ô][ô],[ô][Ô] & _
TXTC4.Text & [Ô][ô],[ô][Ô] & _
TXTC5.Text & [Ô][ô],[ô][Ô] & _
TXTC6.Text & [Ô][ô],[ô][Ô] & _
TXTC7.Text & [Ô][ô],[ô][Ô] & _
TXTC8.Text & [Ô][ô],[ô][Ô] & _
TXTC9.Text & [Ô][ô],[ô][Ô] & _
TXTC10.Text & [Ô][ô],[ô][Ô] & _
TXTC11.Text & [Ô][ô],[ô][Ô] & _
TXTC12.Text & [Ô][ô],[ô][Ô] & _
TXTC13.Text & [Ô][ô],[ô][Ô] & _
TXTC14.Text & [Ô][ô],[ô][Ô] & _
TXTC15.Text & [Ô][ô],[ô][Ô] & _
TXTC16.Text & [Ô][ô],[ô][Ô] & _
TXTC17.Text & [Ô][ô],[ô][Ô] & _
TXTC18.Text & [Ô][ô]);[Ô]
.ExecuteNonQuery() [txt-color=#e80000]aqui está o erro está é mensagem abaixo [/txt-color]
End With
[txt-color=#e80000]You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near [ô]/[ô],[ô][ô],[ô][ô],[ô][ô],[ô][ô],[ô] -[ô],[ô]( ) -[ô],[ô] -[ô],[ô][ô],[ô] / /[ô],[ô][ô],[ô][ô],[ô][ô],[ô][ô],[ô] , , [ô] at line 1
[/txt-color]
amigos como resolver este erro
e desde já agradeço a todos pela ajuda
esta dando erro na sua instrução SQL, tente capturar o codigo SQL que esta retornando e posta aqui...
aqui tambem ta faltando um espaço [Ô]ATIVO)VALUES[Ô]
aqui tambem ta faltando um espaço [Ô]ATIVO)VALUES[Ô]
tenta isto
With Cnn
.Connection = MySQLConn
.CommandType = CommandType.Text
.CommandText = [Ô]INSERT INTO Usuarios [Ô] & _
[Ô](CLIENTE, ENDERECO, BAIRRO, CIDADE, UF, CEP, FONE, CELULAR, EST_CIVIL, CPF, RG, SEXO, DATA_CADASTRO, NASCIMENTO, DEP1, CPF_DEP1, RG_DEP1, ATIVO)VALUES ([ô][Ô] & _
TXTC1.Text & [Ô][ô],[ô][Ô] & _
TXTC2.Text & [Ô][ô],[ô][Ô] & _
TXTC3.Text & [Ô][ô],[ô][Ô] & _
TXTC4.Text & [Ô][ô],[ô][Ô] & _
TXTC5.Text & [Ô][ô],[ô][Ô] & _
TXTC6.Text & [Ô][ô],[ô][Ô] & _
TXTC7.Text & [Ô][ô],[ô][Ô] & _
TXTC8.Text & [Ô][ô],[ô][Ô] & _
TXTC9.Text & [Ô][ô],[ô][Ô] & _
TXTC10.Text & [Ô][ô],[ô][Ô] & _
TXTC11.Text & [Ô][ô],[ô][Ô] & _
TXTC12.Text & [Ô][ô],[ô][Ô] & _
TXTC13.Text & [Ô][ô],[ô][Ô] & _
TXTC14.Text & [Ô][ô],[ô][Ô] & _
TXTC15.Text & [Ô][ô],[ô][Ô] & _
TXTC16.Text & [Ô][ô],[ô][Ô] & _
TXTC17.Text & [Ô][ô],[ô][Ô] & _
TXTC18.Text & [Ô][ô])[Ô]
.ExecuteNonQuery()
End With
End Sub
With Cnn
.Connection = MySQLConn
.CommandType = CommandType.Text
.CommandText = [Ô]INSERT INTO Usuarios [Ô] & _
[Ô](CLIENTE, ENDERECO, BAIRRO, CIDADE, UF, CEP, FONE, CELULAR, EST_CIVIL, CPF, RG, SEXO, DATA_CADASTRO, NASCIMENTO, DEP1, CPF_DEP1, RG_DEP1, ATIVO)VALUES ([ô][Ô] & _
TXTC1.Text & [Ô][ô],[ô][Ô] & _
TXTC2.Text & [Ô][ô],[ô][Ô] & _
TXTC3.Text & [Ô][ô],[ô][Ô] & _
TXTC4.Text & [Ô][ô],[ô][Ô] & _
TXTC5.Text & [Ô][ô],[ô][Ô] & _
TXTC6.Text & [Ô][ô],[ô][Ô] & _
TXTC7.Text & [Ô][ô],[ô][Ô] & _
TXTC8.Text & [Ô][ô],[ô][Ô] & _
TXTC9.Text & [Ô][ô],[ô][Ô] & _
TXTC10.Text & [Ô][ô],[ô][Ô] & _
TXTC11.Text & [Ô][ô],[ô][Ô] & _
TXTC12.Text & [Ô][ô],[ô][Ô] & _
TXTC13.Text & [Ô][ô],[ô][Ô] & _
TXTC14.Text & [Ô][ô],[ô][Ô] & _
TXTC15.Text & [Ô][ô],[ô][Ô] & _
TXTC16.Text & [Ô][ô],[ô][Ô] & _
TXTC17.Text & [Ô][ô],[ô][Ô] & _
TXTC18.Text & [Ô][ô])[Ô]
.ExecuteNonQuery()
End With
End Sub
Tópico encerrado , respostas não são mais permitidas