西工大VB实验五数据库建立ACCESS

实验五、关系数据库基础Access

实验要求：

1．熟悉Access 2003 的环境。掌握 Access 2003的启动与退出；熟悉并掌握数据库文件的建立与打开。

2．熟悉数据库基本表的创建方法；掌握基本表中数据的录入方法。

3．熟悉数据库表结构的修改方法；熟悉数据库表中各属性的设置方法。

4．掌握VB可视化数据管理器创建数据库基本表方法。

实验内容1：可视化数据管理器

选择“外接程序”菜单下的“可视化数据管理器”项就可以启动数据管理器，打开“VisData”窗口。建立数据库student.mdb中的表定义：

学生成绩表

字段名类型宽度

学号 Text 6

课程 Text 10

成绩 Long 4

学期 Text 2

基本情况表

字段名类型宽度

学号 Text 6

姓名 Text 10

性别 Text 2

专业 Text 10

出生年月 Date 8

照片 Binary 0

备注 Memo 0

（1）建立数据库结构

单击“文件”菜单中的“新建”命令，在“新建”级联菜单中选择“Microsoft Access”，再选择“Version7.0 MDB”项，在“选择要创建的Microsoft Access数据库”窗口中选定新建数据库的路径并输入数据库名，这里为student.mdb。

（2）添加数据表

将鼠标移到数据库窗口区域内，单击鼠标右键，在弹出的菜单中选择“新建表”命令，出现“表结构”对话框，利用对话框可以建立数据表的结构。

在“表名称”中输入“基本情况”( 和“学生成绩”)，然后添加基本情况表的字段，单击“添加字段”按钮，填入字段的信息。

（3）录入数据

在工具栏上选定“动态集类型记录集”显示风格的按钮，然后在要录入数据的数据表上单击鼠标右键，选择“打开”选项，则出现以网格风格显示数据的窗口，如果此表中已有数据，则此时会显示出此表中的全部数据；若此表中无数据，则会显示出一个空表。

vb6.0连接sql2000数据库的具体步骤

vb6.0连接sql2000数据库的具体步骤 悬赏分：200|解决时间：2010-3-1310:01|提问者：能者天下 初学vb6.0，希望能有具体的步骤，我用sql做的是一个学生成绩管理系统，要做前台界面，用vb做，无从下手，望高手指点了，谢谢！有详细视频教程的网站或现成的视频也可以。 最佳答案 VB6.0使用ADO对象连接数据库： 有偿征集原创文章，为您创收投递文章减小字体增大字体 1．定义连接对象Global DBconnect As New ADODB.Connection2．执行连接语句If DBconnect.State=adStateOpen And Not IsEmpty(adStateOpen) Then DBconnect.Close l连接ODBC DBconnect.ConnectionString="dsn 1．定义连接对象 Global DBconnect As New ADODB.Connection 2．执行连接语句 If DBconnect.State=adStateOpen And Not IsEmpty(adStateOpen)Then DBconnect.Close λ连接ODBC DBconnect.ConnectionString= "dsn=DataAliasName;uid=UserID;pwd=Passwd;" λ直接连接Access为 Dbconnect.Provider="Microsoft.jet.OLEDB.4.0"//Access97为3.51 DBconnect.ConnectionString="FilePathFileName.mdb" λ连接Oracle DBconnect.Provider="MSADORA" DBconnect.ConnectionString="user/mypass@servicename λ连接SQL Server DBconnect.Provider="SQLOLEDB.1" DBconnect.ConnectionString="DATABASE=;SERVER=;UID=;PWD=;" 或者可以使用DBconnect.Open"SERVER","USERID","PASSWORD" DBConnect.Open 3．取查询结果集 Global RS As New ADODB.Recordset Global PS As New ADODB.Recordset If RS.State=adStateOpen And Not IsEmpty(adStateOpen)Then RS.Close RS.Open SQLStr,DBconnect,adOpenKeyset 4．执行SQL语句 DBconn.Execute SQLStr

vb连接ACCESS数据库实例

vb连接ACCESS数据库实例 下面给你一个用ADO的代码链接的实例：（ACCESS 2003) 首先在工程中点击【工程】-【引用】，在打开的对话框选择Microsoft AxtiveX Data Objects 2.8 Library 勾选，然后定义二个对象： Dim conn As New ADODB.Connection, rs As New ADODB.Recordset 其中conn是数据库链接对象，rs是数据记录集对象 那么，下面就是利用SQL语句链接数据库了： conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\library\1.mdb;Jet OLEDB:Database Password=" strSQL = "SELECT * FROM 数据库中的表" rs.Open strSQL, conn, 3, 3 至此数据库已经链接成功，并且已经加载了记录集，下面你就可以进行数据操作了，注意，在数据库操作完成后，千万别忘记关闭记录集和数据库链接对象： rs.Close conn.Close '首先，工具->引用->选中Microsoft ActiveX Data Objects 2.X Library '必须选中，否则下面代码不会起作用！（以下链接数据库之方式，不需要使用ADODB控件，仅需代码即可） Public Conn As New ADODB.Connection Public Rs As New ADODB.Recordset Public Cnt As Integer '这个Cnt是用来表示数据库数据总量的，对链接过程无关 '连接数据库的代码段 Conn.CursorLocation = adUseClient '以Conn为链接名建立链接，这里是设置数据游标（客户端数据游标），即设定读取数据库数据之方式（一行一行地读） Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\test.mdb" '自己改动一下上面的路径和文件名即可，其他的代码你不理解照粘贴无妨 If Rs.State <> adStateClosed Then Rs.Close Rs.Open "SELECT 铺名, 上月读数, 本月读数, 实用度数, 铺位数, 首层面积, 非经营层 面积, 欠费明细, 欠费金额FROM data WHERE 首层面积is not null and 非经营层面积 is not null;", Conn, adOpenKeyset, adLockPessimistic Cnt = Rs.RecordCount '关闭数据库链接（一般放到子过程结束处，关闭数据库链接） Rs.Close Conn.Close Set Rs = Nothing

