日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時(shí)間:8:30-17:00
你可能遇到了下面的問題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營銷解決方案
VB.NET線程訪問數(shù)據(jù)庫實(shí)用技巧分享

大家通過對VB.NET編程語言的學(xué)習(xí)之后,可以知道,它在對數(shù)據(jù)庫方面的應(yīng)用時(shí)很靈活的。比如今天為大家介紹的VB.NET線程訪問數(shù)據(jù)庫的相關(guān)方法,就可以一種靈活方便的方式來實(shí)現(xiàn)。#t#

創(chuàng)新互聯(lián)公司主要從事成都做網(wǎng)站、網(wǎng)站制作、網(wǎng)頁設(shè)計(jì)、企業(yè)做網(wǎng)站、公司建網(wǎng)站等業(yè)務(wù)。立足成都服務(wù)細(xì)河,10年網(wǎng)站建設(shè)經(jīng)驗(yàn),價(jià)格優(yōu)惠、服務(wù)專業(yè),歡迎來電咨詢建站服務(wù):028-86922220

線程是操作系統(tǒng)分配處理器時(shí)間的基本單元,線程可以在單個(gè)執(zhí)行線程執(zhí)行的同時(shí)運(yùn)行多個(gè)活動(dòng),支持搶先多任務(wù)處理的操作系統(tǒng)可以創(chuàng)建多個(gè)線程并通過時(shí)間片輪轉(zhuǎn)的方式使它們同時(shí)運(yùn)行。在需要良好用戶交互的應(yīng)用以及與網(wǎng)絡(luò)和數(shù)據(jù)庫進(jìn)行通訊的應(yīng)用中,使用多線程能提供良好的交互體驗(yàn),能對用戶的要求做出快速的反應(yīng)。本文主要介紹.NET中的線程在數(shù)據(jù)庫編程中的具體應(yīng)用(用VB.NET實(shí)現(xiàn))。

VB.NET線程訪問數(shù)據(jù)庫1 創(chuàng)建數(shù)據(jù)庫訪問線程

在數(shù)據(jù)庫應(yīng)用中,特別是網(wǎng)絡(luò)數(shù)據(jù)庫訪問,因?yàn)榭赡芤L問的數(shù)據(jù)量較大,因此需要比較長的時(shí)間來得到結(jié)果,而一個(gè)良好的程序應(yīng)具有良好的交互性,在訪問數(shù)據(jù)庫時(shí)應(yīng)允許你的應(yīng)用程序?qū)τ脩舻幕顒?dòng)盡快做出響應(yīng),以提供豐富的用戶體驗(yàn)。利用多線程機(jī)制可以讓需要大量時(shí)間的操作在后臺(tái)運(yùn)行以快速響應(yīng)用戶的活動(dòng)。下面的代碼訪問數(shù)據(jù)庫并返回?cái)?shù)據(jù)表:

 
 
 
  1. Private sub GetData
    FromDataBase()  
  2. …  
  3. m_table.Clear()  
  4. m_sqlDataAdapter.
    Fill(m_table)  
  5. …  
  6. End Sub 

創(chuàng)建Thread對象的新實(shí)例,需創(chuàng)建新的線程代理.ThreadStart線程代理可以指定生成線程時(shí)要執(zhí)行的方法名,但線程代理并不實(shí)際運(yùn)行線程.創(chuàng)建ThreadStart對象時(shí),需指定線程開始執(zhí)行時(shí)要運(yùn)行的方法的指針,該方法不能接受任何參數(shù)。下面我們將上面的代碼分配給一個(gè)線程處理,并且啟動(dòng)它:

 
 
 
  1. Dim myThreadStart as ThreadStart
     =New ThreadStart(AddressOf 
    GetDataFromDataBase)  
  2. Dim myThread as Thread=New 
    Thread(myThreadStart)  
  3. myThread.Start() 

這樣當(dāng)進(jìn)行數(shù)據(jù)庫的訪問時(shí),用戶可以繼續(xù)進(jìn)行處理。

VB.NET線程訪問數(shù)據(jù)庫2 將數(shù)據(jù)庫訪問方法封裝到類

上面提到,線程要執(zhí)行的方法不能接受任何參數(shù),如果要傳入方法特定條件,可以將方法放在一個(gè)類中,在類中定義類的屬性,需要時(shí)可以設(shè)置類的屬性,然后用方法調(diào)用這些屬性以實(shí)現(xiàn)方法參數(shù)類似的功能。同時(shí),因?yàn)樯傻木€程在主應(yīng)用程序線程之外運(yùn)行,.NET Framework提供線程隔離,這時(shí)如果要用新的線程操縱主應(yīng)用程序中的對象便不被允許。***的辦法也是將線程要訪問的對象包裝在類中。下面我們創(chuàng)建一個(gè)類,封裝屬性和數(shù)據(jù)庫訪問方法:

 
 
 
  1. Public Class dealDataBase  
  2. Private m_sqlDataAdapter As 
    SqlDataAdapter  
  3. Private m_table As DataTable  
  4. Public Property setDataAdapter()
     As SqlDataAdapter  
  5. Get  
  6. setDataAdapter=m_sqlDataAdapter 
  7. End Get  
  8. Set(ByVal value As SqlDataAdapter)  
  9. m_sqlDataAdapter=value 
  10. End Set  
  11. End Property  
  12. Public Property setDataTable() 
    As DataTable  
  13. Get  
  14. setDataTable=m_table 
  15. End Get  
  16. Set(ByVal value As DataTable)  
  17. m_DataTable=value 
  18. End Set  
  19. End Property  
  20. Public sub GetDataFromDataBase()  
  21. …  
  22. m_table.Clear()  
  23. m_sqlDataAdapter.Fill(m_table)  
  24. …  
  25. End Sub  
  26. End Class  

