Recherche:

comment ca toujours pas ? ca ne t'affiche aucun résultat ?
T sur que ta fonction fonctionne (ramène un résultat) ?

function quelTypeCadreFiscal(TypeCadreFiscal)

Set rsBase_TypeCF= Server.CreateObject("ADODB.Recordset")
requeteTypeCF = "SELECT ....."

rsBase_TypeCF.Open requeteTypeCF, baseES, 0, 1...