导航:首页 > 源码编译 > vb如何编译sql语句

vb如何编译sql语句

发布时间:2023-02-03 16:24:17

A. VB6.0里怎么写SQL语句

第一个窗体form1上添加一个textbox控件,一个command控件。
第二个窗体form2上添加一个datagrid控件。
注意:示例使用的数据库是access的。使用时在textbox控件里输入查询的SQL语句。如select * form 数据库中的表名

Private Sub Command1_Click()
Dim mycon As ADODB.Connection
Dim myrt As ADODB.Recordset

Set mycon = New ADODB.Connection
Set myrt = New ADODB.Recordset

mycon.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=输入数据库文件位置如(D:\db1.MDB)"
mycon.Open

myrt.CursorLocation = adUseClient
myrt.Open Text1.Text, mycon, adOpenStatic, adLockOptimistic

Set Form2.DataGrid1.DataSource = myrt
Form2.Show
End Sub

B. 如何把sql语句写进vb程序里面啊

VB实现SQL Server 2000存储过程调用

存储过程是存储在服务器上的一组预编译的Transact-SQL语句,是一种封装重复任务操作的方法,支持用户提供的变量,具有强大的编程功能。它类似于DOS系统中的BAT文件。在BAT文件中,可以包含一组经常执行的命令,这组命令通过BAT文件的执行而被执行。同样的道理,可以把要完成某项任务的许多Transact-SQL语句写在一起,组织成存储过程的形式,通过执行该存储过程就可以完成这项任务。存储过程与BAT文件又有差别,即存储过程已经进行了预编译。

1、创建存储过程的方法

在Transact-SQL语言中,创建存储过程可以使用CREATE PROCEDURE语句,其语法形式如下:

CREATE PROC[EDURE] procere_name[;number]
[{@parameter data_type}[VARYING][=default][OUTPUT]
]],…n]
[WITH{RECOMPILE|ENCRYPTION|RECOMPILE,ENCRYPTION}]
[FOR REPLICATION]
AS sql_statement[…n]

在上面的CREATE PROCEDURE语句中,方括号"[ ]"中的内容是可选的,花括号"{}"中的内容是必须出现的,不能省略,[,…n]表示前面的参数样式,可以重复出现。竖线"|"表示两边的选项可以任选一个。

下面分析该语句中各种选项的含义。

CREATE PROCEDURE是关键字,也可以写成CREATE PROC。

procere_name是该存储过程的名称,名称可以是任何符合命名规则的标示符。名称后的[;number]参数表示可以定义一系列的存储过程名称,这些存储过程的数量由number指定。

参数名称可以使用@parameter data_type来指定。在Transact-SQL语言中,用户定义的参数名称前面加"@"符号,这些数据类型是Transact-SQL语言允许的各种数据类型,包括系统提供的数据类型和用户定义的数据类型。

当参数类型为cursor时,必须使用关键字VARYING和OUTPUT。VARYING表示结果集可以是一个输出参数,其内容是动态的。该关键字只能在使用游标作为数据类型时使用。关键字OUTPUT表示这是一个输出参数,可以把存储过程执行的结果信息返回应用程序。
default用于指定参数的默认值。

RECOMPILE选项表示重新编译该存储过程。该选项只是在需要的时候才使用,例如经常需要改变数据库模式时。

ENCRYPTION选项用来加密创建存储过程的文本,防止他人查看。

选项FOR REPLICATION主要用于复制过程中。注意,该选项不能和选项RECOMPILE同时使用。

AS是一个关键字,表示其后的内容是存储过程的语句。参数sql-statement[…n]表示在一个存储过程中可以包含多个Transact-SQL语句。

2、存储过程的优点

在频繁访问数据库的系统中,开发者都乐于使用存储过程,这与存储过程的下列优点是分不开的。

⑴ 存储过程可以与其他应用程序共享应用程序的逻辑,从而确保一致的数据访问和操纵。

⑵ 存储过程提供了一种安全机制。如果用户被授予执行存储过程权限,那么即使该用户没有访问在执行该存储过程中所参考的表或视图的权限,该用户也可以完全执行该存储过程而不受到影响。因此,可以创建存储过程来完成所有的增加、删除等操作,并且可以通过编程控制上述操作中对信息的访问权限。

⑶ 存储过程执行速度快,便于提高系统的性能。由于存储过程在第一次执行之后,其执行规划就驻存在过程高速缓冲存储区中,在以后的操作中,只需从过程高速缓冲存储区中调用编译好的二进制形式存储过程来执行。

⑷ 使用存储过程可以减少网络传输时间。如果有一千条Transact-SQL语句的命令,一条一条地通过网络在客户机和服务器之间传送,那么这种传输所耗费的时间将很长。但是,如果把这一千条Transact-SQL语句的命令写成一条较为复杂的存储过程命令,这时在客户机和服务器之间网络传输所需的时间就会大大减少。

SQL Server 2000数据库存储过程的调用

