Não estou entendendo como fazer

[theoperations 0]

Alguém pode me ajudar a fazer um select que deve funcionar da seguinte forma, por exemplo um usuário tem a opção de buscar por nome e estado , se ele digitar o nome e não escolher o estado ele traz todas as pessoas indiferente de estado. Tentei fazer alguns testes mas não consegui, alguém sabe como ficaria o código ? Poderia utilizar um if sei la ?Obrigado,Operations

[cjunior2k 0]

Pode Fazer assim ....

 

varNome =  request.Form("txtNome")varEstado=  request.Form("txtEstado")if varEstado="" thensql = "SELECT pessoas FROM [tabela] WHERE nome = "& varNomeElsesql = "SELECT pessoas FROM [tabela] WHERE nome = "& varNome & " and estado = " & varEstadoend if

Ve ai se Funciona...

 

Abraços

[theoperations 0]

Valeu, vou testar...Operations

[theoperations 0]

Obrigado, estou tentando fazer mas com alguns campos a mais e não sei se esta certo.Olhem: <% varestado = request.Form("estado") varcidade = request.Form("cidade") varsexo = request.form("sexo") varidadei = request.form("idadei") varidadef = request.form("idadef") set rs=Server.CreateObject("ADODB.Recordset") if varestado = "" then rs.Open "SELECT * FROM aolcad WHERE sexo = '"& VarSexo &"' and estado = '"& VarEstado &"' ", "DSN=aol; UID=; PWS=;", 3, 3 else rs.Open "SELECT * FROM aolcad WHERE sexo = '"& VarSexo &"' and estado = '"& varestado &"' order by data desc ", "DSN=aol; UID=; PWS=;", 3, 3 dim varmensagem varmensagem = rs("mensagem") do while not rs.EOF %>usuario: <%=rs("usuario")%><br>data de cadastro: <%=rs("data")%><br><% if varmensagem <> "" then %> mensagem: <%=varmensagem%> <% else %> Nenhuma mensagem escrita <% end if %><br><br> <% rs.MoveNext Loop Set rs = Nothing end if %>Alguém pode me ajudar, esta certo ou algo errado ?Operations

[mebkocznski 0]

Cara....

 

Até pode funcionar, mas isso pode ficat muito complicado de montar quando você tiver muitos campos...

 

tente montar a ISntrução Select antes de abrir o Recordset, mais ou menos assim:

 

Dim STRSQLIf Request("Nome") <> "" then      If StrSQL = "" then          STRSQL = " nome like '%" & Request("nome") & "'%"        else          STRSQL = STRSQL & " and nome like '%" & Request("nome") & "'%"      End ifEnd ifIf Request("Estado") <> "" then      If StrSQL = "" then          STRSQL = " estado = '" & Request("estado") & "'"        else          STRSQL = STRSQL & " and estado ='" & Request("estado") & "'"      End ifEnd ifIf Request("cidade") <> "" then      If StrSQL = "" then          STRSQL = " cidade like '%" & Request("cidade") & "'%"        else          STRSQL = STRSQL & " and cidade like '%" & Request("cidade") & "'%"      End ifEnd ifIf Request("Bairro") <> "" then      If StrSQL = "" then          STRSQL = " bairro like '%" & Request("bairro") & "'%"        else          STRSQL = STRSQL & " and bairro like '%" & Request("bairro") & "'%"      End ifEnd ifORs.Open SRRSQL,oConn,2,2,1

 

Falow !!!!!