多媒体实验八Authorware对数据库的操作.docVIP

  • 6
  • 0
  • 约5.87千字
  • 约 7页
  • 2017-08-23 发布于重庆
  • 举报

多媒体实验八Authorware对数据库的操作.doc

多媒体实验八Authorware对数据库的操作.doc

实验八 Authorware对数据库的操作 一、实验目的: 1.熟悉ODBC的功能和设置 2.熟悉authorware调用和更新数据库的方法 二、实验准备 1.安装了WINDOWS2000或者WINXP的计算机 2.安装了Authorware7.0中文版软件 3. 安装了Access或SQL等相关数据库 三、实验内容和步骤 方法1: 1、手动添加数据源: 开始--控制面板--管理工具--数据源 ???? 在ODBC数据源管理器中选系统DSN,点击右侧的添加按钮; ???? 在创建新数据源窗口中选“Driver toMicrosoft Access(*.mdb)然后点击完成; ???? 在ODBC Microsoft Access安装窗口中,为数据源命名,例如ABC等,选中下面的数据库选项,点击系统数据库; ???? 在选择系统数据库窗口中选择你要用到的数据库的名子,如 ballot.mdb. 2、ODBC.U32(Authorware外部函数库,用于连接Authorware和数据库。包括: ???? ODBCOpen 格式:ODBCHandle := ODBCOpen(WindowHandle, ErrorVar, Database, User, Password) ???? ODBCExecute 格式:data := ODBCExecute(ODBCHandle, SQLString) ???? ODBCClose 格式:ODBCClose(ODBCHandle)) ???? 在Authorware编辑器中新建一文件sql.a6p,先后拖一运算图标和一显示图标到主流程线上. ???? 导入外部函数ODBC.U32,在运算图标中写入: ???? abc:=ODBCOpen(WindowHandle,,ABC,wang,134) ???? sql:=select ballot,hit from ballot ???? data:=ODBCExecute(abc, sql) ???? ODBCClose(abc) ???? 在显示图标中写入{date}. 运行sql.a6p文件,即可显示ballot.mdb中字段ballot和hit中的所有内容.??? 方法2 (与方法1不同之处是该方法通过Authorware外部函数tMsDSN.u32库中的tMsDBRegister实现数据源的直接建立,格式为:result := tMsDBRegister(dbReqType, dbType, dbList)) 步骤如下: 在Authorware编辑器中新建一文件sql2.a6p,先后拖一运算图标和一显示图标到主流程线上.导入外部函tMsDSN.u32和ODBC.U32,在运算图标中写入: dbList:=DSN=ABC; dbList:=dbList^Description= ODBC DSN; dbList:=dbList^FIL=MS Access; dbList:=dbList^DBQ=^FileLocation^ballot.mdb; dbList:=dbList^User=wang; dbList:=dbList^Pwd=123; tMsDBRegister(4, Microsoft Access Driver (*.mdb), dbList) abc:=ODBCOpen(WindowHandle,,ABC,wang,134) sql:=select ballot,hit from ballot data:=ODBCExecute(abc, sql) ODBCClose(abc) 在显示图标中写入{date}. 运行sql.a6p文件,即可显示ballot.mdb中字段ballot和hit中的所有内容. 在d:\test目录下建立一个名字为test.mdb的数据库文件,其中建立三个表:填空题、选择题、判断题,分别用于存放填空题、选择题、判断题的题库。每个表的字段和内容如图8-1所示。表中的每条记录对应着一道考题,记录的内容和记录的数量可以由教师根据需要自行设计。 图8-1 二、创建数据源 利用“tMsDSN.u32”文件提供的“tMsDBRegister()”函数,可以在程序中自动创建ODBC数据源。“tMsDSN.u32”文件在Authorware的安装目录中存在,用户在使用前要对其进行装载,并且要将该文件与程序文件一起打包发布。 例如,想把d:\test\test.mdb设定为程序的数据源,数据源名称定为“test info”,则可以用以下的语句完成: dbReqType:=4 dbType:=Microsoft

文档评论(0)

1亿VIP精品文档

相关文档