LERDO NO INSERT
Boa noite, estou com problema do sistema ficar lerdo ao realizar insert.
Banco de dados é mysql
faco conecao com odbc 5.1
faço os insert direto ex:
sSql = [Ô][Ô]
sSql = [Ô]INSERT XXX SET [Ô]
sSql = sSql & [Ô]CodigoVenda = [ô][Ô] & txtInvoiceNo.Text & [Ô][ô],[Ô]
sSql = sSql & [Ô]Data = [ô][Ô] & Format(PDataServidor, [Ô]YYYY-MM-DD[Ô]) & [Ô][ô],[Ô]
sSql = sSql & [Ô]Status = [ô][Ô] & [Ô]Vendido[Ô] & [Ô][ô],[Ô]
sSql = sSql & [Ô]Filial = [ô][Ô] & CodigoLoja & [Ô][ô],[Ô]
sSql = sSql & [Ô]CdCliente = [ô][Ô] & txt_Codigo.Text & [Ô][ô][Ô]
Set rs = New Recordset
rs.Open sSql, cnn
alguém tem alguma idéia do que possa ser?
Obrigado
Banco de dados é mysql
faco conecao com odbc 5.1
faço os insert direto ex:
sSql = [Ô][Ô]
sSql = [Ô]INSERT XXX SET [Ô]
sSql = sSql & [Ô]CodigoVenda = [ô][Ô] & txtInvoiceNo.Text & [Ô][ô],[Ô]
sSql = sSql & [Ô]Data = [ô][Ô] & Format(PDataServidor, [Ô]YYYY-MM-DD[Ô]) & [Ô][ô],[Ô]
sSql = sSql & [Ô]Status = [ô][Ô] & [Ô]Vendido[Ô] & [Ô][ô],[Ô]
sSql = sSql & [Ô]Filial = [ô][Ô] & CodigoLoja & [Ô][ô],[Ô]
sSql = sSql & [Ô]CdCliente = [ô][Ô] & txt_Codigo.Text & [Ô][ô][Ô]
Set rs = New Recordset
rs.Open sSql, cnn
alguém tem alguma idéia do que possa ser?
Obrigado
Olha seu insert está errado
veja como deve ser
veja como deve ser
sSQL = [Ô]insert into TABELA (campo1, campo2, campo2) values ([ô]dados1[ô],[ô]dados2[ô],[ô]dados3[ô])[Ô]
Marcelo ainda não testei mais e para eu usar um update com where?
e um select com 2 where
Outra coisa marcelo
se eu uso
Set rs = New Recordset
rs.Open sSql, cnn
o botao possui uns 5 insert para casa insert usso o new recordset?
e um select com 2 where
Outra coisa marcelo
se eu uso
Set rs = New Recordset
rs.Open sSql, cnn
o botao possui uns 5 insert para casa insert usso o new recordset?
bom vc possui varias duvidas eim
primeiro resolva o insert, que é da forma que postei acima.
quanto ao update com where o menudo ja postou, mas a estrutura é esta:
update tabela set campo2 = [ô]dado2[ô], campo3 = [ô]dado3[ô] where campo1 = [ô]id do campo[ô]
quanto ao select com dois where, na verdade não serão dois where mas sim um where com and
ex:
select * from tabela where campo1 = [ô]1[ô] and campo2 = [ô]2[ô]
vc não precisa setar todas as vezes desde que feche o recordset
Set rs = New Recordset
rs.Open sSql1, cnn
rs.Close
rs.Open sSql2, cnn
rs.close
primeiro resolva o insert, que é da forma que postei acima.
quanto ao update com where o menudo ja postou, mas a estrutura é esta:
update tabela set campo2 = [ô]dado2[ô], campo3 = [ô]dado3[ô] where campo1 = [ô]id do campo[ô]
quanto ao select com dois where, na verdade não serão dois where mas sim um where com and
ex:
select * from tabela where campo1 = [ô]1[ô] and campo2 = [ô]2[ô]
vc não precisa setar todas as vezes desde que feche o recordset
Set rs = New Recordset
rs.Open sSql1, cnn
rs.Close
rs.Open sSql2, cnn
rs.close
Tópico encerrado , respostas não são mais permitidas