QUEBRAR QUERY SQL

AZORSCA 22/08/2012 16:27:57
#408357
Pessoal como faço para quebrar uma query SQL

A Query está muito longa é a seguinte:
oCon.Execute [Ô]Update ger001 set Nome=[ô][Ô] & txtfields(1).Text & [Ô][ô], Razao=[ô][Ô] & txtfields(2).Text & [Ô][ô],Endereco=[ô][Ô] & txtfields(3).Text & [Ô][ô], Bairro=[ô][Ô] & txtfields(4).Text & [Ô][ô], Cep=[ô][Ô] & Cep(6).Text & [Ô][ô], Telefone1=[ô][Ô] & MaskEdBox1.Text & [Ô][ô], estado=[ô][Ô] & txtfields(9).Text & [Ô][ô] where serial=[ô][Ô] & SCAvs & [Ô][ô][Ô]

Gostaria de deixar ela menor para facilitar a leitura do fonte

Obrigado
ROBSON220BASS 22/08/2012 17:03:20
#408363 Resposta escolhida
oCon.Execute([Ô]Update ger001 set Nome=[ô][Ô] & txtfields(1).Text & [Ô][ô], [Ô] & _
[Ô]Razao=[ô][Ô] & txtfields(2).Text & [Ô][ô], [Ô] & _
[Ô]Endereco=[ô][Ô] & txtfields(3).Text & [Ô][ô], [Ô] & _
[Ô]Bairro=[ô][Ô] & txtfields(4).Text & [Ô][ô], [Ô] & _
[Ô]Cep=[ô][Ô] & Cep(6).Text & [Ô][ô], [Ô] & _
[Ô]Telefone1=[ô][Ô] & MaskEdBox1.Text & [Ô][ô], [Ô] & _
[Ô]estado=[ô][Ô] & txtfields(9).Text & [Ô][ô] [Ô] & _
[Ô]where serial=[ô][Ô] & SCAvs & [Ô][ô][Ô])
KERPLUNK 22/08/2012 17:06:20
#408365
Melhor ainda seria parametrizar sua Query...
LUIZCOMINO 22/08/2012 17:06:39
#408366
ou

Dim sSql as String

sSql=[Ô]Update ger001 set Nome=[ô][Ô] & txtfields(1).Text & [Ô][ô], [Ô]
sSql= sSql & [Ô]Razao=[ô][Ô] & txtfields(2).Text & [Ô][ô], [Ô]
sSql= sSql & [Ô]Endereco=[ô][Ô] & txtfields(3).Text & [Ô][ô], [Ô]
sSql= sSql & [Ô]Bairro=[ô][Ô] & txtfields(4).Text & [Ô][ô], [Ô]
sSql= sSql & [Ô]Cep=[ô][Ô] & Cep(6).Text & [Ô][ô], [Ô]
sSql= sSql & [Ô]Telefone1=[ô][Ô] & MaskEdBox1.Text & [Ô][ô], [Ô]
sSql= sSql & [Ô]estado=[ô][Ô] & txtfields(9).Text & [Ô][ô] [Ô]
sSql= sSql & [Ô]where serial=[ô][Ô] & SCAvs & [Ô][ô][Ô])

oCon.Execute (sSql)
Tópico encerrado , respostas não são mais permitidas
Voltar