Ir para conteúdo

POWERED BY:

Arquivado

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

Marcus Gemeos

em VbScript

Recommended Posts

Alguem me diz se essa lógica esta certa? É um sistema de busca onde em um campo e do lado um menu suspenso para escolher por nome ou cpf?

La no formulario coloco onchange ="enviar(n)" mesmo?

Obrigado! veja:

<script language="vbscript">	Sub enviar(x)   		Dim Opção				Opção = SelecionaInfo.SelectOpcao.value				if x = "CPF" or x="Nome" then		if Opção <> " " then		Varopçao="Select * from pesquisa_pram WHERE " & Opção & " order by Código		else 		msgbox 	"Selecione a opção"		end if		else		SelecionaInfo.submit		end if				 end Sub</script><form method="POST" name="SelecionaInfo">  <p><input type="text" name="pesquisa" size="20"><select size="1" name="SelectOpcao" onchange ="enviar(n)" style="font-family: Verdana; font-size: 10">		<% if opto <> "" then %>		<option value="<%=op(2)%>"><%=op(3)%></option>		<option>Nome</option>		<option>CPF</option>		<%else %>		<%end if %>   </select></p></form>

Compartilhar este post


Link para o post
Compartilhar em outros sites

tb nunca usei <script language="vbscript">sua sub</script>mas se funcionar, vcscript soh funfa no IE(se naum me engano)

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.