VB Code:
  1. Debug.Print data1.Recordset.NoMatch

I inseted it after the Refresh line but it still can't works. BTW, what is the meaning of Debug.Print?