Query con Select case

[Freedom]

Ciao,

è possibile una cosa del genere:

Select case aa
   case 1
      StrSql = "select1 ....."
   case 2
      StrSql = "select2 ....."
End select


apro db...
apro RS...
   strSql 
chiudo RS...
chiudo db...

[longline]

Certamente, che ti turba?

[Freedom]

Originariamente inviato da longline
Certamente, che ti turba?

che mi dice:

Microsoft VBScript runtime error '800a000d'

Type mismatch

alla riga evidenziata in rosso

[longline]

Credevo che il problema fosse sulla creazione della stringa sql nella select, visto che le righe seguenti non sono di codice ma sono descrittive...

Posta il codice, così non si può capire.