怎么判断数据集存在

如何判断数据集存在
我经常要用模块调用数据集，每次调用都要执行这个模块．反复调用效率太低．

    Dim   FileName   As   String,   AccessTable   As   String
    FileName   =   "Equipment.mdb "
    AccessTable   =   "Equipment_Material "
    Dim   rst   As   ADODB.Recordset
　用以下语句出错
    'If   rst   =   False   Then
        Set   rst   =   AboutAccess.rstInputData(FileName,   AccessTable,   "* ")
    'End   If

找了一些资料，没有解决．请教各位大侠了．


[解决办法]
NOT RST IS NOTHING