Hvordan vælger jeg ORDER BY DetEne eller DetAndet?

Jeg har en formular, som virker fint:

Man kan fra en select-boks vælge det antal visninger, som man vil have trukket ud på siden: 2, 3, 4, 5 eller alle.

Jeg vil så gerne have, at brugeren skal kunne vælge, om visningen skal være alfabetisk eller efter ID. Jeg har prøvet følgende:

<table border="0" cellpadding="4" cellspacing="0" style="border: 1 solid #000000" width="100%" span class="tekst11w tdmenu">
    <tr>
        <form method="POST" action ="default.asp">
            <td><b>Jeg vil se:</b>&nbsp;&nbsp;
            <select size="1" name="antal_visninger" class="input">
                <option value="2" <% If Request.Form("antal_visninger") = 2 Then Response.Write("selected")%>>2 medlemmer</option>
                <option value="3" <% If Request.Form("antal_visninger") = 3 Then Response.Write("selected")%>>3 medlemmer</option>
                <option value="4" <% If Request.Form("antal_visninger") = 4 Then Response.Write("selected")%>>4 medlemmer</option>
                <option value="5" <% If Request.Form("antal_visninger") = 5 Then Response.Write("selected")%>>5 medlemmer</option>
                <option value="1000" <% If Request.Form("antal_visninger") = 1000 Then Response.Write("SELECTED")%>>alle medlemmer</option>
            </select>

            <b>&nbsp;&nbsp;sorteret&nbsp;&nbsp;</b><input type="radio" value="alpha" checked name="sort_by">&nbsp;&nbsp;alfabetisk&nbsp;&nbsp;<input type="radio" value="order_by_ID" name="sort_by">&nbsp;&nbsp;efter ID

            &nbsp;&nbsp;<input type="submit" name="antal" value="Opdater" class="input1">
            </td>
        </form>
    </tr>
</table><br>

<%

'HENTER VÆRDIEN FRA FORMEN

vChoise = Request.Form("sort_by")

If vChoise = "alpha" Then
    vChoise = "username"
Else
    vChoise = "userID"
End If

'UDSKRIVER DET VALGTE ANTAL VISNINGER

antal_visninger = Request.Form("antal_visninger")
If antal_visninger = 2 Then
    strSQL = "SELECT TOP 2 userID, username, created, lastseen, showstatus FROM profiles ORDER BY vChoise"
    Set RS = Conn.Execute (strSQL)
End If

If antal_visninger = 3 Then
    strSQL = "SELECT TOP 3  userID, username, created, lastseen, showstatus FROM profiles ORDER BY vChoise"
    Set RS = Conn.Execute (strSQL)
End If

If antal_visninger = 4 Then
    strSQL = "SELECT TOP 4  userID, username, created, lastseen, showstatus FROM profiles ORDER BY vChoise"
    Set RS = Conn.Execute (strSQL)
End If

If antal_visninger = 5 Then
    strSQL = "SELECT TOP 5  userID, username, created, lastseen, showstatus FROM profiles ORDER BY vChoise"
    Set RS = Conn.Execute (strSQL)
End If

If antal_visninger = "1000" Then
    strSQL = "SELECT * FROM profiles ORDER BY username"
    Set RS = Conn.Execute (strSQL)
End If


- men det giver denne fejl:

Microsoft OLE DB Provider for ODBC Drivers error '80040e10'

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.

default.asp, line 97

If antal_visninger = 3 Then
    strSQL = "SELECT TOP 3  userID, username, created, lastseen, showstatus FROM profiles ORDER BY vChoise"
    Set RS = Conn.Execute (strSQL) ' <-------- LINIE 97
End If

Hvad går der galt?