Query con select case?

[Gio&Ste]

	if ord = "" then
		Visa = "SELECT * FROM News ORDER BY News_Data DESC"
	else if ord = conta then
		Visa = "SELECT * FROM News ORDER BY letto DESC"
	else if ord = last then
		Visa = "SELECT * FROM News ORDER BY last_visit DESC"
	End if
	End if
	End if

Ho un problema con una query, in una pagina ricevo un parametro ord, in base a questo parametro, voglio che mi vengano fuori i dati ordinati in base a dei criteri.

Ma quando provo ad avviare la pagina ricevo questo errore:

ADODB.Recordset error '800a0bb9'

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

Mi conviene usare un select case? Se si nel case quale parte della query mi conviene scrivere?

[DarioN1]

L'errore non è li (credo)

Posta la riga che ti dà errore . . .

[DarioN1]

Correggo , ci sono un bel pò di errori

if ord = "" then
		Visa = "SELECT * FROM News ORDER BY News_Data DESC"
	elseif ord = conta then
		Visa = "SELECT * FROM News ORDER BY letto DESC"
	elseif ord = last then
		Visa = "SELECT * FROM News ORDER BY last_visit DESC"
	End if

Prova così

[Gio&Ste]

L'errore è sempre lo stesso:

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

La linea incriminata è:
RecSet.Open Visa, objConn, adOpenDynamic, adLockOptimistic %>

Non capisco!!!

[santino83]

99% l'oggetto connessione non è stato settato o la stringa sql VISA è vuota...controlla

[Gio&Ste]

Parto da questo codice che funziona.

<% 	
	Set objConn = Server.CreateObject("ADODB.Connection")
	objConn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("/mdb-database/miodb.mdb")
	Set RecSet = Server.CreateObject("ADODB.Recordset")
	if ord = conta Then
		Visa = "SELECT * FROM News ORDER BY News_Data DESC"
	else
		Visa = "SELECT * FROM News ORDER BY letto DESC"
	End if
   	RecSet.Open Visa, objConn, adOpenDynamic, adLockOptimistic %>

Sostituisco in codice in rosso con quell'altro codice ed il risultato è quello errore. L'anomalia si verifica se clicco sul link che mi conduce alla condizione ord = conta.

[DarioN1]

stampa VISA prima di aprire il recordset , secondo me è vuota

[santino83]

quoto dario

[Gio&Ste]

Il problema era di una semplicità incredibile, eppure non cia vevo pensato la condizione if ord = "conta" e non ord = conta