‘壹’ VB操作sql,是必须先写与SQL连接的语句才能在VB中使用SQL的语句指令吗
不是先写连接语句,是先要打开连接,然后才能向数据库服务器发送sql执行,然后获得结果。
‘贰’ vb怎么执行sql语句
先是定义一个字符串变量,然后把你要写的SQL语句赋给它。这时如果要把一些VB控件里的数据加进去也一样就是一个字符串联接而以,唯一要注意的是标点符号的使用如:' 这个符号,因为很多时候要用到这个,我碰到好多人都是这里出错了。例如:Dim strsql As String
strsql = "select * from TblSystemData"
If dh.Text <> " " Then '单号
strsql = strsql & " where ChrCode like " & "'" & dh.Text & "'"
End If
当然你也可以把第一个它移到前面去。但我是单独放出来,这样更清楚一点。
接着是执行了。这个你可以看一下二楼的。例如:rst3.Open strsqlm con1_offer, adOpenKeyset, adLockOptimistic, adCmdText
‘叁’ vb中怎么使用sql
select
*
from
成绩表
where
姓名='张大保'
翻译为中文就是
从“成绩表”中选择所有姓名是“张大保”的记录
From
从......
From
成绩表
就是“从成绩表...”的意思
Form
是表格、表单的意思,用在这里是没意义的
另外在条件前面要加上where,意思就是在什么地方去找你要的东西
这些都是最基本的,你先把sql的语法搞清楚了再到VB中应用
‘肆’ vb中用sql语句查询数据库
"SELECT
sno,sco
FROM
sco
WHERE
sno='"
&
text1.text
&
"'"
因为现在不弄VB6了,所以具体怎么连接的代码我忘了,大概就是如果得到的结果RecordSet是空的,即Bof
And
Eof,则用户名错误,否则如果规定了用户名不可重复,就有且仅有1条记录,再比较其中的sco与Text2.Text是否相等,是则正确通过,否则密码错误。
‘伍’ 如何在VB中执行SQL脚本文件
在MSSQL SERVER的查询分析器中可通过输入如下命令,来执行一个外部的*.sql文件:
EXEC master.dbo.xp_cmdshell 'osql -U username -P password -i "filename"'
注意格式:xp_cmdshell后面的全部字符串要用单引号括起来,由于外部文件名中可能含有空格,所以要把filename字符串再用双引号括起来。比如你的SQL SERVER的用户名为sa,密码为sa,有一个外部文件为C:\Data Base.sql.那么这条语句就应该写成:
EXEC master.dbo.xp_cmdshell 'osql -U sa -P sa -i "C:\Data Base.sql"'.
说了半天,这还是在SQL SERVER中的操作,那么在VB中用代码如何实现呢?
我用VB写了一个小工程,全部代码如下:
Private Const ServerName = "Rock"
Private Const UserID = "sa"
Private Const PWD = "Rock"
Private Const ExternFile = "E:\Wang JX\DATABASE.SQL"
Private Sub Form_Load()
Dim conn As New Connection
Dim rs As New Recordset
Dim sql As String
sql = "master.dbo.xp_cmdshell 'osql -U " & UserID & " -P " & PWD & " -i """ & ExternFile & """'"
conn.Open "provider=sqloledb;data source=" & ServerName & ";user id=" & UserID & ";pwd=" & PWD
conn.Execute sql '这一句执行的可能会慢一些
End Sub
‘陆’ VB连接SQL
问题补充:
“我想知道相对地址连接~~是SQL
移到的机子上不装SQL那怎么办??”
1、SQL数据库连接必须是服务器,不用地址,因为在安装SQL
Server
2000
后,你的数据库地址已经确定;
2、在一般情况下不安装是不可以的,对于Access数据库现在的操作系统有其驱动,而没有SQL的,除非使用网络,例如局域网。
SQL
SERVER
2000
数据库代码比较简单,无非数据库连接语句不同,其他和Access数据库没有大的区别。
如果“程序要移动到其他机子上”,移动到的机子上必须同样安装SQL
SERVER
2000
数据库,而且服务器名称、数据库名称必须和原服务器名称、数据库名称相同,如果有数据库密码,必须保持一致。
下面是SQL数据库连接代码,请参考:
Public
conn
As
New
ADODB.Connection
conn.ConnectionString
=
"driver={SQL
Server};server=服务器名称;uid=sa;pwd=密码;database=数据库名称"
conn.Open
‘柒’ vb怎么连接sql
在窗体上添加adodc控件
鼠标右键-adodc属性-在通用选项卡里,点生成,选for
SQL
Server驱动程序-下一步-连接选项卡里
1.输入服务器名称,2.使用Windows
NT
集成安全设置。3.选择一个数据库
点测试连接,看看是否成功。按确定
点记录源选项卡,命令类型选8,命令文本(SQL)写:select
*
from
table1
确定,就连接到SQL数据库的表table1了。
Private
Sub
Command1_Click()
If
Not
Adodc1.Recordset.EOF
Then
Text1.Text
=
Adodc1.Recordset.Fields("line1")
End
If
End
Sub
‘捌’ 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)
就可以执行了
‘玖’ VB中调用SQL语句的问题
改成这样就可以了
,你掉了单引号
ssql
=
"insert
into
login(UserName,PassWord)
values
('"
&
TxtUserName.Text
&
"','"
&
TxtPW.Text
&
"')"
PassWord这个词是
access
的关键字,你在Login中
将它改为UserPassWord,再把程序中的PassWord改为UserPassWord
,
就可以了