DB1-西工大数据库实验一数据库及表的创建和管理

《数据库原理》实验报告 题目：实验一 学号姓名班级日期数据库和表的创建与管理 一.实验内容、步骤以及结果 1.利用图形用户界面创建，备份，删除和还原数据库和数据表（50分，每小题5分） 数据库和表的要求（第四版教材第二章习题5要求的数据库） 数据库名：SPJ，其中包含四张表：S表, P表, J表, SPJ表 图2.1 S表(供货商表) 图2.2 P表(零件表) 图2.4 SPJ表(供应情况表) 图2.3 J表(工程项目表)

完成以下具体操作： (1)创建SPJ数据库，初始大小为10MB，最大为50MB，数据库自动增长，增长 方式是按5％比例增长；日志文件初始为2MB，最大可增长到5MB，按1MB 增长。数据库的逻辑文件名和物理文件名均采用默认值。 (2)在SPJ数据库中创建如图2.1-图2.4的四张表(只输入一部分数据示意即可)。 (3)备份数据库SPJ（第一种方法)：备份成一个扩展名为bak的文件。（提示：最 好先删除系统默认的备份文件名，然后添加自己指定的备份文件名） (4)备份数据库SPJ（第二种方法)：将SPJ数据库定义时使用的文件(扩展名为 mdf,ldf的数据文件、日志文件等)复制到其他文件夹进行备份。 (5)删除已经创建的工程项目表(J表)。 (6)删除SPJ数据库。（可以在系统默认的数据存储文件夹下查看此时SPJ数据库 对应的mdf,ldf文件是否存在） (7)利用备份过的bak备份文件还原刚才删除的SPJ数据库。（还原数据库） (8)利用备份过的mdf,ldf的备份文件还原刚才删除的SPJ数据库。（附加） (9)将SPJ数据库的文件大小修改为100MB。 (10)修改S表，增加一个联系电话的字段sPhoneNo，数据类型为字符串类型。 实验具体步骤： （1）创建SPJ数据库：右击数据库-->新建数据库-->填写相应参数-->点击确定。如下图： （2）在SPJ数据库中创建四张表：单击数据库SPJ-->右击‘表’-->新建表-->填写参数-->确定。如下图：

VB如何连接ACCESS数据库详解

首先有一点要注意,数据库的使用与我们以往所使用的文本文件不同.例如我们使用文本文件,来记录各种有用的数据.那么大致有以下几步: 读取文件 -- 格式化数据 -- 关闭文件 -- 使用数据 如果数据量较大,需要进行筛选,且存放数据的源文件可能不定时变更,那么我们可以用一个临时文件来存放有用的数据,这样可大大提高程序的效率.要[格式化数据]时,我们首先要进行筛选,然后还得进行分类,这样文件中的字符串才能被转换成有用的信息来供程序使用.这样一来,不用说,处理速度将大大减慢,而且就算你设计的数据格式比较科学,当数据量非常大时,文件的容量也会变的让普通计算机无法承受. 相对文本文件来说数据库的使用也大致分为以下几步: 打开数据库 -- 查找数据 -- 使用数据 -- 关闭数据库 从中可以看出,里面少了一步格式化数据,因为数据库本身在存储数据时,它就是按照一定的格式来进行存储的. 其次是,数据库与文本文件返回数据的方法不同.如果把文本文件比作一个Textbox 的话,那么数据库更像是一个ListBox.使用文本文件时我们需要从整个Textbox中取出有用的信息,并进行处理,而Listbox则可以根据需要返回特定的某一项. 由于VB本身并不带有可以访问数据库的类,所以我们需要引用一个包含能访问数据库的类来使用数据库.这里我们采用ADODB,相比DAO和能访问数据库的API 来说,它比DAO更灵活,更强大;而比起API,它更简单易用,更适合初学者.而Access数据库比起SQL,也相对简单了很多,且能够满足中小型应用程序的需要,所以我们在使用数据库时,选择了Access. 就像使用文本文件来存储数据一样,我们需要先设计好数据结构,只不过在设计Access数据库的结构时,我们需要用到其它的程序来进行详细的规划.建议采用的程序是office中的Access或VB自带的VISDATA. 当数据库设计好了以后,我们可以开始"数据库编程"了. 首先,我们需要引用ADO.具体的方法是,在"工程" -- "引用" 中,找到"Microsoft ActiveX Data Object *.* Library",这里的"*.*"是指的时ADO的版本号,一般来说,应用程序或ActiveX控件都具有向下兼容性,所以我们尽可能选择比较新的版本.以确保程序在能识别旧版本Access的同时,也能识别较新版本的Access. 然后我们需要在程序中创建一个对象.就好比我们在窗体上添加一个FileBox才能看到文件名一样,只有创建了ADO对象,我们才能够访问数据库.常用的对象有两个,Connection和Recordset.

