Soluzione!!!!!!
Questa Rootin e testata in VB e funziona e al 99,9 % dovrebbe vunzionare in asp.
dim myconn as new ADODB.Connection
dim myrs as New ADODB.Recordset
dim mysql as string
dim myrows as long

mycon.open "DSN=MyODBCsample"
mySQL="Select * from user"
myrs.source=mysql
Set myrs.ActiveConnection=myconn
myrs.CursorLocation=adUserClient
myrs.open
myrows=myrs.recordCount
myrs.close
myconn.close

'il Tutto e passare i parametri in questo modo per aprire un recordset su VB Funziona ma su asp non l'ho ancora testata.
Ciao.