VB作为当今应用极为普遍的数据库客户端开发工具之一,对客户端应用程序调用服务器端存储过程提供了强大的支持。特别是随着VB6.0的推出,VB客户端应用程序可以方便地利用ADO的对象和集合来实现对数据库存储过程的调用。

在笔者编写的科技档案管理系统中,就是采用VB作为开发平台,采用SQL Server2000数据库管理数据,在这个科技档案管理系统中有海量的数据,并且对数据库有频繁的访问,利用存储过程访问数据库节省了执行时间,大大提高了系统的性能。

1、ADO简介

ADO控件(也称为ADO Data控件)与VB固有的Data控件相似。使用ADO Data控件,可以利用Microsoft ActiveX Data Objects(ADO)快速建立数据库绑定控件和数据提供者之间的连接。

ADO Data控件可以实现以下功能:

·连接一个本地数据库或远程数据库。

·打开一个指定的数据库表,或定义一个基于结构化查询语言(SQL)的查询、存储过程或该数据库中的表的视图的记录集合。

·将数据字段的数值传递给数据绑定控件,可以在这些控件中显示或更改这些数值。

·添加新的记录,或根据更改显示在绑定的控件中的数据来更新一个数据库。

2、数据库的连接

数据库的连接可通过ADO控件实现,为此,必须在工程部件中选择Microsoft ADO Data Control 6.0 (OLEDB),然后在窗体中添加ADO控件。利用ADO连接数据库有两种方法,具体如下。

1) 通过ADODC属性页实现连接

在ADODC属性页中选择生成按钮,进入数据链接属性对话框;然后选择该对话框中的连接属性页,选择或输入服务器名称和数据库等重要信息;最后测试连接,连接成功后,按确定按钮,返回到属性页对话框,可获得连接字符串,如下例:

Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Science_File;Data Source=Data_Server

其中sa是用户名;Science_File是数据库名;Data_Server是数据库名。

通过下列语句,即可连接到指定的数据库:

dim odbcstr as String, adocon As New ADODB.Connection
odbcstr = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Science_File;Data Source=Data_Server"
adocon.Open odbcstr '连接到数据库

2) 直接使用连接语句实现

连接数据库的语句如下:

Dim ado as ADODC
ado.ConnectionString = "Provider=SQLOLEDB.1;Password=" & User_Pwd & ";Persist Security Info=True;User ID=" & User_Name & ";Initial Catalog=" & Data_Name & ";Data Source=" & server_name

其中User-Pwd是用户密码;User_Name是用户名;Data_Name是数据库名;server_name是服务器名。

连接数据库成功后就可以调用存储过程执行操作。

3、存储过程的调用

假设有一个名为doc_ProcName存储过程,该存储过程有一个输入参数,一个输出参数。

1) 直接传递参数调用存储过程

直接传递参数方法主要通过以下几个步骤来实现:

(1) 通过ADODB的Connection对象打开与数据源的连接;

(2) 通过ActiveConnection指定Command对象当前所属的Connection对象;

(3) 通过CommandText属性设置Command对象的源,即要调用的存储过程;

(4) 通过CommandType属性确定Command对象的源类型,如果源类型为存储过程CommandType即为adCmdStoredProc;

(5) 通过Command对象的Parameters集合向所调用的存储过程传递参数,其中对象Parameters(0)为执行存储过程的返回值,返回值为0则执行存储过程成功;

(6) 通过Eexecute方法执行在 CommandText 属性中指定的存储过程。

以存储过程doc_ProcName为例,关键代码如下:

Dim strS As String '定义一变量
Dim adoconn As New ADODB.Connection 'Connection 对象代表了打开与数据源的连接。
Dim adocomm As New ADODB.Command 'Command 对象定义了将对数据源执行的指定命令。
Dim ReturnValue As Integer '调用存储过程的返回值
adoconn.ConnectionString = Adodc1.ConnectionString 'Adodc1为窗体中的ADO控件,并已成功连接数据库
adoconn.Open
Set adocomm.ActiveConnection = adoconn '指示指定的 Command对象当前所属的 Connection对象。
adocomm.CommandText = "doc_ProcName" '设置Command对象源。
adocomm.CommandType = adCmdStoredProc '通知提供者CommandText属性有什么,它可能包括Command对象的源类型。设置这个属性优化了该命令的执行。
adocomm.Parameters(1) = "1"
adocomm.Parameters(2) = "OutputParameters" 'OutputParameters可以为任意的字符串或数字
adocomm.Execute
ReturnValue = adocomm.Parameters(0) '存储过程的返回值,返回0则成功执行。
strS = adocomm.Parameters(2) '把存储过程的输出参数的值赋给变量strS

2) 追加参数法调用存储过程

追加参数通过CreateParameter方法,用来指定属性创建新的Parameter对象。具体语法如下:

Set parameter = command.CreateParameter (Name, Type, Direction, Size, Value)