Access实验报告

Access数据库实验报告 院系：计算机科学与技术学院 班级：1205班(文理) 姓名：李奇 学号：2012415210104

实验目的： 1.掌握Access数据库的创建和打开 2.掌握Access中数据表的设计和创建及维护。 3.掌握Access中窗体、查询、报表等的设计和创建 4.熟练掌握SQL结构化查询语言。 5.初步掌握数据库系统的开发与应用 6.并对Access做一定的总结 实验内容与步骤： 1.Access数据库的建立和维护： 了解数据库、数据库管理系统，数据库系统的概念；了解Access数据库；了解表；了解数据的录入和维护；了解数据表间关联；了解数据表对象的复制、删除与更名，学会创建“教务管理”数据库；学会利用表设计视图创建表；学会导入表；学会建立表间联系；学会修改表结构；学会操作表记录 2.Access查询、窗体和报表： 了解查询及创建方法；了解窗体及创建方法；了解报表及创建方法；学会选择查询、参数查询、总计查询；学会窗体设计；学会报表设计 3.结构化查询语言（SQL)：

了解SQL语言；理解数据定义语言，掌握数据库对象的建立（CREATE）、删除（DROP）和修改（ALTER）等操作；理解数据操纵语言，掌握数据操作的命令由插入（INSERT）、删除（DELETE）、更新（UPDATE）、检索（SELECT）等组成；掌握SQL语言的核心——SELECT语言；学会使用SQL查询；使用报表向导创建基于SQL查询数据源的报表；学会SQL语句创建表；学会使用SQL语句修改表结构、表记录；学会使用SQL语句创建查询 第二章构建Access数据库 一、创建Access数据库的方式 <1>. 使用数据库向导创建数据库 1．跟随Access的数据库向导创建“讲座管理”数据库 步骤： （1）启动数据库向导，打开数据库“模板”对话框 （2）启动“数据库向导” （3）回答向导提出的问题 （4）自动创建数据库及数据库对象 “我的公司信息”对话框

数据库实验报告1

一. 实验内容、步骤以及结果： 1.利用图形用户界面创建，备份，删除和还原数据库和数据表（30分，每小题5分） ●数据库和表的要求 （1）依据课本P127（第四版教材，下同）的第三题，创建一个名为SPJ的数据库，初始大小为 10MB，最大为50MB，数据库自动增长，增长方式是按5％ 比例增长；日志文件初始为2MB，最大可增长到5MB，按1MB增长。数据库 的逻辑文件名和物理文件名均采用默认值。 （2）数据库SPJ包含供应商表，零件表，工程项目表，供应情况表。具体每张表的定义以及数据参看课本P74页的第五题。 ● 完成以下具体操作： （1）创建的SPJ数据库。 （2）在SPJ数据库中分别创建上述的四张表(只输入一部分数据示意即可)。 （3）备份SPJ数据库。 （4）删除已经创建的工程项目表(J表)。 （5）删除SPJ数据库。 还原刚才删除的SPJ数据库。 实验具体步骤： （1）创建SPJ数据库：右击数据库-->新建数据库-->填写相应参数-->点击确定。（2）创建表：单击数据库SPJ-->右击‘表’-->新建表-->填写参数-->确定。

（3）备份数据库：右击数据库SPJ-->任务-->备份-->填参数-->确定。 （4）删除表：单击数据库SPJ--》单击表--》右击J--》选择删除。 （5）删除数据库：右击数据库SPJ--》选择删除命令。 （6）还原数据库。右击数据库--》选择还原数据库命令--》填写参数--》确定。 2. 利用SQL语言创建和删除数据库和数据表（30分，每小题5分） 数据库和表的要求 （1）创建用于学生信息的数据库，数据库名为Student，初始大小为20MB，最大为100MB，数据库自动增长，增长方式是按10M兆字节增长；日志文件初 始为2MB，最大可增长到5MB，按1MB增长。数据库的逻辑文件名和物理文 件名，日志文件名请自定义。 （2）数据库Student包含学生信息，课程信息和学生选课的信息。包含下列3个表：S：学生基本信息表；C：课程基本信息表；SC：学生选课信息表。各表的结 构以及数据如下所示： 表 2.1 学生基本信息表(表名：S)

vb2010+access数据库连接

