cintiadel

eu faria assim:

RS = CONEXAO.EXECUTE("SELECT TOP 50 FROM tabela WHERE local='" & REQUEST.FORM("local") & "' ORDER BY REQUEST.FORM("FormRadio")

esse FormRadio vai ser o radio que vai indicar se é para listar pelo value=MelhorCozinha ou pelo value=MaisVotados

os values do FormRadio serão os nomes das tableFields, mas vc pode usar replace, caso queira

filtro = REQUEST.FORM("FormRadio")
filtro = replace(filtro,"mais votados","tableFieldMaisVotados")
filtro = replace(filtro,"melhor cozinha","tableFieldMelhorCozinha")

daí, no lugar do
ORDER BY REQUEST.FORM("FormRadio")
vc coloca
ORDER BY filtro

Essa grafia do ORDER BY filtro não tenho certeza, dê uma olhada sobre como colocar variável nesse tiupo de instrução

já consegui solucionar valeu

use aquele javascript drop down que serve de menu com cada <OPTION> apontando para a mesma url, mas com a querystring diferente

http://www.msfrontpa...fp/dropdown.htm

daí em vez de vc apontar cada um para uma página diferente, vc aponta todos para a mesma página, mas com uma querystring diferente, experimenta com o ID de cada restaurante.

daí as urls seriam:
restaurantes.asp?id=1
restaurantes.asp?id=2
restaurantes.asp?id=3
restaurantes.asp?id=4
(...)

depois vc fazer uma pg com uma SQL assim:

RS = CONEXAO.EXECUTE ("SELECT * FROM tabela WHERE id=" & SELECT.QUERYSTRING("id"))

daí é só espalhar os <%=RS("campo_1")%>, <%=RS("campo_2")%>, <%=RS("campo_3")%>... nas tags "value" de cada componente form.

fui claro ou viajei na maionese???

foi claro sim, mas sao quase 3000 restaurantes como eu vou fazer isso com tres mil um por um nao da, pelo q vc disse eu terei q fazer isso pra cada um é isso?
restaurantes.asp?id=1

já resolvi valeu

coloca o
<form ... até o </form>

a instrução para fazer o update

os nomes das colunas, de preferência copie e cole aqui.

o que quer dizer ". * todos os campos devem ser preenchidos."
por que o idText não tem nada?

coloque aí q eu vou ver por qeu não tá indo

eu ja consegui solucionar, mas valeu pela tentativa.
myselupd= "update Textos set txtPesq='" & request("txtPesq") & "', txtHome='" & request("txtHome") & "' where idText='" &Request("idText") &"' "
'response.Write(myselupd)
db.execute myselupd

coloca o
<form ... até o </form>

a instrução para fazer o update

os nomes das colunas, de preferência copie e cole aqui.

o que quer dizer ". * todos os campos devem ser preenchidos."
por que o idText não tem nada?

coloque aí q eu vou ver por qeu não tá indo

eu ja consegui solucionar, mas valeu pela tentativa.
myselupd= "update Textos set txtPesq='" & request("txtPesq") & "', txtD='" & request("txtHome") & "' where idText='" &Request("idText") &"' "
'response.Write(myselupd)
db.execute myselupd

já solucionei valeu

sugeri colocar as aspas, perceba que no seu codigo tá sem as aspas

no mais, confira os nomes dos campos de formulários, e as table fields

às vezes erros de digitação ou incompatibilidades entre os nomes das colunas e a instrução escrita geram isso:

Será que tá certo isso?
idText='" &idText&"' "
ID numérico não tem o apóstrofo
where idText=" & idText
isso mesmo, não tem aspas no final. A última aspas fecha depois do sinal de igualdade

campos do formulário (confira lá):
txtPesq
txtHome

Faz diferença enre maiúsculas e minúsculas

mas acredito que seja o problena naquele idText='" &idText&"' ". campos numéricos não têm o apóstrofo

Os nomes dos campos rs.fields estão corretos já verifiquei, mesmo fazendo do jeito q vc falou ele nao ta pegando codigo e nem atualizando.