用于嵌入式設(shè)備開發(fā)的數(shù)據(jù)庫Sqlce的數(shù)據(jù)讀取過程與用于電腦上的sql的讀取過程是相似的，都是經(jīng)過以下幾步：

1、建立數(shù)據(jù)連接；

2、對數(shù)據(jù)進行查詢得到結(jié)果集；

3、讀取結(jié)果集進行數(shù)據(jù)處理。

Sqlce是通過SqlCeConnection建立一個本地文件的SQLCE連接，在建立數(shù)據(jù)庫連接成功以后，通過SqlCeConnection建立SqlCeCommand對象，通過向SqlCeCommand賦予sql語句實現(xiàn)對數(shù)據(jù)庫記錄的查詢。在這里一般采用的兩種數(shù)據(jù)記錄集讀取方式：SqlCeDataReader和SqlCeDataAdapter。

在下文程序中，我將分別進行描述。

建立數(shù)據(jù)庫連接：

cn = New SqlCeConnection("Data Source=\My Documents\hycrm.sdf") 

cn.Open()‘根據(jù)查詢得到的記錄集進行逐條的處理分析。

在這種情況下一般采用SqlCeDataReader進行數(shù)據(jù)讀取：

Try Dim cmd As SqlCeCommand = cn.CreateCommand  
 
cmd.CommandText = "select CreateDate from CorporationInfo group by CreateDate order by CreateDate" 
 
Dim reader As SqlCeDataReader  
 
reader = cmd.ExecuteReader  
 
Do While reader.Read  
 
If Trim(Str(Year(reader.Item("CreateDate")))) <> m_szYear  Then  
 
TempStr = Trim(Str(Year(reader.Item("CreateDate")))) + "年度備案表"  
 
nodX = node.Nodes.Add(TempStr) SearchZh(Trim(Str(Year(reader.Item("CreateDate")))), nodX)  
 
m_szYear = Trim(Str(Year(reader.Item("CreateDate"))))  
 
End If  
 
Loop  
 
reader.Close()  
 
Catch sqlex As SqlCeException  
 
Dim sqlError As SqlCeError For Each sqlError In sqlex.Errors  
 
MessageBox.Show(sqlError.Message)  
 
Next Catch ex As Exception  
 
MessageBox.Show(ex.Message)  
 
Finally  
 
End Try‘ 

當(dāng)需要將查詢得到的記錄集在DateGrid上進行顯示的時候，就需要使用SqlCeDataAdapter對數(shù)據(jù)進行批量讀取，程序如下：

Dim sqlstr As String  
 
Dim cmd As New SqlCeCommand  
 
Dim ds As New Data  
 
Set 'cn = New SqlCeConnection("\My Documents\hycrm.sdf")  
 
'cn.Open() sqlstr = "select * from CorporationInfo”  
 
cmd = cn.CreateCommand  
 
cmd.CommandText = sqlstr Dim da As New SqlCeDataAdapter(cmd)  
 
da.Fill(ds) 

Sqlce讀取數(shù)據(jù)的過程就介紹到這里，謝謝大家！

【編輯推薦】

1. Oracle數(shù)據(jù)庫的RAC組件之緩存融合技術(shù)
2. 在存儲過程中連接遠程Oracle數(shù)據(jù)庫并進行操作
3. ORACLE數(shù)據(jù)庫PL/SQL編程之把過程與函數(shù)說透
4. 淺談修復(fù)被優(yōu)化大師Kiss掉的Oracle監(jiān)聽器的兩種方法
5. 淺析通過全面刪除Linux系統(tǒng)上Oracle文件的方式卸載Oracle數(shù)據(jù)庫