VB2010+Access用户登陆验证(精简) Public Class login '管理员登陆 Private Sub Button1_Click(ByVal sender As System.Object, ByVa l e As System.EventArgs) Handles Button1.Click Dim ObjConn As New OleDb.OleDbConnection("Provider=Micros oft.Jet.OLEDB.4.0;Data Source=cardbs.mdb") Dim ObjCom As New OleDb.OleDbCommand("select * from admin ", ObjConn) Dim ObjDap As New OleDb.OleDbDataAdapter Dim ObjDar As OleDb.OleDbDataReader Dim pd As Boolean = False Dim i As Integer ObjCom = New OleDb.OleDbCommand("select * from admin", Ob jConn) '与数据库建立连接 ObjConn.Open() ObjDar = ObjCom.ExecuteReader '循环判断与数据库中数据是否相同 Do While ObjDar.Read() If ComboBox1.Text = "" Then MsgBox("请输入用户名！") ElseIf Trim(ComboBox1.Text) <> (ObjDar.Item("admin_na me")) Then MsgBox("用户名不存在！") ComboBox1.Focus() ElseIf TextBox2.Text = "" Then MsgBox("请输入密码！") 'End If ElseIf Trim(TextBox2.Text) <> (ObjDar.Item("admin_psw ")) Then MsgBox("密码输入不正确！") 'TextBox2.Focus() Else For i = 0 To ObjDar.FieldCount - 1 If Trim(ComboBox1.Text) = (ObjDar.Item("admin _name")) And Trim(TextBox2.Text) = (ObjDar.Item("admin_psw")) Then 'MsgBox("成功登陆") Me.Hide() Form_main.Show() pd = True Exit Sub End If

数据库系统概论实验指导(第七版)

数据库系统概论实验指导 （第七版） 计算机学院 2013/09

改版履历

目录 目录 (3) 1.实验概要 (4) 1.1.实验说明 (4) 1.2.实验环境和配置 (4) 1.3.上机要求 (5) 2.实验1:数据库/表的基本操作和表级约束 (5) 2.1.目的和要求 (5) 2.2.实验准备 (5) 2.3.实验内容 (5) 3.实验2:库级约束和基本表的数据操作 (8) 3.1.目的和要求 (8) 3.2.实验准备 (8) 3.3.实验内容 (8) 4.实验3:视图操作和安全性控制 (10) 4.1.目的和要求 (10) 4.2.实验准备 (10) 4.3.实验内容 (10) 5.实验4:存储过程/触发器/ODBC数据库编程 (12) 5.1.目的与要求 (12) 5.2.实验准备 (12) 5.3.实验内容 (12) 6.实验5：数据库综合实验 (14) 6.1.目的与要求 (14) 6.2.实验准备 (14) 6.3.实验内容 (15) 5.3.1.题目一：零件交易中心管理系统 (15) 5.3.2.题目二：图书管理系统 (15) 5.3.3.题目三：民航订票管理系统 (15) 5.3.4.题目四：学生学籍管理系统 (16) 5.3.5.题目五：车站售票管理系统 (16) 5.3.6.题目六：企业人事管理系统 (16)

5.3.7.题目七：电话交费管理系统 (16) 5.3.8.题目八：医药销售管理系统 (17) 7.附录：实验报告格式 (18) 1.实验概要 1.1.实验说明 内容：本课程实验分5次完成，每次完成一部分。具体内容参考本指导的后半部分。 成绩：每次实验100分，最后取5次实验的加权平均分作为实验的总成绩，其中第五次实验占40%，其余各次占15%。每次实验中各个环节的评分标准如下： 上述每一项按照百分制给出分值，最后按照比率计算每次实验的最终成绩。 实验报告 每次实验需提交电子版的实验报告(最后一次实验需提交设计文档，源程序等相关资料)。每次实验结束时，将写好的实验报告，提交给各班辅导老师。如果确有困难没有完成的情况下，课后自己完成之后提交到辅导老师的邮箱里。由辅导老师根据课堂上机实验检查状况和实验报告的内容给出每次实验的成绩。 实验报告的内容包括：实验内容、实验步骤、程序源码、运行结果（可以是程序的输出，也可以是运行画面的抓屏，抓屏图片要尽可能的小，否则文件太大）。每份实验报告是一个WORD文档。实验报告命名规则如下：DBx(实验次数)_XXXXXX（学号）_姓名例如：20052978的学生的第一次实验报告文件名： DB1_20052978_李宁注意：请每个人保存好自己的实验报告的电子版，直到该门课考试成绩公布之后。 1.2.实验环境和配置 SQL Server 2008(Microsoft SQL Server 2008 Express With Advance Service)

VB中怎么载如或显示Access数据库中的报表

