vb和sql
Ⅰ vb和sql有什么联系吗,咋就感觉着两种语言有点相似呢 求高手解答啊,谢谢啦,。
SQL是结构化查询语言(或者说数据库搜索引擎),其他程序设计语言(VB、VC、Delphi等等)可以通过SQL连接数据库。打个比方:如果说数据库是仓库,那么SQL就是仓库管理员,其他程序设计语言(比如VB)就是来仓库取货的,他们都要经过管理员的授权同意以及协助才能从仓库中取到所需的货物。不知道这样比喻,能帮助你理解吗?
Ⅱ vb如何和SQL连接起来,告急
Vb6.0连数据库
1.1 ADO(ActiveX Data Object)连接方式
在连接数据库前,首先要在Visual Basic 6.0菜单中“工程”—>“引用”中选择Microsoft ActiveX Data Objects 2.6 Library 和Microsoft ActiveX Data Objects Recordset 2.6 Library这两个组件。
实例:以建立登陆系统为例,介绍无源数据库连接。在Microsoft SQL Server 2000 中建立一个Student 的数据库,在Student数据库中建立login_user(name,password)的数据表,Microsoft SQL Server服务器的名为data_server。代码如下:
Option Explicit
Public LoginSucceeded As Boolean
'引用Microsoft ActiveX Data Objects 2.6 Library
'定义连接对象和记录集
Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
'对取消按钮单击事件的响应
Private Sub cmdCancel_Click()
'设置全局变量为 false
'不提示失败的登录
LoginSucceeded = False
Me.Hide
End Sub
'对登录按钮单击事件的响应
Private Sub cmdOK_Click()
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
'建立无源数据库连接
conn.ConnectionString="driver={sql server};server=data_server;uid=sa;pwd=;Database=student"
conn.ConnectionTimeout = 50
conn.Open
Dim str As String
'连接连接对象
Set rs.ActiveConnection = conn
'设置游标类型
rs.CursorType = adOpenDynamic
If Trim(txtUserName.Text = "") Then
MsgBox "用户名不能为空,请重新输入用户名!", vbOKOnly + vbExclamation, "警告"
txtUserName.SetFocus
Else
'设置查询字符串
str = "select * from login_user where name ='" & Trim(txtUserName.Text) & "'"
rs.Open str
If rs.EOF = True Then
MsgBox "没有这个用户,请重新输入用户名!", vbOKOnly + vbExclamation, "警告"
txtUserName.SetFocus
Else
'登录成功,连接主窗口
If (Trim(txtPassword.Text) = Trim(rs.Fields("password"))) Then
LoginSucceeded = True
Me.Hide
main.Show
Else
MsgBox "密码不正确,请重输入密码!", , "警告"
txtPassword.SetFocus
SendKeys "{Home}+{End}"
End If
End If
End If
End Sub
2 通过配置ODBC环境,进行数据源的注册,对数据库进行连接、访问和操作。
2.1 ODBC数据源分为以下三类:
(1) 用户DSN:只有创建数据源的用户才可以使用他们自己创建的数据源,而且只能在当前的计算机上使用。
(2) 系统DSN:任何使用你的计算机的用户和程序都可以使用的DSN。
(3) 文件DSN:除了具有系统DSN的功能之外,还能被其它用户在其它计算机上使用。
2.2 创建ODBC数据源的步骤
(1) 启动控制面板。
(2) 双击ODBC图标,启动ODBC数据源。
(3) 换到“用户DSN”标签,单击“添加”。选择SQLServer作为数据源的驱动程序。
(4) 为数据源命名,按提示操作即可创建ODBC数据源。
2.3 创建数据库连接
创建数据源是进行有源数据库连接的第一步,下面同样是运用ADO对象模型的主要元素Connection(连接)进行源数据库连接。
ConnectionString是Connection对象的属性名称,提供数据提供者或服务提供者打开到数据源的连接所需要的特定信息,包括Database、DSN、UID等。
(1) Database:字符串表达式,指定服务器上的数据库名称。
(2) UID:字符串表达式,为ODBC数据源指定用户标识(用户账号名)。
(3) PWD:字符串表达式,为ODBC数据源指定用户口令。
(4) DSN:字符串表达式,指定连接的ODBC 数据源名称。
利用已配置好的ODBC数据源进行连接。
实例:以建立查询系统为例,介绍有源数据库连接。创建ODBC数据源名称为stud,通过ADO与数据库student进行连接,代码如下:
Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
Private Sub Form_Load()
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
conn.ConnectionString = "dsn=stud;uid=sa;pwd=;database=student"
conn.Open
Dim str As String
Set rs.ActiveConnection = conn
rs.CursorType = adOpenDynamic
str = "select * from login_user"
rs.Open str
txtUserName.Text = rs.Fields("name")
txtPassword.Text = rs.Fields("password")
End Sub
Ⅲ vb怎么和sql连接
Dim db As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim SQL As String
Private Sub Command1_Click()
db.Open "Provider=SQLOLEDB;DATABASE=ep;UID=sa;pwd="
SQL = "select line3 from table1 where line1=" & Val(Text1.Text) & " and " & _
"line2=" & Val(Text2.Text)
rs.Open SQL, db, 1, 3
Text3.Text = rs.Fields("line3")
rs.Close: db.Close
Set rs = Nothing
Set db = Nothing
End Sub
'注意,ep的用户名为sa,可按实际更改,密码为空,也可加上,另外line1和line2的字段属性如果不为数值,请将val改成相应的转化函数,如文本为str(text1.text)
Ⅳ 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
Ⅳ Sql数据库和vb的连接
'使用ADODB对象,必须先进行对象模型的引用,步骤如下
'通过菜单[工程] -- [引用],勾选 Microsoft ActiveX Data Object 2.6 Library
'Microsoft ActiveX Data Object 2.7 Library
'Microsoft ActiveX Data Object 2.8 Library
'都可以
完整的代码以及相关注释如下:(代码完全可以复制使用)
需要在窗体上添加一个按钮和一个DataGrid1控件
Option Explicit
Private Sub Command1_Click()
'>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>基本知识>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
'ADODB对象模型,是VB用来操作数据库的有力工具,其中两个对象最有价值;
'1.ADODB.Connection -- 用来连接数据库文件:
'主要完成对数据库以及数据表的操作;比如:创建数据库,创建、删除、复制数据表等等。
'2.ADODB.Recordset -- 用来返回数据记录集:
'主要完成对记录的操作;比如:返回记录,添加、删除记录等等。使用SQL语句可以实现强大的功能。
'下面简单介绍使用ADODB对象进行数据库操作的步骤
'一,声明并实例化对象
Dim Conn As ADODB.Connection '声明连接数据库对象 -- 用来连接数据库文件,并对数据库以及数据表的操作
Dim Rst As ADODB.Recordset '声明数据记录集对象 -- 用来返回数据记录集,并对记录的操作
Set Conn = New ADODB.Connection '数据库对象的实例化
Set Rst = New ADODB.Recordset '记录集对象的实例化
'二,连接数据库文件
'执行 ADODB.Connection对象的Open方法,完成数据库的连接
Conn.CursorLocation = adUseClient
'注意下面的一些参数,需要根据使用者的特定情况进行修改
'Password=密码 中的“密码”,是登录SQL SERVER 的密码
'User ID=实例名 中的“实例名”,是SQL SERVER 的实例名,一般使用“sa”
'Initial Catalog=数据库名 中的“数据库名”,只你要访问的数据库名
'Data Source=SQL SERVER服务器名 中的“SQL SERVER服务器名”是你要访问使用的安装了SQL SERVER的服务器计算机名
Conn.Open "Provider=SQLOLEDB.1;Password=密码;Persist Security Info=True;User ID=实例名;Initial Catalog=数据库名;Data Source=SQL SERVER服务器名"
'三,返回记录集
'执行 ADODB.Recordset对象的Open方法,获得记录集
'注意,把“数据表名”改为你的实际数据表名称
Rst.Open "Select * From 数据表名", Conn, adOpenKeyset, adLockPessimistic
Set DataGrid1.DataSource = Rst
Set Rst = Nothing '释放记录集对象
Set Conn = Nothing '释放数据库对象
End Sub
Ⅵ vb和SQL的问题
你mrc定义了
Dim mrc As ADODB.Recordset
不知道连接上了么。
完整的应该是:
Dim objcn As New ADODB.Connection
Dim student As New ADODB.Recordset
Set objcn = New Connection
With objcn
.Provider = "SQLOLEDB"
.ConnectionString = "uid=sa;pwd=123;Data source=127.0.0.1;initial catalog=student"
.Open
End With
Set mrc= New Recordset
With student
Set .ActiveConnection = objcn
.CursorLocation = adUseClient
.CursorType = adOpenStatic
.LockType = adLockOptimistic
.Open "select * from 携带物品"
End With
然后在进行数据库操作
mrc.AddNew
mrc.Fields(0) = Trim(Text1.Text)
mrc.Fields(1) = Trim(Text2.Text)
mrc.Fields(2) = Trim(Text3.Text)
mrc.Fields(3) = Trim(Text4.Text)
mrc.Update
MsgBox "携带物品登记成功!", vbOKOnly + vbExclamation, "警告"
mrc.Close
End Sub
这样应该就没有什么问题了吧
希望对你有所帮助
Ⅶ vb如何连接sql数据库
1、打开代码窗口,添加引用:Imports System.Data.SqlClient。
Ⅷ 关于SQL和VB的一些区别
sql是数据库操作语言,VB是计算机语言
VB是利用SQL语言来操作数据库
Ⅸ sql语言和VB语言的区别
sql是数据库语言,VB是编程语言
Visual Basic是一种由微软公司开发的包含协助开发环境的事件驱动编程语言。从任何标准来说,VB都是世界上使用人数最多的语言——不仅是盛赞VB的开发者还是抱怨VB的开发者的数量。它源自于BASIC编程语言。VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,可以轻易的使用DAO、RDO、ADO连接数据库,或者轻松的创建ActiveX控件。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。
结构化查询语言(Structured Query Language)简称SQL,结构化查询语言是一种数据库查询和程序设计语言,用于存取数据以及查询、更新和管理关系数据库系统;同时也是数据库脚本文件的扩展名。结构化查询语言是高级的非过程化编程语言,允许用户在高层数据结构上工作。它不要求用户指定对数据的存放方法,也不需要用户了解具体的数据存放方式,所以具有完全不同底层结构的不同数据库系统可以使用相同的结构化查询语言语言作为数据输入与管理的接口。结构化查询语言语句可以嵌套,这使他具有极大的灵活性和强大的功能。