急！！！foxpro 数据库数导出问题据，解决马上结贴，100分，在线等待，不够再给！！

Question

我有一个 foxpro下的数据表，我现在想用  delphi把其中的数据导出来，在用bde 设置关联这个数据库表后，打开时要 user name, password ,有谁知道这个用户名和密码是什么？？？？？

Answer 1

给你一段程序，我用过的，绝对好用，
用adoconnection连接sql server,
ADOConnection.Connected := True;
 ADOConnection.Execute('下面的这句导入即可');
 SELECT * into bmk
 FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
 'Data Source="e:\share";User ID=Admin;Password=;Extended properties=dBase 5.0')...bmk
 这样就可以把e:\share中的bmk.dbf表导入到Sqlserver中，速度是最快的

Answer 2

楼上的兄弟，按你的意思就是用户名是： admin ，密码 为空，但是这样还是打不开啊。

Answer 3

那就用Ado控件那，连接：
  Tmp := 'Provider=MSDASQL.1;Persist Security Info=False;';
  Tmp := Tmp + 'Extended Properties="Driver={Microsoft Visual FoxPro Driver};UID=;';
  Tmp := Tmp + 'SourceDB='+数据库路径+';SourceType=DBF;Exclusive=No;'
  Tmp := Tmp + 'BackgroundFetch=Yes;Collate=Machine;Null=Yes;Deleted=Yes;"';
AdoConnection.ConnectString := Tmp;
AdoConnection.Connected := True;
就这样，然后用AdoQuery查询就是了。

Answer 4

那就用Ado控件那，连接：
  Tmp := 'Provider=MSDASQL.1;Persist Security Info=False;';
  Tmp := Tmp + 'Extended Properties="Driver={Microsoft Visual FoxPro Driver};UID=;';
  Tmp := Tmp + 'SourceDB='+数据库路径+';SourceType=DBF;Exclusive=No;'
  Tmp := Tmp + 'BackgroundFetch=Yes;Collate=Machine;Null=Yes;Deleted=Yes;"';
AdoConnection.ConnectString := Tmp;
AdoConnection.Connected := True;
就这样，然后用AdoQuery查询就是了。

Answer 5

你用BDE的话，要加入一个TDatabase控件，写入相关的连接参数,包括用户名和密码
TDatabase.LoginPrompt要设置为falsetdatabase的作用就是创建动态别名

Answer 6

Tdatabase的用法请参看Demo
C:\Program Files\Borland\Delphi5\Demos\Oracle8\Ortypes

Answer 7

你是VFP的表吗，如果是foxpro 2.5,2.6无需username,passwd