使用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;
}
}
至此,我們已經將深交所和上交所的行情文件都讀取出來了,接下來就是做其他邏輯處理~~~~~~