select congela

[acrossvisual 0]

Amigos,--------------------------------------------------------------------------------------------Estas linhas Funcionam:Set objRS = objConn.Execute("SELECT * FROM Produtos WHERE UCASE(TRIM(Produtos.Nome)) = 'CADEIRA' ")--------------------------------------------------------------------------------------------Já estas não, POR QUE?????Dim CampoCampo="CADEIRA"Set objRS = objConn.Execute("SELECT * FROM Produtos WHERE UCASE(TRIM(Produtos.Nome)) = UCASE(TRIM(Campo))")Abraços :D Miguel

[Salgado 4]

Qd você insere uma variavel em uma instrução sql ela deve estar concatenada com a mesma, a instrtução SQL é uma string (ou seja é um texto), tente com essa string abaixo:

Dim Campo
Campo=Ucase(Trim("CADEIRA"))

Set objRS = objConn.Execute("SELECT * FROM Produtos WHERE UCASE(TRIM(Produtos.Nome)) = '"& Campo &"';"

QQ duvida continue postando!

 

 

Valeu?

[acrossvisual 0]

Tipo de erro:Erro de compilação do Microsoft VBScript (0x800A03EE)')' esperado/PP/FormTabProdutos.asp, line 62, column 83Set objRS = objConn.Execute("SELECT * FROM Produtos WHERE Produtos.Produto = '"& Campo &"';"----------------------------------------------------------------------------------^

[Salgado 4]

Tipo de erro:

Erro de compilação do Microsoft VBScript (0x800A03EE)

')' esperado

/PP/FormTabProdutos.asp, line 62, column 83

Set objRS = objConn.Execute("SELECT * FROM Produtos WHERE Produtos.Produto = '"& Campo &"';"

----------------------------------------------------------------------------------^

Faltou fechar os parenteses:

Set objRS = objConn.Execute("SELECT * FROM Produtos WHERE Produtos.Produto = '"& Campo &"';")

Desculpe! Falta de atenção! ;)

[acrossvisual 0]

E se tivesse mais seleções??? Explico...:Set objRS = objConn.Execute("SELECT * FROM Produtos WHERE Produtos.Nome = '"& Wopcao &"';" and Produtos.DataCadastro = '"& WDtCad &"';"and Produtos.ValorVenda = '"& WValor &"';"and Produtos.Descricao = '"& WDescricao &"';"and Produtos.Unidade = '"& WUnidade &"';")...acertei???

[acrossvisual 0]

Essas seleções são provenientes de um form no programa index.asp e vai para um form (action) formTabramo.Eu pederia se necessário, utilizar o mesmo index.asp como action no form dentro do próprio index.asp?????OBS.: não sei se deixei claro. Qq coisa tento explicar melhor!

[Salgado 4]

E se tivesse mais seleções??? Explico...:

 

Set objRS = objConn.Execute("SELECT * FROM Produtos WHERE Produtos.Nome = '"& Wopcao &"';" and Produtos.DataCadastro = '"& WDtCad &"';"

and Produtos.ValorVenda = '"& WValor &"';"

and Produtos.Descricao = '"& WDescricao &"';"

and Produtos.Unidade = '"& WUnidade &"';")

 

 

...acertei???

Quase:

Set objRS = objConn.Execute("SELECT * FROM Produtos WHERE Produtos.Nome = '"& Wopcao &"' and Produtos.DataCadastro = '"& WDtCad &"' and Produtos.ValorVenda = '"& WValor &"' and Produtos.Descricao = '"& WDescricao &"' and Produtos.Unidade = '"& WUnidade &"';")

Note que retirei os ";" pois eles "fecham" a instrução SQL, uma outra coisa que talvez tenha que ser corrigida é nos Campos String o valor que deseja encontrtar deve estar entre ' (aspas simples) e numéricos não precisa.

Sim você pode colocar no action para a mesma página, será preciso só um tratamento de existencia de retorno das variáveis, mas aconselho primeiro a se certificar do funcionamento do código antes disso.

[acrossvisual 0]

Valeu Salgado, Desculpe o incômodo!!!Abraços,Miguel B)

[acrossvisual 0]

Há, deixa eu incomodar mais um pouco. É que eu lembrei do seguinte:Veja se Acertei na montagem do SQL abaixo:-----------------------------------------------------------------------------------------Set objRS = objConn.Execute("SELECT * FROM Produtos WHERE Iff(Wopcao = "xxxxx",True,Produtos.Nome = '"& Wopcao &"');")-----------------------------------------------------------------------------------------O que estou querendo é o seguinte: Se o campo de Wopcao testado na entrada for nulo, vou montar nele "xxxxx".No SQL funcionaria assim: Se Wopcao="xxxxx" (não faz nenhum teste - entra todas as linhas), senão, testa seu conteudo com o da Tabela Produtos.Essa eu acertei, né????