VB如何筛选数据库内容

VB如何筛选数据库内容,第1张

具体做法:
新建工程时选数据工程,此时VB6集成调试环境左边工具箱内已加载了有关数据库编程必须的控件。
然后在FORM1窗体中添加ADODC控件和DATAGRID控件,将DATAGRID1的属性DATASOURCE选ADODC1,打开ADODC1控件属性页使用连接字符串,选生成,在提供者选项中选MICROSOFT jet 40 OLE DB Provider,然后按要求连接数据库等。在ADODC1控件属性页使用连接字符串空白文本窗口中就有一长串字符串,注意该字符串可复制到程序代码用于编程。ADODC1控件属性页的数据源内有命令文本(SQL)编写窗口可编写SQL查询语言。该窗口的SQL语句可复制到程序代码用于编程。
SQL查询语言主要结构为:
Select 查询字段 from 表名 Where 查询条件语句 [排序语句或分组语句]
查询字段必须分别用(西文)逗号分开或就用一个号代替,上述查询中排序语句建议最好应用。
SQL查询语言如有错程序运行时告诉你出错,作相应改动即可。本人一般先按上述连接,SQL用"SELECT FROM TabelName"作调试,无问题,用一个按钮孔件将前述需复制的连接字符串和SQL查询语言先复制于按钮控件的CLICK事件中备着,以便放着以后使用。然后删去ADODC1孔件,再添加ADODC1控件再添其他内容。
代码如下,请按你实际要求修改,
Private Sub Form_Load()
Text1 = ""
With Adodc1
Adodc1ConnectionString = "Provider=MicrosoftJetOLEDB40;Data Source=E:\db1mdb;Persist Security Info=False"
Adodc1RecordSource = "select name from b1 order by name"
Adodc1Refresh
DataGrid1Refresh
End With
End Sub
Private Sub Text1_Change()
Adodc1ConnectionString = "Provider=MicrosoftJetOLEDB40;Data Source=E:\db1mdb;Persist Security Info=False"
Adodc1RecordSource = "select name from b1 where name >='" & Text1 & "' order by name"
Adodc1Refresh'对查询更新
DataGrid1Refresh
End Sub
补充代码如下,Tabel1是你需查询的数据表:
Private Sub Command1_Click()
Adodc1ConnectionString = "Provider=MicrosoftJetOLEDB40;Data Source=E:\db1mdb;Persist Security Info=False"
Adodc1RecordSource = "select from Tabel1 where 部门 ='" & "车间" & "'"
Adodc1Refresh'对查询更新
DataGrid1Refresh
End Sub

这是一个database link
表示跨数据库查询数据
cc是建立的一个dblink的名字,dblink是在服务器上创建的指向另一个服务器的连接
select from aabb@cc
其中aa是跨库的数据库中的用户名字,就想你登录自己的数据库用的名字一样,这个是登录另一个数据库的用户名,bb是这个这个用户下的你要查询的数据库中的表名字。
@就是'at',表示在哪个数据库上。
你查询出的结果并不是你登录的数据库的结果,而是远程通过创建database link之后连接的数据库上的数据。

