精华内容
下载资源
问答
  • SQL语句调用MDB数据库多表演示,VB代码。演示不同表中基本情况表.姓名,基本情况表.学号,学生成绩表.课程,学生成绩表.成绩,学生成绩表,基本情况表,学生成绩表之间混合调用,其实也就是SQL复合语句一个操作...
  • 过程创建Access数据库设计窗体编写代码定义一个函数过程(这里仅仅是定义这样一个过程,后面的事件才是真真的调用这个过程并予以实现),在函数过程里面通过connectinstring来建立对数据库的连接,然后利用objrs获取...

    实例1

    1.任务

    创建基于数据库的“系统登录”界面

    2.过程

    创建Access数据库设计窗体编写代码

    定义一个函数过程(这里仅仅是定义这样一个过程,后面的事件才是真真的调用这个过程并予以实现),在函数过程里面通过connectinstring来建立对数据库的连接,然后利用objrs获取用户登录信息,其中用了if嵌套来是实现登录过程中出现的各种情况的应对。(这里应该就是米老师常说的为人民服务的宗旨,这里我想起来了一句海芳师姐的话,让用户躺在向日葵中。)

    3.经典的代码

    可能这并不是多么多么经典,只是应用过程中会用到很多次。

    Objcn.connetionstring=”provider=Microsoft.jet.oledb.4.0;”& “data source=” & app.path & “\数据库\实例1.mdb”

    Objcn.open

    或者是这个一个版本

    Strcn=”provider=Microsoft.jet.oledb.4.0;”&”data source =”& app.path &”\数据库\实例1.mdb”

    Objcn.connectionstring=strcn

    Objcn.open

    当然在之前还是要定义objcn为连接集的,这段代码说白了就是用来连接数据库用的。是直接可以拿来用的,可能要更改一下路径什么的。

    当然建立了数据库的连接,最后还是要释放的。就有下面这段你死了都不会忘了的代码了。

    Set objrs=nothing

    Objcn.close

    Set objcn=nothing

    可能大家有的顺序不一样,到目前为止我见过很多版本。还没有发现顺序对于运行有何影响。

    实例2

    1. 任务使用ADO实现对ODBC数据源的访问。(卡了?简单来说ODBC提供了对SQL语言的支持,用户可以直接将SQL语句送给ODBC。还能以统一的方式访问数据库。)

    2. 过程

    Set objcn=new connection

    Objcn.open”DSN=实例 2 DSN” Domain name system ‘

    这里的DSN ,中文域名系统一个DSN中至少应该包含如下一些内容:

    ◆关于数据库驱动程序的信息。

    ◆数据库存放位置。文件型数据库(如Access)的存放位置为数据库文件的路径;非文件型数据库(如SQL Server)的存放位置是指服务器的名称。

    ◆数据库名称。在ODBC数据源管理器中,所有的DSN名称是不能重复的。

    实例 3

    1. 任务

    使用 ADO Data 控件创建数据库连接

    2. 过程

    第一步:ADO Data控件连接数据库

    第二步:文本框显示数据

    Adodc1.caption="当前记录:"& Adodc1.RecordSet.AbsolutePosition & "\" & Adodc1.Recordset.Recordcount

    实例4

    1.任务

    利用DataGrid 控件和记录集分页特性显示数据分页

    2.过程

    第一步:添加Microsoft DataGrid Control 6.0(OLEDB)部件

    第二步:自定义过程用来显示当前记录页数据,并复制到记录集对象中,最后绑定DataGrid控件

    第三步:连接数据库和记录集对象

    出现的问题:对于实例4来说,其实我在实验过程中出现了很多问题。都是一些很小的细节,什么字母丢了,中英文切换错误。还是太粗心了。

    这个例子跟前面几个例子,有很多的相似的地方。不同的是这里用了一个datacrid控件,用来分页显示。

    实例5

    1.任务

    使用ADO Command对象实现数据库查询功能

    2.过程

    第一步;窗体加载时创建数据库连接和Command 对象

    下面是建立参数查询的代码

    Dim parm As New Parameter

    set parm =objcmd.createparameter("用户名",advarchar,adparaminput,10)

    objcmd.parameters.append parn

    set parm =objcmd.createparameter("身份",advarchar,adparaminput,10)

    objcmd.parameters.append parm

    第二步:执行查询结果

    第三步:关闭数据库连接

    实例5和实例4好像都是前面几个例子的综合,外加上几个很好用的控件来显示数据那种效果。Msflexgrid控件里面很多参数属性倒是挺新鲜的。(应该VB有接触,但是学的。。。)

    展开全文
  • begin Set Comm = CreateObject("ADODB.Command")  With Comm  .ActiveConnection = Conn  .CommandText = "CALL tt(@a)"  .CommandType = &H1 ... .CommandText = "Select @a 'ReturnV

    begin

    Set Comm = CreateObject("ADODB.Command")

     With Comm

     .ActiveConnection = Conn

     .CommandText = "CALL tt(@a)"

     .CommandType = &H1 'adCmdText .Execute

     .CommandText = "Select @a 'ReturnVal'"

    Set objRs = .Execute

    MsgBox objRs("ReturnVal")

    End With

    objRs.Close

    Set objRs = Nothing

    Set Comm = Nothing

    end

    出现1193错误

    展开全文
  • 过程创建Access数据库设计窗体编写代码定义一个函数过程(这里仅仅是定义这样一个过程,后面的事件才是真真的调用这个过程并予以实现),在函数过程里面通过connectinstring来建立对数据库的连接,然后利用objrs获取...

    实例1

    1.任务

    创建基于数据库的“系统登录”界面

    2.过程

    创建Access数据库设计窗体编写代码

    定义一个函数过程(这里仅仅是定义这样一个过程,后面的事件才是真真的调用这个过程并予以实现),在函数过程里面通过connectinstring来建立对数据库的连接,然后利用objrs获取用户登录信息,其中用了if嵌套来是实现登录过程中出现的各种情况的应对。(这里应该就是米老师常说的为人民服务的宗旨,这里我想起来了一句海芳师姐的话,让用户躺在向日葵中。)

    3.经典的代码

    可能这并不是多么多么经典,只是应用过程中会用到很多次。

    Objcn.connetionstring=”provider=Microsoft.jet.oledb.4.0;”& “data source=” & app.path & “\数据库\实例1.mdb”

    Objcn.open

    或者是这个一个版本

    Strcn=”provider=Microsoft.jet.oledb.4.0;”&”data source =”& app.path &”\数据库\实例1.mdb”

    Objcn.connectionstring=strcn

    Objcn.open

    当然在之前还是要定义objcn为连接集的,这段代码说白了就是用来连接数据库用的。是直接可以拿来用的,可能要更改一下路径什么的。

    当然建立了数据库的连接,最后还是要释放的。就有下面这段你死了都不会忘了的代码了。

    Set objrs=nothing

    Objcn.close

    Set objcn=nothing

    可能大家有的顺序不一样,到目前为止我见过很多版本。还没有发现顺序对于运行有何影响。

    实例2

    1. 任务使用ADO实现对ODBC数据源的访问。(卡了?简单来说ODBC提供了对支持,用户可以直接将ODBC。还能以统一的方式访问数据库。)

    2. 过程

    Set objcn=new connection

    Objcn.open”DSN=实例 2 DSN” Domain name system ‘

    这里的DSN,中文域名系统一个DSN中至少应该包含如下一些内容:

    ◆关于数据库驱动程序的信息。

    ◆数据库存放位置。文件型数据库(如Access)的存放位置为数据库文件的路径;非文件型数据库(如sql Server)的存放位置是指服务器的名称。

    ◆数据库名称。在ODBC数据源管理器中,所有的DSN名称是不能重复的。

    实例 3

    1. 任务

    使用 ADO Data 控件创建数据库连接

    2. 过程

    第一步:ADO Data控件连接数据库

    第二步:文本框显示数据

    Adodc1.caption="当前记录:"& Adodc1.RecordSet.AbsolutePosition & "\" & Adodc1.Recordset.Recordcount

    实例4

    1.任务

    利用DataGrid 控件和记录集分页特性显示数据分页

    2.过程

    第一步:添加Microsoft DataGrid Control 6.0(OLEDB)部件

    第二步:自定义过程用来显示当前记录页数据,并复制到记录集对象中,最后绑定DataGrid控件

    第三步:连接数据库和记录集对象

    出现的问题:对于实例4来说,其实我在实验过程中出现了很多问题。都是一些很小的细节,什么字母丢了,中英文切换错误。还是太粗心了。

    这个例子跟前面几个例子,有很多的相似的地方。不同的是这里用了一个datacrid控件,用来分页显示。

    实例5

    1.任务

    使用ADO Command对象实现数据库查询功能

    2.过程

    第一步;窗体加载时创建数据库连接和Command 对象

    下面是建立参数查询的代码

    Dim parm As New Parameter

    set parm =objcmd.createparameter("用户名",advarchar,adparaminput,10)

    objcmd.parameters.append parn

    set parm =objcmd.createparameter("身份",advarchar,10)

    objcmd.parameters.append parm

    第二步:执行查询结果

    第三步:关闭数据库连接

    实例5和实例4好像都是前面几个例子的综合,外加上几个很好用的控件来显示数据那种效果。Msflexgrid控件里面很多参数属性倒是挺新鲜的。(应该VB有接触,但是学的。。。)

    总结

    以上是编程之家为你收集整理的VB与数据库的交互经典例子总结全部内容,希望文章能够帮你解决VB与数据库的交互经典例子总结所遇到的程序开发问题。

    如果觉得编程之家网站内容还不错,欢迎将编程之家网站推荐给程序员好友。

    本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。

    如您喜欢交流学习经验,点击链接加入交流1群:1065694478(已满)交流2群:163560250

    展开全文
  • VB数据库的交互经典例子总结

    千次阅读 热门讨论 2012-08-06 17:55:08
    定义一个函数过程(这里仅仅是定义这样一个过程,后面的事件才是真真的调用这个过程并予以实现),在函数过程里面通过connectinstring来建立对数据库的连接,然后利用objrs获取用户登录信息,其中用了if嵌套来是实现...

    实例1

    1.任务

    创建基于数据库的“系统登录”界面

    2.过程

    创建Access数据库设计窗体编写代码

    定义一个函数过程(这里仅仅是定义这样一个过程,后面的事件才是真真的调用这个过程并予以实现),在函数过程里面通过connectinstring来建立对数据库的连接,然后利用objrs获取用户登录信息,其中用了if嵌套来是实现登录过程中出现的各种情况的应对。(这里应该就是米老师常说的为人民服务的宗旨,这里我想起来了一句海芳师姐的话,让用户躺在向日葵中。)

    3.经典的代码

    可能这并不是多么多么经典,只是应用过程中会用到很多次。

    Objcn.connetionstring=”provider=Microsoft.jet.oledb.4.0;”& “data source=” & app.path & “\数据库\实例1.mdb”
    
    Objcn.open
    

    或者是这个一个版本

    Strcn=”provider=Microsoft.jet.oledb.4.0;”&”data source =”& app.path &”\数据库\实例1.mdb”
    
    Objcn.connectionstring=strcn
    
    Objcn.open

    当然在之前还是要定义objcn为连接集的,这段代码说白了就是用来连接数据库用的。是直接可以拿来用的,可能要更改一下路径什么的。

    当然建立了数据库的连接,最后还是要释放的。就有下面这段你死了都不会忘了的代码了。

    Set objrs=nothing
    
    Objcn.close
    
    Set objcn=nothing 

    可能大家有的顺序不一样,到目前为止我见过很多版本。还没有发现顺序对于运行有何影响。

    实例2

    1. 任务使用ADO实现对ODBC数据源的访问。(卡了?简单来说ODBC提供了对SQL语言的支持,用户可以直接将SQL语句送给ODBC。还能以统一的方式访问数据库。)

    2. 过程

    Set objcn=new connection
    
    Objcn.open”DSN=实例 2 DSN” Domain name system ‘

    这里的DSN ,中文域名系统一个DSN中至少应该包含如下一些内容:

    ◆关于数据库驱动程序的信息。

    ◆数据库存放位置。文件型数据库(如Access)的存放位置为数据库文件的路径;非文件型数据库(如SQL Server)的存放位置是指服务器的名称。

    ◆数据库名称。在ODBC数据源管理器中,所有的DSN名称是不能重复的。

    实例 3

    1. 任务

        使用 ADO Data 控件创建数据库连接

    2. 过程

          第一步:ADO Data控件连接数据库

         第二步:文本框显示数据

    Adodc1.caption="当前记录:"& Adodc1.RecordSet.AbsolutePosition & "\" & Adodc1.Recordset.Recordcount

    实例 4

    1.任务

        利用DataGrid 控件和记录集分页特性显示数据分页

    2.过程

        第一步:添加Microsoft DataGrid Control 6.0(OLEDB)部件

        第二步:自定义过程用来显示当前记录页数据,并复制到记录集对象中,最后绑定DataGrid控件

        第三步:连接数据库和记录集对象

    出现的问题:对于实例4来说,其实我在实验过程中出现了很多问题。都是一些很小的细节,什么字母丢了,中英文切换错误。还是太粗心了。

    这个例子跟前面几个例子,有很多的相似的地方。不同的是这里用了一个datacrid控件,用来分页显示。

    实例5

    1.任务

    使用ADO Command对象实现数据库查询功能

    2.过程

         第一步;窗体加载时创建数据库连接和Command 对象

    下面是建立参数查询的代码

    Dim parm As New Parameter
    set parm  =objcmd.createparameter("用户名",advarchar,adparaminput,10)
    objcmd.parameters.append parn
    set parm =objcmd.createparameter("身份",advarchar,adparaminput,10)
    objcmd.parameters.append parm


         第二步:执行查询结果

         第三步:关闭数据库连接

    实例5和实例4好像都是前面几个例子的综合,外加上几个很好用的控件来显示数据那种效果。Msflexgrid控件里面很多参数属性倒是挺新鲜的。(应该VB有接触,但是学的。。。)


    展开全文
  • VB中通过MSChart控件生成图表,采用Access数据库,使用相对路径调用数据库文件,源程序代码如下:------------------------Private Sub btnCopy_Click()' 将数据和图表图片复制到剪贴板...
  • vb 连接 查询 修改 删除mysql数据库方法代码,直接调用就行。 SQLite是一款轻型的数据库,占用资源非常低,处理速度快。SQLite虽然很小巧,但是支持SQL语句不会逊色于其他开源数据库。无需安装和管理配置,储存...
  • VB生成DLL封装ASP代码_连接数据库,调用站点外部数据
  • 模仿电子名片盒界面程序,利用数据库,调用到程序界面上(VB6.0源代码编写),希望程序爱好者朋友不断完善.
  • VB.NET 与*.udl文件数据库连接调用

    千次阅读 2007-02-07 14:44:00
    但在VB.NET里调用*.udl文件时,有很大不同,VB6简单写上:file name=c:/*.dul就行了,但VB.net是通过读取文件方式来处理,下面是全部代码。与大家共享:在您用时只要调用这个类:Dim MyconnData As New ...
  • VB查询数据库之报表——机房收费系统总结(六)

    千次阅读 热门讨论 2013-12-13 12:58:41
    我们要用一个软件做报表模板、然后在VB里面添加部件、代码调用模板,详细步骤如下。 一、下载安装 首先做报表要下载安装Grid++Report 4.5 报表设计器 点击下载(内含破解补丁) 二、制作模板 1、打开软件...
  • vb登录与注册界面代码,不调用数据库,调用某一个文本文件中数据,如何验证用户名密码是否对应
  • 调用Excel课程表程序本例是先将数据库数据查询出来,用MSFlexGrid表格控件显示,然后将它导出'/////先引用execl9.0(VB6.0源代码编写)Dim excelApp As Excel.Workbook
  • VB6自动识别Access2000数据库路径,其实我没找到自动识别数据库路径的代码,这个可能和数据库版本关系不大,也可以是Access2003或2007.并可以查上一条记录,下一条记录, 数据库连接,查询语句,调用函数等功能,VB...
  • 实际上,在VB中从一种数据库类型转化为另一种数据库类型几乎不需要或只需要很少的代码修改。而且,尽管dBASE、Paradox本身的DDL (Data Definition Language,即数据定义语言)和DML(Data Manipulation Language,...
  • 建立一个模块将工程启动设置为 sub main在模块里写下面代码public db as databasepublic rs as recordsetsub main()set db=db.opendatabase("数据库路径")第一启动窗体.showend sub以后在其他窗体中如果要调用...
  • C#(VB.net)数据库访问操作类库 你知道,一些类库把常用操作封装起来,以后可以直接调用,就节省了普通开发人员大量精力. 对于CN 大多数公司都是开发MIS系统 说白了就是数据库系统 使用数据访问类库,必将节省大量...
  • oraCon = New OracleConnection(ConnString) '用于打开数据库的连接 If oraCon.State = ConnectionState.Closed Then '获取连接的当前状态,链接处于关闭状态 oraCon.Open() '打开一个数据库连接 ElseIf oraCon....
  • 无需部署即可使用sqlite演示程序程序用vb6编写,包含sqlite基本操作及性能测试,直接调用sqlite.dll中api函数。性能测试中演示了插入操作使用事务提交及不使用事务提交方式在时间上巨大差异。演示及性能测试...
  • 关于调用DTS包的代码

    千次阅读 2006-09-29 11:44:00
    数据库关于调用DTS包的代码 失败,没什么整理代码把调用DTS包的代码贴出来,也省得大家去查帮助了(需要更像喜请查看sql server帮助)以下代码根据sql server中vb代码转化#import 
  • 以下VB代码是用来向数据库中读写图片信息。函数中两个参数分别提供数据表中存储图片信息字段名和要存储图片路径信息。在读图片时提供数据表中存储图片信息字段名参数就可以了,我在做软件时用是ACCESS...
  •  编译时注意,如果你电脑上没有安装Office2003及以上版本话,可能会影响编译,源代码调用了几个Office组件:Excel和Word,特此提醒。  本系统功能有:基础资料维护、计量单位、部门管理、货品类别、货品管理...
  • 比如我输入“张三 李四”,就可以在数据库中查找包含张三和李四记录,而且这个函数调用很方便,下面就看代码吧。 代码 Private Function MultiSQLSearch(TableName As String,SearchFields As String, ...
  • 代码中 SqlCmd.Execute (ReturnValue) '执行存储过程,并将返回值赋给ReturnValue 这一行出错 实时错误'-2147217904 (80040e10)' 过程或函数'Book_Borrow'需要参数'@out_str',但未提供该参数 希望有高手可以帮我...
  • 个人小白,一个多月前想通过 MenuStrip控件调用数据库数据生成多级联动下拉菜单,结果网上资料都只是部分代码可用。经过一个月东拼西凑终于能实现功能了。。。欢迎各位大神指正不足之处 思路很重要 MenuStrip...
  • graphdb.ZIP 从数据库中读取数据并将它放入图形中,需要mschart ocx (6KB) 14,binarydb.ZIP 快速数据库的编程实现 (11KB) 15,tysjk.zip 数据库观察器(8KB) 16,creatmdb.zip 用代码在程序...
  • 在你程序中添加以下代码,即可使用数据库连接了。 里面还定义了一些其他连接,自己慢慢研究调用吧。下面给你一个调用验证实例: dim sconn As New sql_conn Dim dt As DataTable = sconn.ExecuteSql("Select name...

空空如也

空空如也

1 2 3 4 5 ... 13
收藏数 245
精华内容 98
关键字:

vb调用数据库的代码