(resolvido) If Request.QueryString

[1980coelho]

If Request.QueryString("order") = "sort" then

strSortOrder = "desc"

Else

strSortOrder = "asc"

End If

duvida: como faco para quando re chamar o " Request.QueryString("order") = "sort" then " ele inverter a ordem para:

strSortOrder = "asc"

Else

strSortOrder = "desc"

ou melhor dizendo como reconhecer se for uma opcao alterar para a outra e vice-versa?

---

aguado ajuda.

RESOLUCAO:

so adicionei isso ao codigo para criar o link:

If strSortOrder = "asc" then

Response.Write ("<a href='admin.asp?mode=listgamesselected&ID=")

Response.Write (rsCategory("ID"))

Response.Write ("&field=gname&order=desc'>")

%>

LINK ASC

<%

End If

If strSortOrder = "desc" then

Response.Write ("<a href='admin.asp?mode=listgamesselected&ID=")

Response.Write (rsCategory("ID"))

Response.Write ("&field=gname&order=asc'>")

%>

LINK DESC

<%

End If

---

Editado Fevereiro 5, 2013 por 1980coelho

[lobismano]

Amigo,

E só deixar em branco onde esta o valor "sort" ou com outro valor <>"sort"

Át.

[1980coelho]

Amigo,

E só deixar em branco onde esta o valor "sort" ou com outro valor <>"sort"

Át.

não funcionou.. consigo fazer a coluna ordernar por ASC ou DESC com uma imagem correspondente a cada uma das duas opcoes, queria ao clicar em um link texto elas alternarem de uma para a outra, entendeu?

[lobismano]

Uma alternativa é utilizar cookies.

Você armazena a ordenação no cookie e depois testa com if.

if Request.Cookies("sort") = "asc" then
Response.Cookies("sort")="desc"
else
Response.Cookies("sort")="asc"
end if

At.

[1980coelho]

caiu na mesma não atualiza um unico link..

queria que no link por ex. SORT

ele coloque a coluna em ordem ASC e ao clikar novamente no mesmo link mude a ordem para DESC.

consigo fazer isso mais com um link para cada um, entendeu?

[lobismano]

Você passou o coockie na query?

select ... from ... order by Request.Cookies("sort")

[1980coelho]

sim testei.. ele coloca ao clicar na ordem crescente por exemplo ao reclicar não vai para a ordem contraria..

%>

<span style='color:#000;' onMouseOver='this.style.textDecoration="underline"' onMouseOut='this.style.textDecoration="none"'>

<%

Response.Write ("<a href='users.asp?mode=listgamesselected&ID=")

Response.Write (rsCategory("ID"))

Response.Write ("&field=gname&sort=asc'>")

%>

LINK

</a>

</span>

<%

pensei em uma alternativa mais daria muito trabalho.. criar um registro no banco de dados tipo 1 ou 0 ae daria certo mais teria que fazer isso como uma nova entrada para cada coluna.. tem que haver alguma maneira de fazer isso mais simples..

Editado Janeiro 25, 2013 por 1980coelho

[bareta]

poe um if no link... se tiver asc o link mostra desc

[1980coelho]

poe um if no link... se tiver asc o link mostra desc

não rolou.. ele aciona para uma opcao e ao clicar novamente não funciona..

[Iceguy]

Tenta isso:

If Request.QueryString("order") = "sort" Then
    If Request.Cookies("sort")="DESC" Then
        Response.Cookies("sort") = "ASC"
    Else
        Response.Cookies("sort") = "DESC"
    End If
End If

[1980coelho]

Tenta isso:

If Request.QueryString("order") = "sort" Then
    If Request.Cookies("sort")="DESC" Then
        Response.Cookies("sort") = "ASC"
    Else
        Response.Cookies("sort") = "DESC"
    End If
End If

não rolou.. tipo consigo fazer o sort order usando 2 imagens diferentes ou dois links ae rola na boa.. agora não estou sabendo fazer o mesmo link alternar entre uma opcao e outra.. segue o meu codigo abaixo..

strSortField = Request.QueryString("field")

Select Case LCase(strSortField)

Case "name", "category"

strSortField = strSortField

Case Else

strSortField = "name"

End Select

Select Case LCase(Request.QueryString("order"))

Case "asc"

strSortOrder = "desc"

Case Else

strSortOrder = "asc"

End Select

strSQL = "SELECT *"

strSQL = strSQL & " FROM tblGames"

strSQL = strSQL & " WHERE category =" & strID

strSQL = strSQL & " ORDER BY [" & strSortField & "] " & strSortOrder & ";"

Set rsGames = Server.CreateObject("ADODB.Recordset")

rsGames.Open strSQL, adoCon

---

'GameLink

Response.Write ("<tr><td align='right'>")

Response.Write ("<font size='1'>")

Response.Write ("<a href='admin.asp?mode=selected&ID=")

Response.Write (rsCategory("ID"))

Response.Write ("&field=name&order=asc'>")

Response.Write ("<img src='images/sortASC.png' width='10px' height='10px'>")

Response.Write ("</a>")

Response.Write ("&nbsp;&nbsp;")

Response.Write ("<a href='admin.asp?mode=selected&ID=")

Response.Write (rsCategory("ID"))

Response.Write ("&field=name&order=desc'>")

Response.Write ("<img src='images/sortDESC.png' width='10px' height='10px'>")

Response.Write ("</font>")

Response.Write ("</a>")

---

[bareta]

lol...

if order = "asc"
Response.Write ("&field=gname&sort=desc'>")
else
Response.Write ("&field=gname&sort=asc'>")
end if