C#操作dbf

转自http://dotnet.chinaitlab.com/CSharp/838298.html

由于历史的原因,我国的上交所和深交所使用的还是dbf文件来进行行情数据的分发,关于卫星报盘系统,可以参考:http://maltig.itpub.net/post/12165/195151 这个博客中关于证券公司信息化的文章写的还是相当不错的。上交所使用的是show2003.dbf文件,而深交所使用的是SJSHQ.DBF,这种文件可以使用Visual FoxPro直接打开,查看其内容。接下来说说怎么使用C#读取其中的数据。

  使用C#读取dbf文件,推荐使用OLE DB来读取(微软官方都不推荐使用ODBC来读),首先需要下载安装Microsoft OLE DB Provider for Visual FoxPro 9.0,接下来就可以使用C#操作OLE DB,连接字符串为:

  Provider=vfpoledb;Data Source=C:\vfp;Collating Sequence=machine;

  这里C:\vfp是一个文件夹路径,要读取的dbf文件就在这个文件夹下面;当然,如果dbf是在网络共享位置,那么也可以使用网络文件夹的路径。如果要读取深交所行情的所有数据,返回一个DataSet,那么对应的函数为:

  public static DataSet ReadSJSHQ()

  {

  string strConn = @"Provider=vfpoledb;Data Source=C:\vfp;Collating Sequence=machine;";

  using (OleDbConnection myConnection = new OleDbConnection(strConn))

  {

  OleDbDataAdapter adpt = new OleDbDataAdapter("select * from SJSHQ.DBF", myConnection);

  DataSet mySet = new DataSet();

  adpt.Fill(mySet);

  myConnection.Close();

  return mySet;

  }

  }

  这个函数就可以把所有深交所的数据读取出来,如果要读取上交所的数据,那么就不会这么简单了,虽然使用这个方法把查询改成select * from show2003.dbf也能读取返回一个数据集,但是这个返回的数据集是不完整的,前面大约200多行数据没有读取出来。如果使用Visual FoxPro打开show2003.dbf文件可以查看到所有的数据内容。之所以没有返回前200多行的原因是因为dbf文件中将这些行置为删除状态了,所以如果要读取所有的数据行,那么需要设置当前读取的命令去掉删除标记。比如要读取上交所dbf文件中的所有S1列,那么对应的代码应该是:

  public static DataSet ReadShow2003S1()

  {

  string strConn = @"Provider=vfpoledb;Data Source=C:\vfp;Collating Sequence=machine;";

  using (OleDbConnection myConnection = new OleDbConnection(strConn))

  {

  myConnection.Open();

  OleDbCommand cmd = new OleDbCommand();

  cmd.Connection = myConnection;

  cmd.CommandText = "SET DELETED OFF";//去掉删除标记,拿到所有记录

  cmd.CommandType = CommandType.Text;

  cmd.ExecuteNonQuery();

  OleDbDataAdapter adpt = new OleDbDataAdapter("select s1 from show2003.dbf", myConnection);

  DataSet mySet = new DataSet();

  adpt.Fill(mySet);

  myConnection.Close();

  return mySet;

  }

  }

  如果我们要获取show2003里面的所有行所有列的数据,那么使用sql命令“select * from show2003.dbf”是会抛出异常:

  提供程序无法确定 Decimal 值。例如,该行刚刚创建,未提供 Decimal 列的默认值,并且使用者尚未设置新 Decimal 值。

  而在不读取有删除标记的行时是不会报错的,这是因为前面的行中有些列值的问题,用Visual Foxpro打开show2003.dbf文件,可以看到第一行S1为000000的数据行,其S6列是当前dbf文件数据生成的日期,比如我现在的S6值为20101209,这一列的数据定义是“数值型,宽度8,小数位数3”,据说是设计上的Bug,参见:http://blog.csdn.net/zenithyr/archive/2010/03/11/5367321.aspx,于是我们如果要正常读取这个表的话需要对第一行做特别处理。其实本来第一行就需要特殊处理的,因为第一行并不是实际的数据,第一行主要是说明这个文件产生的日期时间之类的,所有我使用的就是简单粗暴的方法,使用2个DataSet来返回这些数据,具体函数代码为:

  public static DataSet ReadShow2003(DataSet mySet0)

  {

  string strConn = @"Provider=vfpoledb;Data Source=C:\vfp;Collating Sequence=machine;";

  using (OleDbConnection myConnection = new OleDbConnection(strConn))

  {

  myConnection.Open();

  OleDbCommand cmd = new OleDbCommand();

  cmd.Connection = myConnection;

  cmd.CommandText = "SET DELETED OFF";//去掉删除标记,拿到所有记录

  cmd.CommandType = CommandType.Text;

  cmd.ExecuteNonQuery();

  //单独读取第一行

  OleDbDataAdapter adpt0 = new OleDbDataAdapter("SELECT  s1,s2,s3,s4,s5,str(s6) as s6,s11,s13,s15,s17 from show2003 where s1=\"000000\"", myConnection);//只有这几个字段有值

  adpt0.Fill(mySet0);

  //接下来读取其他行

  OleDbDataAdapter adpt = new OleDbDataAdapter("SELECT * from show2003 where s1<>\"000000\"", myConnection);

  DataSet mySet = new DataSet();

  adpt.Fill(mySet);

  myConnection.Close();

  return mySet;

  }

  }

原文地址:https://www.cnblogs.com/shiningrise/p/1974254.html