如何动态绑定数据源（up有分）

我用dao，动态绑定数据源，但对datasource附值总是不行，  
  如:  
  dim   db   as   database  
  dim   rs   as   recordset  
  set   db=opendatabase("H:\nwith",false,false,"foxpro   3.0:")  
  set   rs=db.openrecordset("records")  
  set   text1.datasource=rs  
  它老是提示   set   text1.datasource=rs出错？ 问题点数：70、回复次数：1Top

1 楼flashasp（flashasp）回复于 2003-02-01 22:34:21 得分 70

我是用DataGrid1绑定的刚测试通过的，我的为SQLSERVER  
   
  Dim   rs   As   New   ADODB.Recordset  
  Dim   cn   As   New   ADODB.Connection  
  cn.Open   "Provider=SQLOLEDB.1;Password=elite;User   ID=sa;Initial   Catalog=his;Data   Source=jian"    
  rs.Open   "select   *   from   t_user",   cn,   adOpenKeyset,   adLockOptimistic  
  Set   DataGrid1.DataSource   =   rs  
  DataGrid1.Refresh  
  Top

相关问题

• 数据
• datagrid
• db
• 动态绑定数据源
• datasource
• rs
• cn
• open
• set text
• new adodb

• 帖主：wolaiye3
• flashasp

• Visual Basic类图书
• Visual Basic类源码下载