Avatar billede bodyguard Nybegynder
03. oktober 2007 - 23:47 Der er 6 kommentarer og
1 løsning

ASC og DESC funktion

Nogen der kan hjælpe mig lidt her:

<%
    If Request.Querystring("AscDesc") = "" then
        strAscDesc = "DESC"
    End if

    If Request.Querystring("SortOrder") = "" then
        strSortOrder = "titel"
    Else
        strSortOrder = ""& Request.Querystring("SortOrder") &" "& strAscDesc &""
    End if

    strSQL = "SELECT * FROM dokumenter ORDER BY "& strSortOrder &""
    objRec.Open strSQL, objConn, 3, 1, 1

    If Request.Querystring("AscDesc") = "ASC" then
        strAscDesc = "DESC"
    Else
        strAscDesc = "ASC"
    End if
%>

<a class="totallink" href="dokumenter_rediger.asp?SortOrder=id&AscDesc=<%= strAscDesc%>">ID</a>
<a class="totallink" href="dokumenter_rediger.asp?SortOrder=udgivelsesdato&AscDesc=<%= strAscDesc%>">Udgivet</a>


FEJLEN:
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in ORDER BY clause.

/cms/adm/includes/dokumenter_rediger.asp, line 91
Avatar billede bodyguard Nybegynder
03. oktober 2007 - 23:49 #1
HOV!
Det jeg prøvede var at lave ASC/DESC dynamisk:

%
    If Request.Querystring("AscDesc") = "" then
        strAscDesc = "DESC"
    End if

    If Request.Querystring("SortOrder") = "" then
        strSortOrder = "titel"
    Else
        strSortOrder = Request.Querystring("SortOrder")
    End if

    strSQL = "SELECT * FROM dokumenter ORDER BY "& strSortOrder &""& strAscDesc &""
    objRec.Open strSQL, objConn, 3, 1, 1

    If Request.Querystring("AscDesc") = "ASC" then
        strAscDesc = "DESC"
    Else
        strAscDesc = "ASC"
    End if
%>
Avatar billede w13 Novice
04. oktober 2007 - 01:12 #2
Din strSQL er jo en normal string, som så bare bliver udført i linjen efter. Så den kan sagtens sammensættes dynamisk.

<%strSQL="SELECT * FROM [dokumenter] ORDER BY "
If Request.Querystring("SortOrder")="" Then
  strSQL=strSQL&"[titel]"
Else
  strSQL=strSQL&"["&Request.Querystring("SortOrder")&"]"
End If
If Request.Querystring("AscDesc")="" Then
  strSQL=strSQL&" DESC"
Else
  strSQL=strSQL&" ASC"
End If
objRec.Open strSQL,objConn,3,1,1%>
Avatar billede w13 Novice
08. april 2008 - 11:59 #3
?
Avatar billede bodyguard Nybegynder
31. august 2009 - 21:55 #4
W13> Kom med et svar :-)
Avatar billede w13 Novice
31. august 2009 - 22:04 #5
;)
Avatar billede w13 Novice
31. august 2009 - 22:44 #6
Tak for point!
Avatar billede bodyguard Nybegynder
01. september 2009 - 00:08 #7
Så lidt undskyld den laaaaaaaaaaange vente tid...
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester