路径,这种方法的优点是简单易操作,缺点是,当源文件换了地方后,要重新设置数据库的路径,否则连接不上数据库了。

一种是用代码设置数据库的路径,这种方法的优点就是只要源文件和数据库在同一文件夹下,无论移动到哪里都能连接上。

如果没有建立好数据库的话,先建立一个数据库,然后建立一个表比如我们建的表名为

message,然后把里面的字段名称和数据类型都按自己的需要设置好.然后保存就可以了. 打开Microsoft Visual Basic6.0 我用的是VB6.0,在需要调用数据库的窗体上加入一个adodc控件,默认名称为:Adodc1.默认的情况下工具栏里是没有这个控件的,可以打开工程---部件(快捷键CTRL+T),去掉只显示选定项的勾,然后勾上Microsoft ADO Data

Control(OLEDB),然后确定,工具栏就会多了一个adodc的控件。

第一种方法,设置adodc1的属以连接数据库.在adodc1控件上右键--Adodc属性--使用连接字符串--生成--Microsoft Jet 4.0 OLE DB Provider--下一步--选择或输入数据库名称---找到要连接的数据库后,确定.然后记录源设置属性. 如果要把内容提交到数据库一般使用adCmdTable. 表选择要连接的表。

设置完毕后就可以了.

如果我们想把内容提交到数据库.举个例子..

在窗体建立一个文本框,设置属性中的DataSource为adodc1 DataField为要连接的数据库的字段名。如果数据库中有字段,会让你选择。

设置好后在窗体加一个添加记录和一个提交的按钮,设置代码:

Private Sub Command1_Click()

Adodc1.Recordset.Update '保存

Adodc1.Refresh '刷新

End Sub

添加按钮代码:

Private Sub Command2_Click()

Adodc1.Recordset.AddNew '添加新纪录

Adodc1.Recordset(&uot;姓名&uot;).Value = Text1.Text

End Sub

第二种方法:

在窗体添加Adodc控件一个text控件 一个添加记录按钮一个提交按钮

在窗体设置代码:

Private Sub Form_Load()

Adodc1.ConnectionString = &uot;Provider=Microsoft.Jet.OLEDB.4.0;Data Source=&uot; + App.Path + &uot;\db1.mdb;Persist Security Info=False&uot; '设置数据库路径

http://www.doczj.com/doc/798125caf121dd36a22d821e.htmlmandType = adCmdText '设置记录源

Adodc1.RecordSource = &uot;select * from message&uot; '连接数据库的message表文件 Set Text1.DataSource = Adodc1

text1.DataField = &uot;

vb adodc连接mysql_VB中用ADODC控件连接ACCESS数据库相关推荐

  1. ado控件连接mysql_Delphi中用ADO控件连接数据库例子

    Delphi中用ADO控件连接数据库例子 翻译|其它|编辑:郝浩|2008-05-04 10:41:31.000|阅读 3871 次 概述: 一.说明 最近在写个"数据库管理系统框架程序&q ...

  2. ado控件连接oracle,在Delphi 7中用ADOConnection控件连接Oracle 9i的问题

    我在本地机器上安装了oracle客户端,其中tnsnames.ora文件中的内容如下: dbtest_212.113.74.23 = (DESCRIPTION = (ADDRESS_LIST = (A ...

  3. vc mysql控件_VC++使用ActiveX控件连接和操作数据库

    VS2008运用ActiveX控件连接和操作数据库关闭时一直有个内存释放的错误,好像使用VC6.0会多生成2个文件,就不会有问题. VC++使用ActiveX控件连接和操作数据库的方法分两种: 1.通 ...

  4. VB根据窗体自动调整窗体内控件大小 注:实用,可以直接引用

    代码如下: Option Explicit Private ObjOldWidth     As Long       '保存窗体的原始宽度 Private ObjOldHeight     As L ...

  5. Python PYQT5中用Label控件显示以numpy表示的灰度图像

    Python PYQT5中用Label控件显示以numpy表示的图像 rgb_img = cv2.cvtColor(img, cv2.COLOR_GRAY2RGB) # 灰度转为RGB q_img = ...

  6. #304 – 为没有文本标题的控件定义Access 键(Defining an Access Key That Gives Focus to a Different Control)

    有些控件,并没有自己的文本标题,他们可以通过与之相邻的Label来定义自己的Access 键.通过Access 键,他们可以获得输入焦点. 下面的例子中,在"Enter Name" ...

  7. vb ADO控件连接ACCESS数据库做登录密码的例子

    '准备好ACCESS数据库,建一个Uesr_id表,表中建两个字段就可以了. '在[工程]菜单下选择[部件]:在弹出的窗口内勾选[Microsoft ADO Data Control 6.0]然后确定 ...

  8. 在VB中用PictureBox控件实现特殊符号工具栏

    在几年前的一个试题库项目里,有一个这样的需求,需要输入特殊符号.因为各种不同的试题中,需要使用的特殊符号特别多,并且,不同类型的客户,需要输入的题目多种多样,能够用到的特殊符号也是五花八门.因此系统内 ...

  9. ASP.NET2.0中用Gridview控件操作数据

    在ASP.NET 2.0中,加入了许多新的功能和控件,相比asp.net 1.0/1.1,在各方面都有了很大的提高.其中,在数据控件方面,增加了不少控件,其中的Gridview控件功能十分强大.在本文 ...

  10. vb检测html事件,VB代码VB小程序:捕获 WebBrowser 控件的鼠标事件

    49. 捕获 WebBrowser 控件的鼠标事件 VB 的网页浏览控件 WebBrowser 没有 MouseDown.MouseMove.MouseUp 等鼠标事件,要在程序中捕获这些事件,必须另 ...

最新文章

  1. 神经网络总结(初稿)
  2. 基于倒谱法和线性预测法估计基音频率(MATLAB和Python)
  3. [NOTE] XVWA靶场练习笔记
  4. 迷宫算法——验证迷宫的可通性
  5. docker学习笔记(一)docker入门
  6. 小程序 cover-view 字体_【企商云】2021年,要知道的9个小程序开发流程清单
  7. 【剑指offer】62、圆圈中最后剩下的数字
  8. sql [Err] 1055 - Expression #1 of ORDER BY clause is not in GROUP BY clause
  9. paip.powerdesign cdm pdm文件 代码生成器 java web 页面 实现
  10. 简单游荣登东南快报 热门话题引争议
  11. 【收藏】来电显示Modem
  12. android打开超链接屏幕太小,手机屏幕太小,教你2种方法投屏到电脑上,小白也能轻松搞定!...
  13. 老人拿家谱自称傅友德后代,学者:朱元璋诛九族却放过了六岁小孩
  14. 【Python/Pytorch - Bug】-- RuntimeError: ,expected input[16,12,174,145] to have 8 channels,but got 12
  15. 80psi等于多少kpa_1kpa等于多少psi
  16. 近几天,被这个国家的最高科技奖刷屏了~
  17. 贝叶斯 定理_贝叶斯定理:批判性思维框架
  18. 【转】珍藏多年的素材,灵感搜寻网站
  19. 周杰伦讲给快手的“独家秘密”
  20. 判断小米 魅族 华为 系统 MIUI EMUI FLYME

热门文章

  1. PMP考试通关宝典,考生必看
  2. 计算机图形学学习记录(一) —— DDA画线算法
  3. 利用VBB仿真——实现摇杆控制流水灯
  4. Smart3D倾斜摄影建模教程
  5. 如何使用计算机蓝牙设备管理器,电脑蓝牙bluetooth怎么使用_win7蓝牙bluetooth使用教程-系统城...
  6. Macbook尝试破解WIFI密码
  7. 39个SEO经典案例
  8. 【拆机】小米路由器4
  9. 离散数学 习题篇 —— 谓词公式练习
  10. (转载)vmware workstation14永久激活密钥分享