vb.netdb的簡單介紹

vb.net如何連接遠程db2數(shù)據(jù)庫

如果要程序直接連接DB2數(shù)據(jù)庫,必須要有連接數(shù)據(jù)庫的驅(qū)動程序,連接的代碼,你可以參考如下(以前用C#寫的,你改成VB.NET即可,ODBC連接對象)

創(chuàng)新互聯(lián)建站長期為上千余家客戶提供的網(wǎng)站建設服務,團隊從業(yè)經(jīng)驗10年,關注不同地域、不同群體,并針對不同對象提供差異化的產(chǎn)品和服務;打造開放共贏平臺,與合作伙伴共同營造健康的互聯(lián)網(wǎng)生態(tài)環(huán)境。為羅田企業(yè)提供專業(yè)的網(wǎng)站制作、成都網(wǎng)站制作,羅田網(wǎng)站改版等技術服務。擁有十多年豐富建站經(jīng)驗和眾多成功案例,為您定制開發(fā)。

public?OdbcConnection?Db2Conn()

{

string?str?=?"DRIVER=IBM?DB2?ODBC?DRIVER;UID=db2admin;PWD=db2admin;AUTHENTICATION=SERVER;PORT=50000;HOSTNAME=192.168.100.98;PROTOCOL=TCPIP;DATABASE=YCDATA";

OdbcConnection?Conn?=?new?OdbcConnection(str);

return?Conn;

}

如果你是開發(fā)桌面程序而又不想在客戶端安裝數(shù)據(jù)庫的驅(qū)動程序,那么你可以采用web網(wǎng)站(含webservice)或者remoting方式,只需要在服務端安裝驅(qū)動即可

vb.net的dbgrid控件的網(wǎng)格線該如何設置

1.DataGrid 控件是一種類似于電子數(shù)據(jù)表的綁定控件,可以顯示一系列行和列來表示 Recordset 對象的記錄和字段??梢允褂?DataGrid 來創(chuàng)建一個允許最終用戶閱讀和寫入到絕大多數(shù)數(shù)據(jù)庫的應用程序。DataGrid 控件可以在設計時快速進行配置,只需少量代碼或無需代碼。當在設計時設置了DataGrid 控件的 DataSource 屬性后,就會用數(shù)據(jù)源的記錄集來自動填充該控件,以及自動設置該控件的列標頭。然后您就可以編輯該網(wǎng)格的列;刪除、重新安排、添加列標頭、或者調(diào)整任意一列的寬度。

2.在運行時,可以在程序中切換 DataSource 來察看不同的表,或者可以修改當前數(shù)據(jù)庫的查詢,以返回一個不同的記錄集合。

注意 DataGrid 控件與 Visual Basic 5.0中的 DBGrid 是代碼兼容的,除了一個例外:DataGrid 控件不支持 DBGrid 的“解除綁定模式”概念。DBGrid 控件包括在 Visual Basic 的 Tools 目錄中。

可能的用法

查看和編輯在遠程或本地數(shù)據(jù)庫中的數(shù)據(jù)。

與另一個數(shù)據(jù)綁定的控件(諸如 DataList 控件)聯(lián)合使用,使用DataGrid控件來顯示一個表的記錄,這個表通過一個公共字段鏈接到由第二個數(shù)據(jù)綁定控件所顯示的表。

3.使用 DataGrid 控件的設計時特性

可以不編寫任何代碼,只通過使用 DataGrid 控件的設計時特性來創(chuàng)建一個數(shù)據(jù)庫應用程序。下面的說明概要地說明了在實現(xiàn) DataGrid 控件的典型應用時的一般步驟。完整的循序漸進的指示,請參閱主題“DataGrid 方案1: 使用 DataGrid 控件創(chuàng)建一個簡單數(shù)據(jù)庫應用程序”。

要在設計時實現(xiàn)一個 DataGrid 控件

1. 為要訪問的數(shù)據(jù)庫創(chuàng)建一個 Microsoft 數(shù)據(jù)鏈接 (.MDL) 文件。請參閱“創(chuàng)建 Northwind OLE DB 數(shù)據(jù)鏈接”主題,以獲得一個示例。

2. 在窗體上放置一個 ADO Data 控件,并將其 ConnectionString 屬性設置為在第 1 步中所創(chuàng)建的OLE DB 數(shù)據(jù)源。

3. 在這個 Ado Data 控件的 RecordSource 屬性中輸入一條將返回一個記

錄集的 SQL 語句。例如,Select * From MyTableName Where CustID = 12

4. 在窗體上放置一個 DataGrid 控件,并將其 DataSource 屬性設置為這個 ADO Data 控件。

5. 右鍵單擊該 DataGrid 控件,然后單擊“檢索字段”。

6. 右鍵單擊該 DataGrid 控件,然后單擊“編輯”。

7. 重新設置該網(wǎng)格的大小、刪除或添加網(wǎng)格的列。

8. 右鍵單擊該 DataGrid 控件,然后單擊“屬性”。

9. 使用“屬性頁”對話框來設置該控件的適當?shù)膶傩?,將該網(wǎng)格配置為所需的外觀和行為。

在運行時更改顯示的數(shù)據(jù)

在創(chuàng)建了一個使用設計時特性的網(wǎng)格后,也可以在運行時動態(tài)地更改該網(wǎng)格的數(shù)據(jù)源。下面介紹實現(xiàn)這一功能的通常方法。

更改 DataSource 的RecordSource

更改所顯示的數(shù)據(jù)的最通常方法是改變該 DataSource 的查詢。例如,如果DataGrid 控件使用一個ADO Data控件作為其 DataSource,則重寫RecordSource和刷新該ADO Data 控件都將改變所顯示的數(shù)據(jù)。

