Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

mkboy

Select Case

Recommended Posts

Estou fazendo uma busca, onde tenho diversos campos CHECK BOX, e quero que ao selecionar mais de um campo, a consulta seja realizada nos respectivos campos.Por hora estou conseguindo fazer a consulta no campo selecionado, mas nao em mais de um campo.Estou fazendo assim:

<input name="field" type="checkbox"  value="1" checked><input name="field" type="checkbox"  value="2"><input name="field" type="checkbox"  value="3">

Agora eu verifico qual ckeckbox foi selecionado pegando o valor da querystring e verificando no select abaixo:/busca.asp?query=a&B1=Buscar&consulta=resultado&field=1

IF Request.QueryString("query") <> "" AND Request.QueryString("field") <> "" THEN  SELECT CASE Request.QueryString("field")  CASE 1    Campo = "Razao Social"    CampoTabela = "b_nome"  CASE 2    Campo = "Endereço"    CampoTabela = "b_endereco"  CASE 3    Campo = "Bairro"    CampoTabela = "b_bairro"END SELECT

Quando vai um registro na query ele executa o case normal e se eu mandar varios valoresbusca.asp?query=a&B1=Buscar&consulta=resultado&field=1&field=2&field=3Ele da erro, entao eu gostaria de saber como fazer o select case para que pesquise quando vier mais de um valor pela query

Compartilhar este post


Link para o post
Compartilhar em outros sites

SELECT CASE Request.QueryString("field") CASE "1" Campo = "Razao Social" CampoTabela = "b_nome" CASE "2" Campo = "Endereço" CampoTabela = "b_endereco" CASE "3" Campo = "Bairro" CampoTabela = "b_bairro"END SELECT

Compartilhar este post


Link para o post
Compartilhar em outros sites

Ola amigo,

 

Conforme voce postou, a unica diferença seria acrescentar as aspas no numero pós CASE, fiz conforme exemplificou mas continua nao funcionando.

 

Se eu selecionar apenas um item, qualquer que seja ele busca no respectivo campo da tabela, mas se eu selecionar o primeiro e o segundo, acontece o erro abaixo:

 

ASP [/tr][tr]Tipo de erro:

Erro de tempo de execução do Microsoft VBScript (0x800A000D)

Tipos incompatíveis: '[string: "1, 2"]'

/galery/intranet/busca.asp, line 388

[/tr]

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.