VB中怎么载如或显示Access数据库中的报表 '首先在“工程/引用”菜单下引用Microsoft Access 9.0 Object Library Option Explicit Dim MSAccess As Access.Application Private Sub Command1_Click() Set MSAccess = New Access.Application MSAccess.OpenCurrentDatabase (App.Path & "\db1.mdb") MSAccess.DoCmd.OpenReport "rptTB", acViewNormal MSAccess.CloseCurrentDatabase Set MSAccess = Nothing End Sub rptTB是access中的一个报表名称 要引用Microsoft Access 9.0 Object Library dim objAccess As Access.Application Set objAccess = CreateObject("Access.Application") objAccess.OpenCurrentDatabase ("c:\1.mdb") objAccess.DoCmd.OpenReport "ReportName", acViewPreview objAccess.Visible = True 这个要引用Microsoft Access 9.0 Object Library(Office 2000) 我没试过Office97会怎么样。 ?VB中打印ACCESS报表 ?作者:aspxer 来源:internet 日期:2007-5-20 13:56:44 关键字: ? VB中打印ACCESS报表 acc As Object Set acc = CreateObject("Access.Application") If Right$(Trim$(App.Path), 1) = "\" Then

Access数据库实验报告范文

深圳大学实验报告课程名称：计算机基础 实验名称：数据库管理系统 学院：专业：报告人：学号：班级：同组人： 指导教师： 实验时间： 实验报告提交时间： 教务处制

一．实验目的 1. 加深对数据库管理系统的直观认识和理解。 2. 掌握Access 2003数据库的创建和打开方式。 3. 掌握Access 2003中数据表的设计和创建方法。 4. 掌握Access 2003中窗体、查询、报表和数据访问页的设计和创建 方法。 二．实验步骤 1. Access 2003的启动与退出 执行“开始”→“所有程序”→“Microsoft office”→“Microsoft office Access 2003”命令，或双击桌面上的Access 2003快捷图标，打开Microsoft Access应用程序窗口，如图7-1所示。 图7-1 Access2003主窗口 Access 2003的主窗口与Microsoft Office 2003中其他应用程序的主窗口十分相似，同样包括标题栏、菜单栏、工具栏、工作区、任务窗格和状态栏等。 （1）标题栏和任务栏

Access2003主窗口的上边是窗口的标题栏，下边是任务栏，它们的结构、功能以及使用方法与一般Windows应用程序窗口的标题栏和任务栏相同。 （2）菜单栏 Access 2003主窗口的菜单栏形式也和一般的Windows应用程序类似，提供了有关数据库操作的主要功能。单击每一个菜单项都会激活一个下拉菜单，列出有关此项功能的具体操作命令选项。除下拉菜单外，Access 2003也允许在任何对象上右击鼠标，弹出快捷菜单，显示对该对象操作的命令选项。 （3）工具栏 工具栏显示的是最常用的Access 2003命令选项，用以快速启动这些应用。工具栏的内容用户可以自行设置。执行“视图”→“工具栏”命令，在下拉菜单中会列出Web、任务窗格、数据库、自定义等选项。用户可通过各个工具栏选项前的复选框自行选择某一个工具栏的显示与否。 自定义工具栏对话框中包括“工具栏”、“命令”、“选项”三个选项卡，图7-2为“自定义”对话框的“工具栏”选项卡。在自定义工具栏中提供了更多的工具选项，用户可以根据自己的需要，利用每一项工具前面的复选框决定显示或取消显示该项工具。 图7-2 自定义工具栏对话框 （4）工作区

数据库实验报告

数据库实验报告

武汉理工大学 学 生 实 验 报 告 书 实验课程名称 数据库系统概论 开 课 学 院 计算机科学与技术学院 指导老师姓名 学 生 姓 名 学生专业班级 学生学号 实验课成绩

2013 — 2014 学年第二学期实验课程名称：数据库系统概论 实验项目名称SQL SEVER 2000的系 统工具及用户管理 实验 成绩 实验者专业班 级 组别 同组者实验 日期 2014年4 月24日

第一部分：实验分析与设计（可加页） 一、实验内容描述（问题域描述） 实验目的和要求：了解SQL SEVER 2000的功能及组成，熟练掌握利用SQL SEVER 2000工具创建数据库、表、索引和修改表结构及向数据库输入数据、修改数据和删除数据的操作方法和步骤，掌握定义数据约束条件的操作。 二、实验基本原理与设计（包括实验方案设计，实 验手段的确定，试验步骤等，用硬件逻辑或者算法描述） 实验内容和步骤： （1）熟悉SQL SEVER 2000的界面和操作。 （2）创建数据库和查看数据库属性。 （3）创建表、确定表的主码和约束条件。 （4）查看和修改表的结构。 （5）向数据库输入数据，观察违反列级约束时出现的情况。 （6）修改数据。 （7）删除数据，观察违反表级约束时出现的情况。 三、主要仪器设备及耗材 Windows XP SQL SERVER 2000

第二部分：实验调试与结果分析（可加页） 一、调试过程（包括调试方法描述、实验数据记录， 实验现象记录，实验过程发现的问题等） 没有错误 错误：未能建立与WORKEPLACE\XUMENGXING的链接SQL Server 不存在或访问被拒绝 原因：未启动数据库服务 二、实验结果及分析（包括结果描述、实验现象分 析、影响因素讨论、综合分析和结论等） 实验结果部分截图：

