VB怎么调用数据库数据

作者&投稿:中叔骂 (若有异议请与网页底部的电邮联系)
VB如何调用并使用数据库~

连接很简单,你可以用手动在VB中连接。但是你必须建立datagrid控件,用来存储数据在vb中显现。
或者写入公共模块代码。如下:

Public Sub main()
adocon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\saint.mdb;Persist Security Info=False"
End Sub 其中saint.mdb代表你做的数据库。其他的代码你不用改。

Function cnn() As ADODB.Connection
Set cnn = New ADODB.Connection
cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\saint.mdb;Persist Security Info=False"
End Function
该段定义你的ado数据连接,用cnn代表你的连接字符。


你做程序的时候要在datagrid控件里测试数据库的连接。要保证它连接的正确性。否则不能使用。

你要想调用数据库中的表,还需用到 select语句其实也并不是太复杂。不过内容较多。你可以买本教材看上一个星期大概就能上手了。

不知你满意否。

没有VB引用数据库这个说法的啊。按你的要求,这个当然是连接到数据库,然后用SQL命令去查询用户名和密码是否正确了啊。

VB连接Access数据库_百度文库
http://wenku.baidu.com/link?url=97gP6aN4h-B-2i5Ri6Pj5S262XbMy2JnCORINd915WvpKvrAiXJUIFkzDEp9isLaR2risStnFoXIuqYS4H6zjgpu_rkcLlCPQ3rtdNIb4Oe

至于SQL命令,和你怎么设计的,字段之类的都相关,你要自己写了。

VB可将Sql结构化查询语句赋值Ado(ActiveX 数据对象)或ADO Data 控件,访问和操作数据库。

ADO (ActiveX 数据对象),这项新的数据访问技术的特性包括:更简单的对象模型;与其它 Microsoft 和非 Microsoft 的技术更好的集成;为本地和远程数据数据提供的通用接口;可远程访问的和断开的记录集;用户可访问的数据绑定接口;以及层次结构的记录集。

ADO Data 控件, 这是一种新的、OLEDB 识别的数据源控件,其功能与内部的 Data 控件和 Remote Data 控件十分相似,通过这种方式允许用户用最少的代码来创建数据库应用程序。

Visual Basic 6.0 中,已经可以将任何 ADO/OLE DB 数据源绑定到任何 ADO/OLE DB 数据使用者上。在运行时,可以设置控件的 DataSource 属性来将控件动态地绑定到数据源。可以创建用作数据源和数据使用者的类,并且通过新的 BindingsCollection 对象将这些类绑定在一起。可以创建与 ADO 数据控件相似的、用作数据源的用户控件。还可以创建与 DataGrid 控件相似的、复杂绑定的用户控件。

以下是经ADO (ActiveX 数据对象)访问Access数据库的实例代码:

    Dim cnn As New Connection
    Dim rs As New Recordset
    Dim sql As String
    Dim ARR
    cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\wdOld.mdb;Persist Security Info=False"
    sql = "select 故障名称 from guzhang_bm"
    rs.Open sql, cnn
    Combo1.Text = "故障名称"
    Do While Not rs.EOF
        Combo1.AddItem rs("故障名称")
        rs.MoveNext    '打开表
    Loop
    rs.Close
    cnn.Close

以下是使用ADO Data 控件访问Access数据库德实例代码:

    Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\wd.mdb;Persist Security Info=False"
    Adodc1.RecordSource = "select * from jishijilu" ' where shijian like'%8112%' And gyh_riqi like'%10%'"
    Adodc1.Refresh
    Set MSHFlexGrid1.DataSource = Adodc1
    MSHFlexGrid1.Row = 1
    MSHFlexGrid1.ColSel = MSHFlexGrid1.Cols - 1


需要在 工程 引用 Microsoft ActiveX Data Objects 2.8 Library

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
cn.Open "provider=microsoft.jet.oledb.4.0;data source-" & App.Path & "\EE.mdb"
rs.Open "A", cn, adOpenKeyset, adLockOptimistic
rs.MoveFirst
Do While rs.EOF = False
Print Right(Trim(rs.Fields("a")), 1); Left(Trim(rs.Fields("a")), 1)
rs.MoveNext
Loop
cn.Close

DimMyConnectionAsNewOleDbConnection("rovider=Microsoft.Jet.OLEDB.4.0;DataSource="&Application.StartupPath&"\test.mdb")
DimMyCommandasOleDbCommand
DimMyReaderAsOleDbDataReader

MyConnection.Open()
MyCommand=NewOleDbCommand("SELECT*FROMmyUserWHEREUserID='test'",MyConnection)
MyReader=MyCommand.ExecuteReader()
DimTempStringAsString
WhileMyReader.Read
TempString=MyReader("assword")
msgbox(TemPString)
EndWhile
MyConnection.Close()
MyReader.Close()
MyCommand.dispose()


帮忙解释一下这段vb代码如何实现的调用access数据库中的数据的?
回答:现在都是用vb.net了,不要在这个老版本的程序上学习了.

