got a type mismatch error on:

Set RS = DB.OpenRecordset(ReportSQL)

ReportSQL is a SQL string
any ideas?