vb點(diǎn)虐 連接數(shù)據(jù)塊 vb6連接數(shù)據(jù)庫(kù)

vb點(diǎn)虐 使用模塊連接數(shù)據(jù)庫(kù)

你說(shuō)這么一大篇全是業(yè)務(wù)邏輯，沒(méi)說(shuō)明你遇到的技術(shù)性問(wèn)題在哪

成都創(chuàng)新互聯(lián)于2013年創(chuàng)立，先為王屋等服務(wù)建站，王屋等地企業(yè)，進(jìn)行企業(yè)商務(wù)咨詢服務(wù)。為王屋企業(yè)網(wǎng)站制作PC+手機(jī)+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問(wèn)題。

點(diǎn)虐 自帶的config文件來(lái)配置連接字符串，比ini好N倍，如果你非要用ini那么自己解決問(wèn)題

檢測(cè)是否能連接用Connection.Open加try catch就可以

VB.NET連接ACCESS數(shù)據(jù)庫(kù)，讀取查詢并顯示

給你寫(xiě)個(gè)例子，不明白，再問(wèn)！！

'引入OLEDB命令空間

Imports System.Data.OleDb

Public Class Form1

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

'定義一個(gè)OLEDB連接并實(shí)例化它

Dim con As New OleDbConnection

'定義一個(gè)OLEDB命令并實(shí)例化他

Dim cmd As New OleDbCommand

'定義一個(gè)OLEDBReader方法來(lái)讀取數(shù)據(jù)庫(kù)

Dim dr As OleDbDataReader

'初始化con的連接屬性，使用OLEDB模式，數(shù)據(jù)源為：你指定下路徑，我的是在D盤(pán)

con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\dataSample.mdb"

'打開(kāi)OLEDB數(shù)據(jù)連接

con.Open()

'初始化OLEDB命令的連接屬性為con,這個(gè)需要你理解下

cmd.Connection = con

'初始化OLEDB命令的語(yǔ)句 就是查詢 什么字段從什么表 條件是ID等于你在t1中輸入的內(nèi)容

cmd.CommandText = "select keyss from table1 where ID=" t1.Text ""

'執(zhí)行OLEDB命令以ExecuteReader()方式，并返回一個(gè)OLEDBReader，賦值給dr

dr = cmd.ExecuteReader()

'判斷下dr中是否有數(shù)據(jù)。如果有就把第一個(gè)值賦值給t2的值

If dr.Read() Then

t2.Text = dr(0)

End If

'完成后關(guān)閉dr.con等釋放資源

dr.Close()

con.Close()

End Sub

End Class

vb點(diǎn)虐 連接access數(shù)據(jù)庫(kù)問(wèn)題

1，使用ADO connection對(duì)象

首先，要建立ADO引用，定義connection這個(gè)類，然后實(shí)例化對(duì)象。

代碼完成如下：

span?style="font-size:18px;"Dim?objCn?As?New?Connection,?objRs?As?New?Recordset????????

objCn.ConnectionString?=?"Provider=Microsoft.Jet.OLEDB.3.51;"??"Data?Source="??App.Path??"\實(shí)例01.mdb"

objCn.Open??

/span

2，使用ODBC數(shù)據(jù)源

首先，打開(kāi)電腦上的ODBC數(shù)據(jù)源，建立關(guān)系。

步驟如下：

1），打開(kāi)電腦上的ODBC數(shù)據(jù)源

如下圖所示：

? ? ? ? ?

2）點(diǎn)擊添加

3）命名

4）和數(shù)據(jù)庫(kù)源建立關(guān)系

5）用代碼實(shí)現(xiàn)連接

span?style="font-size:18px;"???????

dim?objCn?As?Connection??

Set?objCn?=?New?Connection??

objCn.Open?"DSN=實(shí)例2DSN"??

/span

3、ADO Data 控件創(chuàng)建連接

1）右擊data控件，選擇ADODC屬性

2）從三種連接資源中選擇一種。

使用data Link 文件：直接點(diǎn)擊瀏覽，找到包含連接字符串的.udl文件即可

使用ODBC數(shù)據(jù)源連接，單擊新建

選擇用戶數(shù)據(jù)庫(kù)，之后的操作跟2中步驟一樣。

使用連接字符串：?jiǎn)螕羯?/p>

測(cè)試連接

4、使用數(shù)據(jù)環(huán)境設(shè)計(jì)器創(chuàng)建數(shù)據(jù)庫(kù)連接

添加引用

右擊創(chuàng)建連接，在右擊想要連接的屬性，之后的操作跟data控件中使用字符串中的操作一致

vb點(diǎn)虐 的數(shù)據(jù)庫(kù)怎么連接啊?

Dim

sqlConnection1

As

SqlClient.SqlConnection

　Dim

strConnect

As

String=”data

source=服務(wù)器名;initial

catalog=數(shù)據(jù)庫(kù)名;user

id=sa;password=;”

sqlConnection1=New

System.Data.SqlClient.SqlConnection(strConnect)

　sqlConnection1.open

‘打開(kāi)數(shù)據(jù)庫(kù)

sqlConnection1.close

‘關(guān)閉連接，釋放資源

1)連接Sql

Server數(shù)據(jù)庫(kù)

Dim

odbcDbConnetion1

As

Microsoft.Data.OdbcConnection

　Dim

strConnect

As

Sting=”Driver={SQL

Server};Server=服務(wù)器名;Uid=sa;pwd=;Database=

數(shù)據(jù)庫(kù)名;”

　odbcDbConnetion1=New

Microsoft.Data.OdbcConnection(strConnect)

分享標(biāo)題：vb點(diǎn)虐 連接數(shù)據(jù)塊 vb6連接數(shù)據(jù)庫(kù)
文章起源：http://bm7419.com/article30/ddegipo.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供自適應(yīng)網(wǎng)站、標(biāo)簽優(yōu)化、網(wǎng)站策劃、網(wǎng)站收錄、定制網(wǎng)站、微信小程序

廣告

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