【求助】关于VB调用Access数据库多表操作的问题
描述有点问题,按你的说法,B的data_score应该是140,因为spinach最后以行也是W,应该要加的。按你的描述我写的SQL如下:select data_name, sum(data_score) from (select data_name, sum(data_limit) as data_score from spinach where data_WiLo='W' and data_Date='传进来你输入的日期'union...

a电脑如何访问b电脑的sqlserver数据库?
视你SQLServer版本,2008以上版本可以在“对象资源管理器”里右键连接到的数据库服务器,打开“服务器属性”,进入“连接”,勾选“允许远程连接到此服务器”。开始菜单中打开"SQLServer 配置管理器",进入“SQLServer 网络配置”选项卡,进入需要开放远程访问的Server,在右侧选择TCP\/IP,将“已启用”设定为...

用VB做怎么将Excel数据导入SQL数据库中?
用VB做,将Excel数据导入SQL数据库中:法一:可以试着用VB书写一段调用SQL Server数据库DTS的代码,然后就可以像直接使用DTS进行数据导入一样就行Excel与SQL Server数据之间的迁移了。方法二:可以用VB来 作EXCEL,然后一条数据一条数据的 入到数据库中,这种方法不 使用,因为VB 作EXCEL是非常慢的,如果...

数据库a的数据,然后插入数据库b,该怎么写
B数据库存在表 use B go insert into tablename select * from A【.schema】.tablename B数据库不存在表,用下面语句就省得建表了 use B go select * into tablename from A【.schema】.tablename schema系统默认的是dbo,可以根据自己的需要做修改 ...

A网站通过调用B网站的接口向B网站的数据库写数据 .net如何实现?_百度...
1,用file_get_contents函数获取网页代码,然后截取或是通过正则 2,在ASP网站中,做一个单独页面供PHP网站调用;在PHP网站中,可通过js代码调用。3,如果是SQL server 数据库,直接访问数据

vb如何设置同时操作多个数据库
我教你怎么跨数据库(跨服务器都可以)操作多数据表:用ACCESS,就用他的一个ODBC功能做桥接,在VB中连接ACCESS数据库照常 我就给个ADO连接ACCESS连接SQL多数据库连接表联合查询三个数据库数据表的例子:Private Sub 控件名称_事件过程(变量)Dim A, B, C as String '---定义变量来存字符串 Adodc1...

有两个单独的数据库A和B,如何将数据库A中的表通过配置到数据库B中
不需要配置,直接引用即可,比如量个数据库DB1和DB2,DB1中有表T1,DB2中有表T2,两个表中都有属性ID,现通过ID将两个表关联查询,可以这样写:SELECT A.*,B.* FROM DB1.dbo.T1 A JOIN DB2.dbo.T2 ON A.ID=B.ID

...而b.jsp又需要从数据库中获取数据,即需要连接java类,求大侠指导怎么...
这个简单,a页面提交到servlet 获取数据后保存在session或request里后跳转到b页面,在b页面调用保存的信息即可。也可以使用过滤器filter等等。

excel中如何把1个工作表中的数据自动调入到另外一个工作表中进行计算...
在另一个工作表里面设置引用这个工作表的内容即可,如:在Sheet2里面,输入 =Sheet1!A1 回车,就引用了Sheet1工作表当中的A1内容,你想怎么计算直接设置就行。

剑川县18534979618: VB如何调用并使用数据库 -
展炒凯福: 连接很简单,你可以用手动在VB中连接.但是你必须建立datagrid控件,用来存储数据在vb中显现. 或者写入公共模块代码.如下: Public Sub main() adocon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\saint....

剑川县18534979618: 在VB中如何调用数据库,用什么控件什么语句 -
展炒凯福: Public Function ConnectString() _As StringConnectString = "FileDSN=info.dsn;UID=sa;PWD=23" '连接字符器,改成你自己的End FunctionPublic Function ExecuteSQL(ByVal SQL _As String, MsgString As String) _As ADODB....

剑川县18534979618: Vb中如何调用数据库中的内容 -
展炒凯福: private sub form_load() '-----------ACCESS数据库Dim strAppPath As String strAppPath = App.Path If Right(strAppPath, 1) <> "\" Then strAppPath = strAppPath & "\" End If strAppPath = strAppPath & "BigText.mdb" ConnectString = "...

剑川县18534979618: VB中怎么调用数据库中新添加的数据 -
展炒凯福: 你可以关闭RecordSet,然后重新执行Select指令读取数据,然后更新窗体表格内容,可以把这一段代码做一个函数,在数据库添加或修改数据后调用.

剑川县18534979618: VB怎么调用数据库数据
展炒凯福: VB可将Sql结构化查询语句赋值Ado(ActiveX数据对象)或ADOData控件,访问和操作数据库.ADO(ActiveX数据对象),这项新的数据访问技术的特性包括:更简单的对象模...

剑川县18534979618: vb中,如何调用数据库中的某一行数据
展炒凯福: 先连接数据库,建立数据集,查询中可用游标进行某行数据的调用. 你三个文本框对应数据集的三个字段,由游标控制当前记录,并刷新文档框.

剑川县18534979618: vb是通过什么语句调用数据库的? -
展炒凯福: ADO 全含义是“数据访问对象”也就是某个编程语言提供的一组访问数据库的组件库,根据语言及平台不同而有所区别.SQL全含义是结构化查询语言,是关系型数据库的国际规范数据库操作语言.VB是通过SQL语句调用数据库的.

剑川县18534979618: VB怎么调用数据库表中的某一具体值 -
展炒凯福: 首先连接数据库:: 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 objstudent = New ...

剑川县18534979618: 如何在VB中操作数据库 -
展炒凯福: 要查找数据库信息,关键是要解决链接数据库的问题,下面简述Vb如何SQL数据库:有两种方法可以实现,一种是通过ODBC数据源的配置进行连接,一种是通过纯代码编辑进行连接,下面我们就详细介绍一下这两种连接方法.ODBC数据源...

剑川县18534979618: VB怎么调用数据库数据 -
展炒凯福: 需要在 工程 引用 Microsoft ActiveX Data Objects 2.8 LibraryDim cn As New ADODB.ConnectionDim rs As New ADODB.Recordsetcn.Open "provider=microsoft.jet.oledb.4.0;data source-" & App.Path & "\EE.mdb"rs.Open "A", cn, ...

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 星空见康网