ERRO AO FAZER O SELECT COM WHERE
Olá amigos,
Estou com problema quando preciso rodar o seguinte select:
Sendo que já faço um select no form load:
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.
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.
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
Cara deu erro de sintaxe...
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
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
Tenta o seguinte
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
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
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"
ENTAO NA SEGUNDA OPCAO Select * from Tabela_Nova where IdPedido= ASPAS SIMPLES" & txtpedido.Text & "ASPAS SIMPLES"
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?
Valeu Galera, o Erro foi corrigido!
Muito Obrigado.
Muito Obrigado.
Tópico encerrado , respostas não são mais permitidas