Code:
  DE1.rsCommand3.Open "SELECT * FROM tbl", con, adOpenDynamic, adLockOptimistic
     If DE1.rsCommand3.EOF <> True Then
     Me.MousePointer = vbHourglass
     
     Set rpt.DataSource = DE1.rsCommand3
       With rptCheckpointsReport.Sections("Section2")
        .Controls("lblDateIssued").Caption = "date" + DE1.rsCommand3.Fields("lblDateIssued").Value
      End With
error msg:
Item cannot be found in the collection corresponding to the requested name or ordinal

what's wrong?