网络收藏

请问各位侠客们，在下有一个很简单的问题，关于   vb6中的(ado)   与扩展名为（dbf)的数据库相连接的问题，最好有例子，要有明确得连接字符串

推荐阅读

应该都是一样的：参考vb6的示例程序visdata。

gz

http://expert.csdn.net/expert/topic/1814/1814703.xml?temp=.7540552  
  http://expert.csdn.net/expert/topic/2109/2109856.xml?temp=.2209436  
  http://expert.csdn.net/expert/topic/1872/1872217.xml?temp=.8565943  
  http://expert.csdn.net/expert/topic/2129/2129369.xml?temp=.9687464  
 

up

with   cnado       与oracle数据库连接     定义cnado为一个到数据库的连接对象    
                .open   "provider=oracle   provider   for   ole   db;data   source=mqph;  
                    user   id=mq1;password=302;persist   security   info=true"  
   
  end   with

up

格式一样

dim   cnnstr1   as   string  
  dim   mrc1   as   adodb.recordset  
  dim   cnn1   as   adodb.connection  
   
  cnnstr1   =   "provider=msdasql;driver=microsoft   foxpro   vfp   driver   (*.dbf);uid=;deleted=yes;null=no;collate=machine;backgroundfetch=no;exclusive=no;sourcetype=dbf;"   &   _  
  "sourcedb   =   "   &   left(txtdes,   instrrev(txtdes,   "\")   -   1)  
   
  txtsql1   =   "select   *   from   xqdmk   order   by   dsdm"  
  set   cnn1   =   new   adodb.connection  
  cnn1.open   cnnstr1  
  mrc1.cursorlocation   =   aduseclient  
  mrc1.open   txtsql1,   cnn1,   adopendynamic,   adlockoptimistic

同上