数据方面专科毕业论文范文,与图书馆管理系统ILASII2.0数据批导入相关论文例文

时间:2020-07-05 作者:admin
后台-系统-系统设置-扩展变量-(内容页告位1-手机版)

该文为数据方面专科毕业论文范文,与图书馆管理系统ILASII2.0数据批导入相关论文目录格式,可作为论文格式专业数据论文写作研究的大学硕士与本科毕业论文开题报告范文和职称论文参考文献资料。免费下载教你怎么写数据及图书馆及字段方面的优秀学术论文范文。

【摘 要 】详解ILASII2.0系统的读者数据批导入功能中的两种方法,应用软件技术对定长记录长度导入中的接收数据文件的格式进行排版并说明该程序的功能及其使用方法.

【关 键 词 】ILAS2.O;读者定长数据;批导入;软件技术;接收数据文件;格式排版

笔者所在图书馆目前使用的图书馆管理系统为ILASII2.0系统,在实际应用当中,定长数据的导入是外部数据与ILAS系统进行数据交换的重要手段,定长数据导入处理的关键是将源数据格式转换成系统可读取的定长格式.

1.ILAS2.O系统的读者定长数据批导入功能介绍

ILAS2.O系统可从定长格式的数据文件中将读者信息批量接入读者库,此功能一般用于新生集体大批量借阅证的办理.进入ILAS系统,选择流通管理→读者事务→读者定长数据接收,操作界面分为设置区、接收过程区、源数据浏览区、目标数据浏览区.操作流程如下:(1)选择接收数据文件:选择准备导入到系统读者库的读者数据记录文件,文件类型为*.txt.(2)选择接收格式文件与设置接收格式文件:即与读者数据文件中读者记录的各项属性一一对应的格式模板,初次使用时需进行设置,再次使用时如果读者的属性字段无变化可直接选用.打开右侧的“格式设置”按钮进行设置.(3)选择接收错误文件:可直接选择系统内已有的后缀为.err的文件作为错误日志文件,也可以重新创建一个同类型文件.(4)第一条:将读者数据文件中的第一条读者记录导入到源数据浏览区和目标数据浏览区.(5)下一条:将下一条读者记录导入到源数据浏览区和目标数据浏览区.(6)正式接收:比对源数据浏览区与目标数据浏览区的字段内容,如没有发生错位或缺失即可将读者数据文件导入系统,正式接收全部读者数据.

2.采用定长记录长度导入接收数据文件

2.1 应用软件技术对读者数据批导入接收数据文件的格式进行排版

笔者使用VB6.0设计的程序界面如图1.

上方可设置一个文本框作为过程监控窗口,用来显示导入的原始格式文件,并监控每一步操作后格式上发生的变化.其下的几个文本框用来接收需要添加的字段值,最下方设置了6个按钮触发程序执行,这6个按钮的功能分别是:第一步:输入*.txt文件,输入的*.txt文件默认路径是当前目录下,程序可导入的文件名命名规则是text1.txt,text2.txt,...textn.txt.(每个*.TXT文件中数据内容的字符总数不可超过65535);第二步:去掉制表符;第三步:将读者记录中的“男”“女”字符替换成ILAS系统指定的“M”“F”字符;第四步:将需增加的字段值插入到读者记录中的正确位置;第五步:将所有双字姓名读者记录的“姓名”字段后补充两个空格字符,使所有的记录长度一致;第六步:输出*.txt文件,输出的*.txt格式文件默认路径为当前目录下,默认文件名是Complete.txt,后导出文件的数据与先导出文件的数据都保存在Complete.txt文件之中,数据的位置按照导出的顺序依次从上至下连续排列.

2.2 程序代码

以下是笔者采用VB6.0编写的程序源代码

(1)输入*.txt文件

Public z As Integer

Private Sub Command6_Click()

Dim str1 As String,str2 As String,str3 As String,str4 As String

z等于z+1

str4等于z

str3等于 “\text” & str4 & “.*.txt”

Open App.Path & str3 For Input As #1

Do Until EOF(1)

Line Input #1,str1

str2等于str2 & str1 & Chr(13) & Chr(10)

Loop

str2等于Left(str2,Len(str2)-2)

Text1等于str2

Close #1

End Sub

(2)去掉制表符功能,源代码如下:

Private Sub Command1_Click()

Dim settled As String,procedural As String,cr As String,n As Long,m As Long,k As Long

cr等于Chr(9)

procedural等于Text1.Text

m等于Len(procedural)

Do While Len(procedural) > 10

n等于InStr(1,procedural,cr)

settled等于settled & Left(procedural,n-1)

k等于m-n

procedural等于Right(procedural,k)

m等于Len(procedural)

Loop

settled等于settled & procedural

Text1等于settled

End Sub

(3)将读者记录中的“男”“女”字符替换成ILAS系统指定的“M”“F”字符,源代码如下:

Private Sub Command2_Click()

Dim yuc As String,zic As String,muc As String,cr As String,br As String,

后台-系统-系统设置-扩展变量-(内容页告位2-手机版)
声明:本文内容由互联网用户自发贡献自行上传,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任。如果您发现有涉嫌版权的内容,欢迎发送邮件至:123456789@qq.com 进行举报,并提供相关证据,工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。
后台-系统-系统设置-扩展变量-(内容页告位3-手机版)