·Name 可选,字符串,代表 Parameter 对象名称。
·Type 可选,长整型值,指定 Parameter 对象数据类型。
·Direction 可选,长整型值,指定 Parameter 对象类型。
·Size 可选,长整型值,指定参数值最大长度(以字符或字节数为单位)。
·Value 可选,变体型,指定 Parameter 对象值。

这种方法与上面一种方法的分别主要在于,追加参数的方法在向存储过程传递参数时,这种方法首先通过CreateParameter方法为存储过程创建参数,然后通过Append方法将创建的参数追加到Parameters集合中去。

仍然以存储过程doc_ProcName的调用为例,关键代码如下:

Dim mRst As ADODB.Recordset 'Recordset 对象表示的是来自基本表或命令执行结果的记录全集。
Dim prm As ADODB.Parameter 'Parameter 对象代表参数或与基于参数化查询或存储过程的Command 对象相关联的参数。
adoconn.ConnectionString = Adodc1.ConnectionString
adoconn.Open
Set adocomm.ActiveConnection = adoconn
adocomm.CommandText = "doc_ProcName"
adocomm.CommandType = adCmdStoredProc
Set prm = adocomm.CreateParameter("parameter1", adTinyInt, adParamInput, , "1")
adocomm.Parameters.Append prm
Set prm = adocomm.CreateParameter("parameter2", adInteger, adParamOutput)
adocomm.Parameters.Append prm
Set mRst = adocomm.Execute
ReturnValue = adocomm.Parameters(0)

以上代码中未定义的变量以及未注释的语句与前述相同。

C. VB中如何运用SQL查询语句

在VB6中可用ADO及DATAGRID控件,用如下语句可更灵活:
Private Sub Form_Load()
Text1 = ""
With Adodc1
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\db1.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select name from b1 order by name"
Adodc1.Refresh
DataGrid1.Refresh
End With
End Sub

Private Sub Text1_Change()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\db1.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select name from b1 where name >='" & Text1 & "' order by name"
Adodc1.Refresh'对查询更新
DataGrid1.Refresh
End Sub

数据库用VB6编程语言,对新手而言,如何用好ADODC控件和DATAGRID控件相当重要。上面的原代码基于ADODC控件和DATAGRID控件的灵活应用。具体做法:
新建工程时选数据工程,此时VB6集成调试环境左边工具箱内已加载了有关数据库编程必须的控件。
然后在FORM1窗体中添加ADODC控件和DATAGRID控件,将DATAGRID1的属性DATASOURCE选ADODC1,打开ADODC1控件属性页使用连接字符串,选生成,在提供者选项中ACCESS数据库选MICROSOFT jet 4.0 OLE DB Provider,然后按要求连接数据库等。在ADODC1控件属性页使用连接字符串空白文本窗口中就有一长串字符串,注意该字符串可复制到程序代码用于编程。ADODC1控件属性页的数据源内有命令文本(SQL)编写窗口可编写SQL查询语言。该窗口的SQL语句可复制到程序代码用于编程。
SQL查询语言主要结构为:
Select 查询字段 from 表名 Where 查询条件语句 [排序语句或分组语句]
查询字段必须分别用(西文)逗号分开或就用一个*号代替,上述查询中排序语句建议最好应用。
SQL查询语言如有错程序运行时告诉你出错,作相应改动即可。本人一般先按上述连接,SQL用"SELECT * FROM TabelName"作调试,无问题,用一个按钮孔件将前述需复制的连接字符串和SQL查询语言先复制于按钮控件的CLICK事件中备着,以便放着以后使用。然后删去ADODC1孔件,再添加ADODC1控件再添其他内容。
以上不知是否说清楚?SQL查询语言多写多用就会熟练,以上供提问者参考。

D. VB如何写SQL语句

sql="select * from (表格名字) where id='" & text1.text & "' and name='" & text2.text & "' and age="' & text3.text & "' order by id asc"
order by id asc 这句意思是按id升序排列,可写可不写。

阅读全文

与vb如何编译sql语句相关的资料

热点内容
韩国电影食物链里面的女主角叫什么名字? 浏览:461
程序员做开发256G够用吗 浏览:186
c程序编译的秘密 浏览:178
安卓页面广告怎么关闭 浏览:666
linux信号量命令 浏览:345
父亲出门上班儿子和继母的日本电影 浏览:954
安卓机怎么抠钢化膜 浏览:390
免费看影视网站7大入口 浏览:535
doctrinephp 浏览:752
dos命令ip 浏览:444
李彩谭的电影免费观看 浏览:221
c语言编译模拟登录页面 浏览:819
app广告推送平台哪里有 浏览:726
文件夹左上角的勾选如何删除 浏览:819
云服务器硬盘什么意思 浏览:664
我的世界有生存的服务器地址 浏览:434
app探探是什么意思 浏览:814
程序员税后12k 浏览:287
天宝君宝啥电影 浏览:218
天喜真空压缩袋 浏览:136