当前位置:首页 » 编程语言 » vb6sql查询语句大全讲解
扩展阅读
webinf下怎么引入js 2023-08-31 21:54:13
堡垒机怎么打开web 2023-08-31 21:54:11

vb6sql查询语句大全讲解

发布时间: 2022-08-05 18:28:26

① vb6.0中如何使用sql语句(急,只要告诉我把代码放在哪就行)

这是一个调用数据库的表里面数据的语句,不是放在什么控件中输出的,你无论在一个怎么样的过程中都可以输出你想要的结果,比如你有text控件,tdgrid控件等等,一般的数据的输出用到mshflexgrid控件。首先的逻辑思维就不正确。比如我用mshflexgrid1显示你的数据 就可以这样写 set mshflexgrid.datasource=Adodc1.RecordSource 现在已经很少人用adodc控件了 一般用 adodb组件 我现在告诉你一种方法 你在vb的工程中 工程-引用 添加micfosoft activex data objects 2.5 library然后在你想要显示数据的某个过程种加入以下代码 Dim rs As New ADODB.Connection
Dim str As String
Dim re As New ADODB.Recordset
Dim strsql As String

str = "Provider=SQLOLEDB.1;Password=sa;Persist Security Info=True;User ID=sa;Initial Catalog=GFDY2007;Data Source=20091103-1521"

'SQLOLEDB 为数据源 SQL server ;access等 这里是sql server, Password 为数据库登录密码 Persist Security Info=True不管,User ID为数据库登录名称
'Initial Catalog 为数据库名 ,Data Source 为机器名
rs.Open str
strsql = "select * from T_DY_DataClass" 'SQL查询语句"
re.Open strsql, str, 1, 3 '使用 Open 方法打开数据库中的一个表
Set MSHFlexGrid1.DataSource = re
re.Close

② vb中sql查询语句

1. For j = 1 To rs.RecordCount 改成 For j = 0 To rs.RecordCount - 1
2. .Data = rs(i).Value 改成 rs.Fields(i).Value

③ VB6.0里怎么写SQL语句

贴出你此位置的全部代码来
我给你补充sql语句和查询方法
看你半天没贴代码
还是给你写个示例吧:
以下两句
可以实现
Adodc1.RecordSource
=
"select
姓名
from

where
年龄>20"
'sql语句
查询年龄大于20岁的人的姓名
Set
Text1.DataSource
=
Adodc1
'绑定到text1

④ VB中的SQL查询语句

select
count(icuo)
from
sheet1
where
icuo='0'//这才是统计出为0的个数然后再select
ID
from
sheet1
where
icuo='0'//这是列出为0的全部数据ID

⑤ 谁帮我说下VB的SQL语句的具体用法

这个问题可以够写一本书.给你找点参考资料
http://search.vb6.cn/?key=SQL%BD%CC%B3%CC&page=1&Qclass=1
==========
常常用到的 查询 select [列名] 〔表名〕where [条件] oder by 排序

更改 update......
删除 delete

⑥ vb 6.0 sql查询语句的用法

一般应该是Combo1才对啊,没有直接用Combo做控件名的:

sql="select * from strinfo where [部门]='" & Combo1.Text & "' and [姓名]='" & Text1.Text & "' and [身份号码]='" & Text2.Text & "'"

⑦ vb6.0sql查询

不清楚你的意图,“通过条件(a列)查询使其获取的信息添加至字典d中key=a列,item=b列。”
1、条件是一个逻辑语句,如 rs!a = "abcd",如果成立,返回 True,不是一个字段。2、VB6的字典是在编辑程序时提前设置好的,不可能在程序运行时再添加到字典中。3、添加可以添加到媒介中,不能添加到程序中。

⑧ vb中用sql语句查询数据库

"SELECT
sno,sco
FROM
sco
WHERE
sno='"
&
text1.text
&
"'"
因为现在不弄VB6了,所以具体怎么连接的代码我忘了,大概就是如果得到的结果RecordSet是空的,即Bof
And
Eof,则用户名错误,否则如果规定了用户名不可重复,就有且仅有1条记录,再比较其中的sco与Text2.Text是否相等,是则正确通过,否则密码错误。

⑨ VB6.0中连接打开SQL数据库的关键性语句是什么可以举例说明一下

VB6 访问SQL 数据库一般有 ADO,DAO,ODBC 几中方式,主要根据实际情况决定采用那种方式。
如:
1、在窗体中放置data 数据控件,采用 ODBC 方式访问 SQL 数据库,可以这样设置
ConStr="ODBC;Driver={SQL Server};Server=服务器名称(本地电脑名);
Uid=sa;Pwd=;
DataBase=数据库名;LoginTimeOut=0“
设置 Data1 连接属性
With Data1
.DatabaseName = ""
.Connect = ConStr
.RecordSource = ”Select * From 数据表“ '取得数据源的SQL语句
.Refresh
End With
这样就可以连接数据库了 。
2、在程序中利用 ADO 的方式
Dim myCon As New ADODB.Connection
Dim snRes As New ADODB.Recordset
Dim ConStr$

ConStr="Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa; Password=;
Data Source =服务器名;Initial Catalog=数据库名;"
'建立数据连接
myCon.Open ConStr
‘建立数据集
snRes.Open "Select * From 表名",myCon, adOpenStatic, adLockReadOnly

这里打开数据记录集时,可以选择多种参数,可以参考一下帮助文件...

⑩ VB中如何运用SQL查询语句

通过部件adbc部件,可以直接连库,一般我通过adbc部件生成sql连接字符串,然后新建conn对象,连接数据库
set conn=Server.Create("Adodb.Connection")
conn.Open "连接字符串"
再新建set rs=Server.Create("Adodb.RecordSet")
然后通过执行sql语句,把取得的记录集存到rs对象中,以便调用
rs.Open (sql,conn,3,3,-1)
open函数(或者叫方法)第一个参数是要执行的sql语句,第二个参数是操作哪个数据库,根据connection对象确定数据库,第三第四第五个参数是表示通过什么类型的游标,应用什么锁,最后一个忘了,不过默认是-1,不用管,不重要
如果不需要返回记录集的话,比如update ,insert 可以通过数据库连接对象的方法直接执行sql语句
conn.Execute(sql)
就可以执行了