' ADO Data 控件連接的是 Northwind 數(shù)據(jù)庫的' Products 表。新查詢查找所有

' SupplierID = 12 的記錄。

Dim strQuery As String

strQuery = "SELECT * FROM Suppliers WHERE SupplierID = 12"

Adodc1.RecordSource = strQuery

Adodc1.Refresh

更改 DataSource

在運行時,可以將 DataSource 屬性重新設置為一個不同的數(shù)據(jù)源。例如,您可能具有若干個 ADO Data 控件,每個控件連接不同的數(shù)據(jù)庫,或設置為不同的 RecordSource 屬性??梢院唵蔚貙?DataSource 從一個 ADO Data控件重新設置為另一個 ADO Data 控件:

' 將 DataSource 重新設置為一個連接到 Pubs 數(shù)據(jù)庫的、

' 使用 Authors 表的 ADO Data 控件。

Set DataGrid1.DataSource = adoPubsAuthors

重新綁定 DataSource

當將 DataGrid 控件用于一個遠程數(shù)據(jù)庫,諸如 SQLServer 時,可以改變表的結(jié)構(gòu)。例如,可以給這個表添加一個字段。在這種情形下,可以調(diào)用Rebind 方法根據(jù)新的結(jié)構(gòu)來重新創(chuàng)建該網(wǎng)格。注意,如果已經(jīng)在設計時改變了這個列的布局,DataGrid 控件將會試圖重新創(chuàng)建當前的布局,包括任何空的列。不過,通過首先調(diào)用 ClearFields 方法,可以強制該網(wǎng)格重新設置所有的列。

從 DataGrid 返回值

在 DataGrid 被連接到一個數(shù)據(jù)庫后,可能想要監(jiān)視用戶單擊了哪一個單元??梢允褂?RowColChange 事件——而不是 Click 事件。如下所示:

Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)

' 顯示用戶所單擊的單元的文字、行和列的信息。

Debug.Print DataGrid1.Text; DataGrid1.Row; DataGrid1.Col

End Sub

使用 CellText 和 CellValue 方法

當一個列使用 NumberFormat 屬性設置格式后,CellText 和 CellValue 屬性是很有用的。NumberFormat 屬性不必更改實際的數(shù)據(jù)格式就可以更改任何包含數(shù)字的列的格式。例如,給定一個網(wǎng)格,其中包含一個名為 ProductID的、包含整數(shù)的列。下面的代碼將使 DataGrid 以"P-0000" 的格式來顯示數(shù)據(jù)。換句話說,盡管在 ProductID 字段中所包含的實際數(shù)值為 "3",但該網(wǎng)格所顯示的值將是 "P-0003"。

Private Sub Form_Load()

DataGrid1.Columns("ProductID").NumberFormat = "P-0000"

End Sub

要返回數(shù)據(jù)庫中所包含的實際值,應使用 CellValue 方法,如下所示:

Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)

Debug.Print _

DataGrid1.Columns("ProductID").CellValue(DataGrid1.Bookmark)

End Sub

VB.NET連接accdb數(shù)據(jù)庫的疑問

那是你的路徑寫錯了,沒有指定數(shù)據(jù)庫的完整路徑,在當前目錄下的數(shù)據(jù)庫要取當前的路徑來指定數(shù)據(jù)庫。

以下幫你改好的路徑名:

Conn.ConnectionString ="provider=Microsoft.ACE.OLEDB.12.0;Data source=" Application.StartupPath "\dbRNA.accdb"

使用VB.net實現(xiàn)sql數(shù)據(jù)庫的備份與恢復代碼

Private Sub Button _Click(ByVal sender As System Object ByVal e As System EventArgs) Handles Button Click 備份數(shù)據(jù)庫 BACKUP DATABASE Test TO DISK= C:\Backup WITH Format Dim cn As SqlConnection Dim cm As SqlCommand cn = getDB() cm = New SqlCommand( BACKUP DATABASE JXbase TO DISK= C:\Backup WITH Format cn) cn Open() cm ExecuteNonQuery() MsgBox( 備份成功 ) cn Close()

End Sub

恢復 Private Sub Button _Click(ByVal sender As System Object ByVal e As System EventArgs) Handles Button Click Dim cn As New SqlConnection Dim cn As New SqlConnection Dim mydr As SqlDataReader Dim str As String

Dim tmpConnectionString As String = Data Source=JJK;Initial Catalog=master;Integrated Security=True cn ConnectionString = tmpConnectionString cn ConnectionString = tmpConnectionString cn Open() cn Open() Dim cm As SqlCommand = New SqlCommand( select spid from master sysprocesses where dbid=db_id( JXbase ) cn) mydr = cm ExecuteReader()

Dim cm As SqlCommand = New SqlCommand() cm Connection = cn

While (mydr Read()) 殺死進程

str = kill mydr( spid ) ToString() cm CommandText = str cm CommandType = CommandType Text Application DoEvents() cm ExecuteNonQuery() 殺進程 End While mydr Close() cm = New SqlCommand( RESTORE DATABASE JXbase FROM DISK= C:\Backup cn) 恢復備份 cm ExecuteNonQuery() MsgBox( 恢復成功成功 ) cn Close() cn Close()

lishixinzhi/Article/program/net/201311/12901

本文題目:vb.netdb的簡單介紹
URL地址:http://muchs.cn/article10/dohdpgo.html

成都網(wǎng)站建設公司_創(chuàng)新互聯(lián),為您提供企業(yè)建站、網(wǎng)頁設計公司、動態(tài)網(wǎng)站品牌網(wǎng)站建設、外貿(mào)網(wǎng)站建設網(wǎng)站改版

廣告

聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)

成都定制網(wǎng)站網(wǎng)頁設計