VB+数据库编程之+ADO+连接数据库实例

VB 数据库编程之 ADO 连接数据库实例 这里先说说ADO的ACCESS数据库连接吧，两种。 1.ADO控件连接 “工程”菜单→“部件...”：Microsoft ADO Data Control 6.0 (SP6) (OLEDB) 并将Adodc数据控件绘入窗体。 右击Adodc数据控件→属性→使用连接字符串→生成→Microsoft Jet 4.0 OLE DB Provider→数据位置→找到要连接的ACCESS数据库文件…… Adodc数据控件的RecordSource属性为“2 - adcmdTable”和你要连接的表名。 控件的引用实例如下： '组合框（Combo）控件列表用某字段数据记录填充范例 '在窗体Load事件或Combo的相关事件中写入 '循环1到记录总数 For i = 1 To Adodc1.Recordset.RecordCount '如果不在记录集结尾则 If Not Adodc1.Recordset.EOF Then '组合框增加一行：“姓名”字段的值 Combo1.AddItem Adodc1.Recordset.Fields("姓名").Value '记录指针向后一个 Adodc1.Recordset.Movenext End If Next i 2.ADO代码连接 通用声明 Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset Dim cmd As New https://www.sodocs.net/doc/718767194.html,mand Private Sub Form_Load() '实例化Connection对象 Set cn = New ADODB.Connection cn.CursorLocation = adUseClient cn.Open "Provider=Microsoft.jet.OLEDB.4.0;Data Source=" & App.Path & "\personnel.mdb;" 'Recordset对象 Set rs = New ADODB.Recordset rs.Open "职工信息", cn, adOpenDynamic, adLockOptimistic

(完整版)vb连接access数据库及数据读写操作

ACCESS数据库和VB的连接 Edited by Ryan 2013 1、建立Access数据库 2、启动VB，建立标准EXE 图1 3、添加ActiveX控件 鼠标指向任意VB控件，单击右键，选择“部件（O）”，出现图3所示界面 图2

图3 选择部件“Microsoft ADO Data Control 6.0 (OLEDB)”，出现如图4所示控件 图4

4、添加控件Adodc 图5 4、在控件Adodc上添加数据源 鼠标指向控件Adodc1，单击右键，选择“ADODC 属性”，弹出如图7所示界面 图6

图7 单击“生成(U). . .”，弹出如图8所示界面 图8 选择“Microsoft Jet 4.0 OLE DB Provider”，单击“下一步(N) >>”，弹出如图9所示界面

图9 单击“. . .”，添加数据源（第一步所建Access 数据库），如图10所示 图10 单击“测试连接（T）”，出现提示框，如图11所示 图11 之后点击“确定”，退回到如图12所示界面

图12 单击“记录源”，弹出如图13所示界面 图13 在“命令类型”下，选择“1 - adCmdText”，在“命令文本（SQL）”下，输入“Select * from test1”，最后单击“应用”，“确定”即可 之后，进入程序书写部分 程序部分需要注意接头形式及简单例子如下： Private Sub Command1_Click() ‘VB按钮控件 Dim mydb As New ADODB.Connection ‘定义新的数据库连接 mydb.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\read database\test1\test1.mdb" ‘数据库绝对路径 Dim rs As New ADODB.Recordset ‘定义数据库的一个对象 mydb.Open ‘打开数据库 rs.Open "select * from test1", mydb, 3, 3 ‘打开数据库中的表test1

Access数据库实验报告

Access数据库实验报告 《数据库及其应用》 实验报告 实验成绩： 学号： 姓名： 专业班级： 课堂号： 任课教师： _ 完成日期： 直接启动Access，或在“文件”选项卡中选择“新建”命令项，出现新建空数据库的Backstage视图界面。在窗口左侧列出了可以执行的命令项。包括“打开”、“最近使用文件”、“新建”、“帮助”、“选项”等。 ②已有打开数据库的Backstage视图 若已打开数据库，单击“文件”选项卡，进入当前数据库的Backstage视图。包括“数据库另存为”、“关闭数据库”、“信息”“打印”“保存并发布”等。 观察功能区：了解组成功能区的选项卡。 ①功能区主选项卡包括“文件”、“开始”、“创建”、“外部数据”和“数据库工具”。每个选项卡都包含多组相关命令。在功能区选项卡上，某些按钮提供选项样式库，而其他

按钮将启动命令。4个主要命令选项卡为后四个。 ②有一些选项卡属于上下文命令选项卡，根据当前的操作出现或转换。 ③快速访问工具栏。出现在窗口顶部Access图标右边显示的标准工具栏，它将常用操作 命令显示在这里，用户可以单击按钮进行快速操作。用户可以定制该工具栏。 ④快捷键。执行命令的方法有多种。最快速、最直接的方法是使用与命令相关联的键盘 快捷方式。在功能区中可以使用键盘快捷方式。 观察导航窗格。各种对象的显示组合。 4．Access选项及其设置 在Backstage视图中选择“选项”命令单击，进入Access 选项对话框窗口。在该窗口可设置默认文件夹等。选择“当前数据库”页，在该页面可设置文档窗口显示方式、定制导航窗格、定制工具栏的项目等。 #．回答问题 启动Access一般有几种方法？ 答：3种． 1.单击“开始”按钮，选择“所有 程序”|“Microsoft Office”|“Microsoft Access XX”菜单项单

