基于ADO技术的图片试题管理的实现.pdf

计算机时代2005年第6期 ·47· 基于ADO技术的图片试题管理的实现 张书云，范伟，李颜儒 (中央财经大学信息学院，北京100081) Data 摘要：介绍了采用ADO(ActiveXObjects)技术实现通用试题库管理信息系统中图片试题的管理，并给出了存储、 显示图片试题和图片试题组成试卷等功能的技术实现。 关键词：图片试题；ActiveX；数据对象(ADO)；题库管理信息系统 Dim LeftOverAs 1引言 Long。定义剩余字节长度 DimSourcefileAs 在各个学科的试题中经常会出现一些必须用图片表示的 Long’定义自由文件号 Dim Byte 内容，如《数据结构》中的树、图的表示，英语中的看图作文的 byteChunk()As DimAs 例图等。因此，在题库管理信息系统中实现图片试题的管理是 Long DimfieldsizeAsLong 非常必要的。笔者利用VB6和SQLSever2000开发的通用题 If Or Then myRecord．BOF=truemyRecord．EOF=True 库管理信息系统实现了图片试题管理。 ExitSub 2数据需求分析与设计 EndIf 为实现系统的全部功能，我们设计了两个数据库：试题库 If ImageFile=””Then 和试卷库。其中试题库用于存放各门课程的试题。试题库中包 ExitSub 括用户表、用户课程表、课程表、题型表、大知识点表、小知识点 EndIf Sourcefile=FreeFile’提供一个尚未使用的文件号 表、试题表(question)、试卷大题表及试卷小题表，设计的重点是 For AccessReadAsSourceFile Open Binary 对各数据表及其表间关系的设计。为实现图片试题的管理，我 ImageFile ’打开文件 们在试题表(question)中设有两个字段，字段名分别是：Im— age_content和Image_answer，类型为Image，通过这两个字段实 IfFileLength=0Then’判断文件是否存在 现试题图片和答案图片的存取。 CloseSourceFile 3