我们专注攀枝花网站设计 攀枝花网站制作 攀枝花网站建设
成都网站建设公司服务热线:400-028-6601

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

vb.net查数据库,vb实现数据库查询

VB.net数据库查询

你把编程语言和T-SQL语言搞混了。

为政和等地区用户提供了全套网页设计制作服务,及政和网站建设行业解决方案。主营业务为成都网站设计、成都网站建设、外贸网站建设、政和网站设计,以传统方式定制建设网站,并提供域名空间备案等一条龙服务,秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求,就会得到认可,从而选择与我们长期合作。这样,我们也可以走得更远!

如果是单纯的T-SQL语言,应该是Select * from Data where ID in (1,2,3,4,5,6),其中(1,2,3,4,5,6)就是你所说的数组的代表。

所以你要把num(i)转化为一个(1,2,3,......)这样的字符串

在vb.net中如何查询MDB数据库的数据

以下是完整模块

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数据库名字.mdb")

'定义连接

Public

DataBaseRST

As

Integer

'用来返回数据库执行结果

Public

Function

DataModify(ByVal

str

As

String)

As

Boolean

'进行数据库修改操作

Dim

cmdinsert

As

New

OleDbCommand

Try

cmdinsert.CommandText

=

str

cmdinsert.Connection

=

cn

If

cn.State

=

ConnectionState.Closed

Then

cn.Open()

DataBaseRST

=

cmdinsert.ExecuteNonQuery()

'用来返回执行的结果

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,用来显示数据的控件

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

'以下是调用方法

DataModify("

insert

into

aa

values

('1','2')")'-------这里是数据库更新操作

Search("select

bb

from

aa",DataGridView1)'-----------这里是数据表查询操作

VB.NET 查询SQL数据库

sql服务器上需要有装oracle的client端(或者类似驱动)

2. 在sqlserver的企业管理器里建一个链接服务器(DBlink)具体方法可以查一下帮助

3.

insert into sqlserver_table

select * from openquery(你建的dblink名称,'oracle的select语句')

openquery的语法可以查帮助出来

注意select语法是跟oracle的,要用引号括起来当字符串,ms要大写

很久之前做过的,希望能帮上,试试看吧:)

另外,虚机团上产品团购,超级便宜

匿名 ??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端(或者类似驱动)

2. 在sqlserver的企业管理器里建一个链接服务器(DBlink)具体方法可以查一下帮助

3.

insert into sqlserver_table

select * from openquery(你建的dblink名称,'oracle的select语句')

openquery的语法可以查帮助出来

注意select语法是跟oracle的,要用引号括起来当字符串,ms要大写

很久之前做过的,希望能帮上,试试看吧:)

vb.net 中如何使用SQL语句查询数据库

dim

myselectquery

as

string

=

"select

*

from

表1

where

姓名='小强'"

dim

mycommand

as

new

sqlcommand

(myselectquery,

conn)

'建立一个command控件,conn是你的sqlconnection对象

conn.open()'打开数据连接

dim

myreader

as

sqldatareader'定义一个reader用来读数据

myreader

=

mycommand.executereader()'运行你的查询,结果到myreader

if

myreader.read()

then

'如果查到了数据

msgbox(myreader.getstring(0))

'显示第一个字段

end

if

关于vb.net 数据库查询

'各项查询条件为空的时候用 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查数据库,vb实现数据库查询
文章起源:http://shouzuofang.com/article/dsiidsh.html

其他资讯