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;

　　}

　　}