SQL Server 支持到其他 OLE DB 数据源的永久性连接或临时连接。永久性连接叫做链接服务器;为单个查询建立的临时连接叫做分布式查询。
Microsoft Excel 工作簿是一种可通过 SQL Server 以这种方式查询的 OLE DB 数据源。本文介绍了将 Excel 数据源配置为链接服务器所需的语法,以及使用分布式查询来查询 Excel 数据源所需的语法。
作为链接服务器查询 Excel
您可以使用企业管理器、系统存储过程或 SQL-DMO(分布式管理对象)将 Excel 数据源配置为 SQL Server 链接服务器。在所有的这些情况中,您总需要设置以下四个属性:
• 链接服务器要使用的名称。
• 连接要使用的 OLE DB 提供程序。
• Excel 工作簿的数据源或完整路径和文件名。
• 将目标标识为 Excel 工作簿的提供程序字符串。默认情况下,Jet 提供程序需要 Access 数据库。
系统存储过程 sp_addlinkedserver 也需要 @srvproduct 属性,该属性可以是任何字符串值。
使用企业管理器配置 Excel 链接服务器
1 在企业管理器中,单击以展开安全文件夹。
2 右键单击链接服务器,然后单击新建链接服务器。
3 在常规选项卡上,按照下列步骤 *** 作:a在第一个文本框中,为该链接服务器键入任意名称。b在服务器类型文本框中,单击其他数据源。c在提供程序名称下拉列表框中,单击 Microsoft Jet 40 OLE DB 提供程序。d在数据源文本框中,键入 Excel 文件的完整路径和文件名。e在提供程序字符串文本框中,键入 Excel 80 代表 Excel 97、2000 或 2002 工作簿。f单击确定以创建新的链接服务器。
4 单击以展开此新链接服务器的名称,从而展开它所包含的对象列表。
5 在新建链接服务器名称下,单击表。注意,工作表和命名区域将出现在右窗格中。
使用存储过程配置 Excel 链接服务器
您还可以使用系统存储过程 sp_addlinkedserver 将 Excel 数据源配置为链接服务器: DECLARE @RC int
DECLARE @server nvarchar(128)
DECLARE @srvproduct nvarchar(128)
DECLARE @provider nvarchar(128)
DECLARE @datasrc nvarchar(4000)
DECLARE @location nvarchar(4000)
DECLARE @provstr nvarchar(4000)
DECLARE @catalog nvarchar(128)
-- Set parameter values
SET @server = 'XLTEST_SP'
SET @srvproduct = 'Excel'
SET @provider = 'MicrosoftJetOLEDB40'
SET @datasrc = 'c:/book1xls'
SET @provstr = 'Excel 80'
EXEC @RC = [master][dbo][sp_addlinkedserver] @server, @srvproduct, @provider,
@datasrc, @location, @provstr, @catalog
如上所述,此存储过程另需一个任意字符串值作为 @srvproduct 参数的值,此参数在企业管理器配置中显示为“产品名称”。不使用 @location 和 @catalog 参数。
使用 SQL-DMO 配置 Excel 链接服务器
您可以使用 SQL 分布式管理对象从 Microsoft Visual Basic 或其他编程语言中将一个 Excel 数据源以编程方式配置为链接服务器。您必须也提供企业管理器配置中要求的那四个参数。 Private Sub Command1_Click()
Dim s As SQLDMOSQLServer
Dim ls As SQLDMOLinkedServer
Set s = New SQLDMOSQLServer
sConnect "(local)", "sa", "password"
Set ls = New SQLDMOLinkedServer
With ls
Name = "XLTEST_DMO"
ProviderName = "MicrosoftJetOLEDB40"
DataSource = "c:/book1xls"
ProviderString = "Excel 80"
End With
sLinkedServersAdd ls
sClose
End Sub
查询 Excel 链接服务器
将 Excel 数据源配置为链接服务器之后,您可以方便地通过“查询分析器”或其他客户端应用程序查询其数据。例如,为了检索存储在 Excel 文件 Sheet1 中的数据行,以下代码使用了您使用 SQL-DMO 配置的链接服务器: SELECT FROM XLTEST_DMOSheet1$
您还可以使用 OPENQUERY 以“passthrough”(传递)方式查询 Excel 链接服务器,如下所示: SELECT FROM OPENQUERY(XLTEST_DMO, 'SELECT FROM [Sheet1$]')
OPENQUERY 需要的第一个参数是链接服务器名称。工作表名称之间需要用分隔符分开,如上所示。
您还可以使用以下查询获得 Excel 链接服务器上所有可用表的列表: EXECUTE SP_TABLES_EX 'XLTEST_DMO'
您可以使用 SQL Server 分布式查询和 OPENDATASOURCE 或 OPENROWSET 函数临时查询很少访问的 Excel 数据源,如下所示: SELECT FROM OPENDATASOURCE('MicrosoftJetOLEDB40',
'Data Source=c:/book1xls;Extended Properties=Excel 80')Sheet1$
注意,OPENROWSET 对第二个(“提供程序字符串”)参数使用一种非常规语法: SELECT FROM OPENROWSET('MicrosoftJetOLEDB40',
'Excel 80;Database=c:/book1xls', Sheet1$)
ActiveX 数据对象 (ADO) 开发人员按照常规应对 OPENROWSET 的第二个(“提供程序字符串”)参数使用的语法会 SELECT FROM OPENROWSET('MicrosoftJetOLEDB40',
'Data Source=c:/book1xls;Extended Properties=Excel 80', Sheet1$)
造成 Jet 提供程序出现以下错误:
Could not find installable ISAM

品牌型号:华为MateBook D15
系统:Windows 11

select语句执行的结果是表。select语句目的,就是从数据库检索,统计,输出数据。select 语句的执行过程,根据查询的内容数据,组成一个结果集,然后用表的形式返回。所以执行结果是一张表。

select语句的执行流程:

1、通过客户端/服务器通信协议与MySQL建立连接。

2、查询缓存,这是 MySQL的一个可优化查询的地方,如果开启了Query Cache且在查询缓存过程中查询到完全相同的SQL语句,则将查询结果直接返回给客户端;如果没有开启Query Cache或者没有查询到完全相同的SQL语句则会由解析器进行语法语义解析,并生成解析树。

3、预处理器生成新的解析树。

4、查询优化器生成执行计划。

5、查询执行引擎执行SQL语句,此时查询执行引擎会根据SQL语句中表的存储引擎类型,以及对应的API接口与底层存储引擎缓存或者物理文件的交互情况,得到查询结果,由MySQL Server过滤后将查询结果缓存并返回给客户端。若开启了Query Cache,这时也会将SQL语句和结果完整地保存到Query Cache中,以后若有相同的SQL语句执行则直接返回结果。

做服务器,你需要知道服务器都需要什么技术。首先,搭建服务器一般都是在Linux平台,所以你需要了解Linux知识,包括Linux *** 作命令。
另外,服务器经常需要脚本,你需要知道shell脚本的知识。
然后,就是网络通信,服务器和客户端需要进行通信,你需要知道tcp/ip协议,网络编程,>select是什么,没明白。
多线程问题只要将按钮用到的函数另建一个线程就可以。建立线程分如下4步:
1 头文件中声明线程函数 static void ThreadFunc();
2 头文件添加protected型变量: HANDLE hThread; DWORD ThreadID; 分别代表线程的句柄和ID。
3 编写线程函数 void CMultiThread1Dlg::ThreadFunc()
{
CTime time;
CString strTime;
m_bRun=TRUE;
while(m_bRun)
{
time=CTime::GetCurrentTime();
strTime=timeFormat("%H:%M:%S");
::SetDlgItemText(AfxGetMainWnd()->m_hWnd,IDC_TIME,strTime);
Sleep(1000);
}
}
4 创建线程
hThread=CreateThread(NULL,0,(LPTHREAD_START_ROUTINE)ThreadFunc,
NULL,0,&ThreadID);
5 终止线程


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/13515168.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-08-23
下一篇 2023-08-23

发表评论

登录后才能评论

评论列表(0条)

保存