下面是創(chuàng)建線程并運(yùn)行線程的代碼:

 
 
 
  1. Dim myDB As New dealDataBase ()  
  2. Dim myThreadStart as ThreadStart  
  3. Dim myThread as Thread  
  4. myDB.setDataAdapter=Me.DataAdapter1
     'DataAdapter1是本窗體內(nèi)定義的數(shù)據(jù)適配器  
  5. myDB.setDataTable=Me.DataTable1 
    'DataTable1是本窗體定義的數(shù)據(jù)表  
  6. …  
  7. myThreadStart=New ThreadStart
    (AddressOf myDB.GetDataFromDataBase)  
  8. myThread=New Thread(myThreadStart)  
  9. myThread.Start()  
  10. …  
  11. End Sub 

VB.NET線程訪問數(shù)據(jù)庫3 使用事件

調(diào)用了線程的start方法,并不能確保其中的方法馬上執(zhí)行完,而要得到數(shù)據(jù)訪問的結(jié)果又必須等其中的方法執(zhí)行完畢。如果在運(yùn)行線程后采用循環(huán)查詢的方法顯然影響了交互性,事件是從線程方法返回?cái)?shù)據(jù)的好方法。只要在線程方法所在的類中定義一個(gè)事件,在線程方法中發(fā)出事件,而在窗體類中生成代理。
首先在dealDataBase類聲明后加進(jìn)事件:

 
 
 
  1. Public Class dealDataBase  
  2. Public Event GetDataComplete
    (ByVal e As DtatTable)  
  3. …  
  4. End Class  
  5. 在類dealDataBase的GetDataFromDataBase()
    方法中加入發(fā)出事件的代碼,放在
    m_sqlDataAdapter.Fill(m_table)后:  
  6. Public sub GetDataFromDataBase()  
  7. …  
  8. m_sqlDataAdapter.Fill(m_table)  
  9. RasiseEvent GetDataComplete(m_table)  
  10. …  
  11. End Sub  

下面在窗體類中生成代理

 
 
 
  1. Private Sub dealData 
    (ByVal e As DataTable)  
  2. '處理數(shù)據(jù)表  
  3. End Sub  

在創(chuàng)建線程并運(yùn)行線程的代碼中進(jìn)行事件連接,事件連接代碼放在運(yùn)行線程前, dealDataBase類實(shí)例化后:

 
 
 
  1. AddHandler myDB. 
    GetDataComplete,AddressOf
     dealData   

這樣,當(dāng)線程方法執(zhí)行完畢就會(huì)發(fā)出事件,而dealData方法會(huì)響應(yīng)事件并做出處理。

VB.NET線程訪問數(shù)據(jù)庫4 同步機(jī)制

當(dāng)多個(gè)線程需要共享相同的對象時(shí),因?yàn)槊總€(gè)線程都能改變對象的狀態(tài),因此會(huì)互相破壞對方的執(zhí)行。為防止多個(gè)線程同時(shí)訪問共享對象就需要同步。.Net框架使用SyncLock…End SyncLock標(biāo)識(shí)限制線程訪問的代碼段。 SyncLock可得到一個(gè)對象引用的唯一鎖,只要將該對象傳送給SyncLock.通過得到這個(gè)唯一鎖,你可以確保多個(gè)線程不會(huì)訪問共享的數(shù)據(jù).比如要防止數(shù)據(jù)表DataTable1被多個(gè)進(jìn)程同時(shí)訪問,可以對要處理DataTable1的代碼做如下處理:

 
 
 
  1. SyncLock(DataTable1)  
  2. '處理DataTable1數(shù)據(jù)表的代碼  
  3. End SyncLock  

5 總結(jié)

VB.NET線程訪問數(shù)據(jù)庫的使用可以提高程序的效率和提供對用戶活動(dòng)的快速響應(yīng)。但線程的使用比較復(fù)雜,并有死鎖的可能,因此使用多線程一定要詳細(xì)考慮資源的要求和潛在的沖突。


網(wǎng)站題目:VB.NET線程訪問數(shù)據(jù)庫實(shí)用技巧分享
標(biāo)題鏈接:http://m.5511xx.com/article/dhechhs.html