俺这段代码有错吗?如何总过不去

俺这段代码有错吗?怎么总过不去SetcnNewADODB.Connectioncn.OpenProviderMSDASQL.1PersistSecurityInf

俺这段代码有错吗?怎么总过不去
Set   cn   =   New   ADODB.Connection
  cn.Open   "Provider=MSDASQL.1;Persist   Security   Info=False;User   ID=sa;Data   Source=Sales;Initial   Catalog=sales "
  Set   n_rs   =   New   ADODB.Recordset
  n_rs.Open   "select   *   from   table1 ",   cn,   adOpenDynamic,   adLockOptimistic
  DataGrid1.DataSource   =   rs

执行到最后一句DataGrid1,说没有这个方法或属性。可写的时候是敏感自己出来的DataSource   ,怎么会没有哪?郁闷死了

[解决办法]
hh
[解决办法]
set DataGrid1.DataSource = rs