VB.net數(shù)據(jù)庫查詢

你把編程語言和T-SQL語言搞混了。

為政和等地區(qū)用戶提供了全套網(wǎng)頁設計制作服務，及政和網(wǎng)站建設行業(yè)解決方案。主營業(yè)務為成都網(wǎng)站設計、成都網(wǎng)站建設、外貿(mào)網(wǎng)站建設、政和網(wǎng)站設計，以傳統(tǒng)方式定制建設網(wǎng)站，并提供域名空間備案等一條龍服務，秉承以專業(yè)、用心的態(tài)度為用戶提供真誠的服務。我們深信只要達到每一位用戶的要求，就會得到認可，從而選擇與我們長期合作。這樣，我們也可以走得更遠！

如果是單純的T-SQL語言，應該是Select * from Data where ID in (1,2,3,4,5,6)，其中(1,2,3,4,5,6）就是你所說的數(shù)組的代表。

所以你要把num(i)轉(zhuǎn)化為一個(1,2,3,......)這樣的字符串

在vb.net中如何查詢MDB數(shù)據(jù)庫的數(shù)據(jù)

以下是完整模塊

Imports

System.Data

Imports

System.IO

Imports

System.Data.OleDb

Module

Module1

Public

cn

As

New

OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data

Source="

Application.StartupPath

"\mdb數(shù)據(jù)庫名字.mdb")

'定義連接

Public

DataBaseRST

As

Integer

'用來返回數(shù)據(jù)庫執(zhí)行結(jié)果

Public

Function

DataModify(ByVal

str

As

String)

As

Boolean

'進行數(shù)據(jù)庫修改操作

Dim

cmdinsert

As

New

OleDbCommand

Try

cmdinsert.CommandText

=

str

cmdinsert.Connection

=

cn

If

cn.State

=

ConnectionState.Closed

Then

cn.Open()

DataBaseRST

=

cmdinsert.ExecuteNonQuery()

'用來返回執(zhí)行的結(jié)果

cn.Close()

Return

True

Catch

ex

As

Exception

MessageBox.Show(Err.Description,

"Error",

MessageBoxButtons.OK,

MessageBoxIcon.Error)

Return

False

End

Try

End

Function

Public

Function

Search(ByVal

str

As

String,

ByVal

DGV

As

DataGridView)

As

Boolean

'查詢

str---查詢命令，DGV---DataGridView，用來顯示數(shù)據(jù)的控件

Dim

tb

As

New

DataTable

Try

Dim

ap

As

New

OleDb.OleDbDataAdapter(str,

cn)

ap.Fill(tb)

DGV.DataSource

=

tb

Return

True

Catch

ex

As

Exception

MessageBox.Show(Err.Description,

"Error",

MessageBoxButtons.OK,

MessageBoxIcon.Error)

Return

False

End

Try

End

Function

End

Module

'以下是調(diào)用方法

DataModify("

insert

into

aa

values

('1','2')")'-------這里是數(shù)據(jù)庫更新操作

Search("select

bb

from

aa",DataGridView1)'-----------這里是數(shù)據(jù)表查詢操作

VB.NET 查詢SQL數(shù)據(jù)庫

sql服務器上需要有裝oracle的client端(或者類似驅(qū)動)

2. 在sqlserver的企業(yè)管理器里建一個鏈接服務器(DBlink)具體方法可以查一下幫助

3.

insert into sqlserver_table

select * from openquery(你建的dblink名稱,'oracle的select語句')

openquery的語法可以查幫助出來

注意select語法是跟oracle的，要用引號括起來當字符串，ms要大寫

很久之前做過的，希望能幫上，試試看吧：)

另外,虛機團上產(chǎn)品團購,超級便宜

匿名 ??span class="tm"7-21 02:14/span

/p

div class="b bt2"div class="bt bg1 ft"img alt="其他答案" height="16" src="/static/img/ico2.gif" width="16"/其他答案/div/div

p class="ft p1"1. sql服務器上需要有裝oracle的client端(或者類似驅(qū)動)

2. 在sqlserver的企業(yè)管理器里建一個鏈接服務器(DBlink)具體方法可以查一下幫助

3.

insert into sqlserver_table

select * from openquery(你建的dblink名稱,'oracle的select語句')

openquery的語法可以查幫助出來

注意select語法是跟oracle的，要用引號括起來當字符串，ms要大寫

很久之前做過的，希望能幫上，試試看吧：)

vb.net 中如何使用SQL語句查詢數(shù)據(jù)庫

dim

myselectquery

as

string

=

"select

*

from

表1

where

姓名='小強'"

dim

mycommand

as

new

sqlcommand

(myselectquery,

conn)

'建立一個command控件，conn是你的sqlconnection對象

conn.open()'打開數(shù)據(jù)連接

dim

myreader

as

sqldatareader'定義一個reader用來讀數(shù)據(jù)

myreader

=

mycommand.executereader()'運行你的查詢，結(jié)果到myreader

if

myreader.read()

then

'如果查到了數(shù)據(jù)

msgbox(myreader.getstring(0))

'顯示第一個字段

end

if

關于vb.net 數(shù)據(jù)庫查詢

'各項查詢條件為空的時候用 1=1來代替

'例如：

tmpSelIDStr=Trim(txtSelectId.Text)

if tmpSelIDStr="" then

tmpSelIDStr=" 1=1 "

Else

tmpSelIDStr=" 員工編號='" tmpSelIDStr "'"

End If

'同理其它的都這么處理

'最后合并起來

sqlstr="select ..... from .... where " tmpSelIDStr " and " tmp ....

'不知道這樣回答你是否可以理解

當前文章：vb.net查數(shù)據(jù)庫,vb實現(xiàn)數(shù)據(jù)庫查詢
URL網(wǎng)址：http://chinadenli.net/article39/dsiidsh.html

成都網(wǎng)站建設公司_創(chuàng)新互聯(lián)，為您提供企業(yè)網(wǎng)站制作、網(wǎng)站收錄、用戶體驗、網(wǎng)站內(nèi)鏈、關鍵詞優(yōu)化、建站公司

廣告

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