vb.net 打開數(shù)據(jù)庫(kù)，用 .Fields("rhkjd").Value讀取數(shù)據(jù)庫(kù)出錯(cuò)

VB.NET都不這么使用了

成都創(chuàng)新互聯(lián)專注于康巴什網(wǎng)站建設(shè)服務(wù)及定制，我們擁有豐富的企業(yè)做網(wǎng)站經(jīng)驗(yàn)。 熱誠(chéng)為您提供康巴什營(yíng)銷型網(wǎng)站建設(shè)，康巴什網(wǎng)站制作、康巴什網(wǎng)頁(yè)設(shè)計(jì)、康巴什網(wǎng)站官網(wǎng)定制、微信平臺(tái)小程序開發(fā)服務(wù)，打造康巴什網(wǎng)絡(luò)公司原創(chuàng)品牌,更為您提供康巴什網(wǎng)站排名全網(wǎng)營(yíng)銷落地服務(wù)。

使用

Dim?reader?As?OleDbDataReader?=?command.ExecuteReader()

While?reader.Read()

Console.WriteLine(reader.GetString("rhkjd"))????????

End?While

reader.Close()

之類的System.Data.OleDb

另外，確保你的數(shù)據(jù)庫(kù)這有rhkjd字段

VB.NET怎么獲取本機(jī)的數(shù)據(jù)庫(kù)

這里以O(shè)ERACLE數(shù)據(jù)庫(kù)為例 ：

Provider=MSDAORA;data source =主機(jī)名:1521/ORCL;User ID=system;Password=ORACLE;Unicode=True

Dim myConn As Data.OleDb.OleDbConnection

myConn = New System.Data.OleDb.OleDbConnection()

myConn.ConnectionString = strCon

myConn.Open()

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

給你寫個(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盤

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

'打開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.net從數(shù)據(jù)庫(kù)讀取信息，myDA1.Fill(ds1, "kucun")，如何在ds1.Tables中查詢想要的信息

下面是逐個(gè)顯示第一條記錄的各個(gè)字段值，通過(guò)實(shí)例，你應(yīng)該可以操作想要的信息數(shù)據(jù)了：

'如果表里的記錄數(shù)大于0

If ds1.Tables("kucun").Rows.Count 0 Then

'依照數(shù)據(jù)表的字段值循環(huán)

For i = 0 To ds1.Tables("kucun").Columns.Count - 1

'顯示第一條記錄的第i個(gè)字段名和字段值

MsgBox(ds1.Tables("kucun").Columns(i).ColumnName ":" ds1.Tables("kucun").Rows(0)(i))

Next

End If

vb.net 怎么操作數(shù)據(jù)庫(kù)

如果樓主熟悉VB6，可以直接在項(xiàng)目中添加ADODB的Com引用，這樣你就可以像VB6那樣操作數(shù)據(jù)庫(kù)了！

另外

.NET

Framework中連接數(shù)據(jù)庫(kù)要用到ADO.NET。如果要操作Access數(shù)據(jù)庫(kù)，要用到System.Data.OleDb命名空間下的許多類。

比如按樓主所說(shuō)，“我想在textbox1中顯示表一中【一些數(shù)據(jù)】字段下的第一個(gè)內(nèi)容”：

'首先導(dǎo)入命名空間

Imports

System.Data

Imports

System.Data.OleDb

'然后在某一個(gè)事件處理程序中寫：

Dim

conn

As

New

OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data

Source=數(shù)據(jù)庫(kù).accdb;Jet

OLEDB:Database

Password=MyDbPassword")

Dim

command

As

New

OleDbCommand("Select

*

From

數(shù)據(jù)表",

conn)

conn.Open()

'打開數(shù)據(jù)庫(kù)連接

Dim

reader

As

OleDbDataReader

=

command.ExecuteReader()

'執(zhí)行SQL語(yǔ)句，返回OleDbDataReader

對(duì)象

Do

While

reader.Read()

'讀取一條數(shù)據(jù)

textbox1.Text

+=

reader("一些數(shù)據(jù)")

VbCrLf

Loop

reader.Close()

'關(guān)閉OleDbDataReader

conn.Close()

'關(guān)閉連接

網(wǎng)站標(biāo)題：vb.net讀取數(shù)據(jù)庫(kù) vb訪問(wèn)excel數(shù)據(jù)庫(kù)
分享網(wǎng)址：http://chinadenli.net/article16/doddpgg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供域名注冊(cè)、標(biāo)簽優(yōu)化、網(wǎng)站建設(shè)、網(wǎng)站策劃、手機(jī)網(wǎng)站建設(shè)、網(wǎng)站內(nèi)鏈

廣告

聲明：本網(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)