ERRO AO FAZER O SELECT COM WHERE

USUARIO.EXCLUIDOS 08/12/2006 09:30:20
#188759
Olá amigos,

Estou com problema quando preciso rodar o seguinte select:


Set RY = New ADODB.Recordset
RY.Open "Select * from Tabela_Nova where IdPedido= " & txtpedido.Text & ", Conexao, adOpenDynamic, adLockBatchOptimistic"


Sendo que já faço um select no form load:

  Set RX = New ADODB.Recordset
RX.Open "Select MAX(idPedido) from Tabela_Nova ", Conexao, adOpenDynamic, adLockOptimistic
FF1 = RX.Fields(0)
txtpedido = FF1 + 1
Set RX = Nothing


O Primeiro select só funciona se tirar a clasula where, quando coloco o where me retorna o seguinte erro:

"Operação não permitida em um objeto com referencia a uma conexao fechada ou invalida"


Ps. Já tentei colocar outra variavel ao inves de RY. Já tb coloquei RX e nada.

Muito Obrigado a todos.


ALMARTI 08/12/2006 09:32:15
#188762

Set RY = New ADODB.Recordset
RY.Open "Select * from Tabela_Nova where IdPedido= "" & txtpedido.Text & ", Conexao, adOpenDynamic, adLockBatchOptimistic


Havia uma aspa em um lugar incorreto. Quando voce fechou where IdPedido= ", foi como se tivesse transformado tudo dai para frente em uma só string


USUARIO.EXCLUIDOS 08/12/2006 09:42:38
#188767
Cara deu erro de sintaxe...
ALMARTI 08/12/2006 09:45:41
#188769
Claro!
IdPedido= ""

Qual o Id que vc quer consultar?

para uma variável
por exemplo IdPedido= " & intID & ""

para numero direto
IdPedido= " & intID & "0"

Sugiro que construa suas sql antes. Por exemplo


dim strSql as String
strSql="Select * from Tabela_Nova where IdPedido= " & txtpedido.Text & ""
Set RY = New ADODB.Recordset
RY.Open strSql, Conexao, adOpenDynamic, adLockBatchOptimistic



F.A.S 08/12/2006 09:49:59
#188771
Resposta escolhida
Tenta o seguinte

Set RY = New ADODB.Recordset
RY.Open "Select * from Tabela_Nova where IdPedido= " & txtpedido.Text, Conexao


Obs: Caso o IDPEDIDO SEJA TEXTO ENTAO DEVERA SER:

Set RY = New ADODB.Recordset
RY.Open "Select * from Tabela_Nova where IdPedido= '" & txtpedido.Text & "'", Conexao


F.A.S 08/12/2006 09:52:33
#188773
OPS O FOUM NAO ACEITA ASPAS SIMPLES QUANDO VAMOS RESPONDER OS TOPICOS.
ENTAO NA SEGUNDA OPCAO Select * from Tabela_Nova where IdPedido= ASPAS SIMPLES" & txtpedido.Text & "ASPAS SIMPLES"
USUARIO.EXCLUIDOS 08/12/2006 10:05:46
#188779
Citação:

F.A.S escreveu:
OPS O FOUM NAO ACEITA ASPAS SIMPLES QUANDO VAMOS RESPONDER OS TOPICOS.
ENTAO NA SEGUNDA OPCAO Select * from Tabela_Nova where IdPedido= ASPAS SIMPLES[Ô] & txtpedido.Text & [Ô]ASPAS SIMPLES[Ô]



Aceita sim cara, é que fico meio junto com as duplas e fica ruim de ver mesmo, mas tá lá...

Vc tem duas opções, uma usar a ferramenta , que a fonte dá pra ver melhor, ou então comprar uns óculos bons....

Vou editar seu poste, e botar as tags de código, pra vc ver como fica melhor, ok?
USUARIO.EXCLUIDOS 08/12/2006 10:21:55
#188784
Valeu Galera, o Erro foi corrigido!

Muito Obrigado.
Tópico encerrado , respostas não são mais permitidas