数据库第一次实验报告

《数据库系统概论》实验报告 题目：实验一 数据库和表的基本操作和约束条件姓名班级学号日期 刘凯10031201 2012302606 2014.10 一、实验内容、步骤以及结果 1.利用图形用户界面创建，备份，删除和还原数据库和数据表 创建初始数据库信息如下 备份数据库

删除表 2.利用SQL语言创建和删除数据库和数据表创建数据库 CREATE DATABASE studentdata ( FILENAME = 'D:\studentdata.mdf' , SIZE = 20480KB , MAXSIZE = 102400KB , FILEGROWTH = 10240KB ) LOG ON ( FILENAME = 'D:\studentdata_1.ldf' , SIZE = 2048KB , MAXSIZE = 5120KB , FILEGROWTH = 1024KB ) GO 创建三张表

CREATE TABLE dbo.C( Cno char(4)PRIMARY KEY , Cname char(40) , Cpno int , Ccredit int,） GO CREATE TABLE dbo.S( Sno char(4)PRIMARY KEY , Sname char(40) , Ssex char(4) , Sbirth] char(40) , Sdept char(4) , ） CREATE TABLE [dbo].[SC]( Sno char(4) , Cno char(4) , Grade int ) GO 备份数据库 Backup database studentdata to disk = ‘D:\studentdata.db.bak’ 删除数据库 Deleta database studentdata.db 还原数据库 Restore database studentdata from disk = ‘D:\studentdata.db.bak’ 3.利用图形用户界面对上题中创建的Student库的S表中，增加以下的约束和索引 主键 Sname唯一键

第七讲 VB访问SQL Server2000数据库的方法

第七讲 VB访问SQL Server2000数据库的方法 一、ODBC数据源设置 1、ODBC简介 ODBC Open DatabaseConnectivity开放式数据库互连）是Mircosoft公司有关数据库的一个组成部分，它建立了一组规范，并提供了一组对数据库访问的标准API Application应用程序编程接口）。这些API利用SQL来完成大部分的任务。ODBC本身提供对SQL语言的支持，用户可以直接将SQL送给ODBC一个基于ODBC的应用程序对数据库操作不依赖于任何DBMS，不直接与DBMS打交道，所有数据库操作由ODBC驱动程序完成。 2、ODBC数据源的创建（建立ODBC数据源） 前台系统Windows 2000 professional系统，后台Windows 2000 Server系统。以Windows 2000 professional为例： （1）单击“开始”/设置/控制面板/管理工具/数据源ODBC,打开“ODBC数据源管理器”，选择“用户DSN or 系统DSN”，单击【添加】按钮，打开“创建用户数据源”对话框，选择“SQL Server”，单击【完成】按钮。

（2）打开“创建新的数据源到SQL Server”窗口： ○1你想用什么名称命名数据源：在名称框中输入xn。 ○2服务器：为网络中数据库服务器（默认是本地服务器Local，可选远程服务器IP）。 ○3登陆ID：xn密码：xn（取决于安装SQL时所指定的密码）。特别注意此处为确保数据库安全起见，数据库管理员可以给用户指定一个用户名及密码。这里为简便起见使用管理员用户名及密码。 ○4更改数据库为：aa（所要使用的数据库）。

(完整版)vb连接access数据库及数据读写操作.docx

ACCESS数据库和 VB 的连接 Edited by Ryan 2013 1、建立 Access 数据库 2、启动 VB，建立标准EXE 图 1 3、添加 ActiveX 控件 鼠标指向任意VB 控件，单击右键，选择“部件（O）”，出现图 3 所示界面图2

图3 选择部件“ Microsoft ADO Data Control 6.0 (OLEDB) ”，出现如图 4 所示控件图4

4、添加控件Adodc 图5 4、在控件 Adodc 上添加数据源 鼠标指向控件Adodc1 ，单击右键，选择“ADODC 属性”，弹出如图7 所示界面图6

图7 单击“生成(U). . .”，弹出如图8 所示界面 图8 选择“ Microsoft Jet 4.0 OLE DB Provider”，单击“下一步(N) >>”，弹出如图 9 所示界面

图9 单击“ . . .”，添加数据源（第一步所建Access 数据库），如图 10 所示 图10 单击“测试连接（T）”，出现提示框，如图11 所示 图11 之后点击“确定” ，退回到如图12 所示界面

图12 单击“记录源” ，弹出如图13 所示界面 图13 在“命令类型”下，选择“ 1 - adCmdText”，在“命令文本（ SQL）”下，输入“ Select * from test1 ”，最后单击“应用”，“确定”即可 之后，进入程序书写部分 程序部分需要注意接头形式及简单例子如下： Private Sub Command1_Click()‘VB按钮控件 Dim mydb As New ADODB.Connection ‘定义新的数据库连接 mydb.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\read database\test1\test1.mdb" ‘数据库绝对路径 Dim rs As New ADODB.Recordset ‘定义数据库的一个对象 mydb.Open‘打开数据库 rs.Open "select * from test1", mydb, 3, 3‘打开数据库中的表test1

(完整版)Access2010实验报告

计算机实验报告 ◆-课程名称: Access2010数据库程序设计教程 ◆-指导老师：吴华荣 ◆-姓名: 陈雪颖 ◆-班级: 英语151班 ◆-学号: 1820154586 实验一：图书借阅管理系统需求分析 （一）实验目的 1、了解数据库结构设计的过程与实验方法，根据实体-属性图、实体-联系图以及数据，分析并设计出合理的数据库表记录。 2、体验表间关系和数据的完整性。 （二）实验步骤 通过案例分析了解该系统数据包括： 1、读者信息表：每对应一个读者，有相应的一条记录。 2、图书档案信息表：对于每一种书，有一条记录。 3、书目编码信息表：对应每一本书即一个条形码，都有一条记录。 4、借阅信息表：对应每一次借书/还书，都有一条记录。 （三）实验内容 分别建立四种表的实体-属性图，设计图书借阅管理系统数据库及四种表的结构设计图表，并为每个表设置主关键字。 （四）实验结果及总结 设计合理的数据库结构，可以对图书馆的图书进行更好的管理，提高工作效率。 实验二：创建Access数据库和数据表 （一）实验目的 1、熟悉Access2010的工作环境，掌握启动和关闭Access的方法。 2、掌握创建和打开Access数据库的方法。 3、掌握使用“表设计”按钮创建表，及通过“表”按钮输入数据创建表的操作。

4、掌握表结构的修改方法、表记录的输入和编辑方法。 5、掌握字段属性的设置。 （二）实验步骤 1、启动Access2010：单击任务栏“开始”按钮，单击“开始”菜单。 2、创建并打开空数据库“图书借阅库”。 3、使用设计器创建四种表结构并输入表记录。 4、修改表结构，编辑字段设置。 （三）实验内容 打开Access2010，分别输入四种表的数据，使用设计器设计表的结构如增加、删除、修改相应字段，在设计视图中进行字段的属性设置，最后保存表，关闭所有窗口。 （四）实验结果及总结 掌握Access2010的启动及创建过程，能够熟练的运用设计器设计表的各个属性，了解表的有效性规则，熟练的运用表的各种操作。 实验三：数据表的常用操作 （一）实验目的 1、熟悉数据表的外观定制的方法。 2、掌握表文件的复制、删除等操作。 3、理解数据的导入和导出功能。 4、熟练掌握数据的查找和替换的方法。 5、熟练掌握记录筛选和排序操作。 （二）实验步骤 1、在数据表视图下进行表的外观定制。 2、对表文件进行复制。 3、表数据操作。 （三）实验内容 对表的外观如字体、格式、行高和列宽进行合理设置，掌握如何隐藏、移动和冻结列。运用不同方法实现表的复制，并学会如何导入和导出表。针对具体要求，对表数据进行查找、筛选和排序操作。 （四）实验结果及总结 通过对表的外观设置，知道如何操作表数据。运用不同的方法进行表文件的复制，也掌握了数据的查找、筛选和排序方法。 实验四：创建表间关系 （一）实验目的 1、掌握创建两个表间关系的方法，学会编辑表间关系。 2、理解参照完整性的含义。 3、了解级联更新数据和级联删除数据的功能和作用。 （二）实验步骤 1、打开数据库，单击“数据库”选项卡，单击“关系”进行操作。 2、对关系实施参照完整性。

数据库实验报告5

1.使用系统存储过程(sp_rename)将视图“V_SPJ”更名为“V_SPJ_三建”。（5分） exec sp_rename v_spj, v_spj_三建; 2.针对SPJ数据库，创建并执行如下的存储过程：（共计35分） (1)创建一个带参数的存储过程—jsearch。该存储过程的作用是：当任意输入一个工 程代号时，将返回供应该工程零件的供应商的名称(SNAME)和零件的名称(PNAME) 以及工程的名称(JNAME)。执行jsearch存储过程，查询“J1”对应的信息。（10 分） create proc jsearch @jno char(2) as select sname, pname, jname from s,p,j,spj where s.sno=spj.sno and p.pno=spj.pno and j.jno=spj.jno and spj.jno=@jno; 执行： exec jsearch 'J1'

(2)使用S表，为其创建一个加密的存储过程—jmsearch。该存储过程的作用是：当执 行该存储过程时，将返回北京供应商的所有信息。（10分） 创建加密存储过程： create proc jmsearch with encryption as select * from s where s.city='北京'; sp_helptext jmsearch; (3)使用系统存储过程sp_helptext查看jsearch, jmsearch的文本信息。（5分） 用系统存储过程sp_helptext查看jsearch： exec sp_help jsearch; exec sp_helptext jsearch;