if you change it to cn.EstablishConnection rdDriverPrompt and select the driver manually, do you get any errors...
Quote Originally Posted by hari_vb
Dim rs, rs1 As rdoResultset
And you need to change the declaration as in VB you should specify the data type for each variable, so, it should be
vb Code:
  1. Dim rs As rdoResultset, rs1 As rdoResultset