VFP查询在普通中专录取数据中的运用

魏建斌

摘要：普通中专的录取工作实行“市州招办负责、省级招办监督”的体制，搞好中专录取工作，是推动高校招生手段现代化的重要方面。该文从普通中专录取数据如何进行查询检索的角度进行阐述，保证了查询数据的准确性。

关键词：VFP；普通中专；录取数据

中图分类号：TP311 文献标识码：A 文章编号：1009-3044（2017）03-0019-02

1 概述

Visual FoxPro简称VFP，是Microsoft公司开发的一款面向对象的关系型数据库管理系统，用它来开发数据库，既简单又方便。它提供了一个集成化的开发环境，支持面向对象可视化的编程技术，并拥有功能强大的可视化程序设计工具，采用了OLE技术，支持网络应用，方便用户快速创建表单、查询和打印报表。是用户收集信息、查询数据、创建集成数据库系统、进行应用系统开发较为理想的数据库管理系统。VFP在桌面型数据库应用中，处理速度极快，是日常工作中的得力助手。

2 普通中专录取工作流程

2.1 学校办理录取手续，核对招生计划与生源情况

普通中专学校校必须在普通中专录取前24小时，在各市州录取场所核对学校招生计划与生源情况，做好录取前的各项准备工作。

2.2 学校审阅预录取名单

普通中专学校在规定的时间内领取各市州报考本校的考生纸质档案。因生源情况不一致，学校可对收到的考生信息及时联系录取，对明确表示不愿意来校学习的学生，进行退档处理，并将所有录取的信息提交各市州招生部门，等待市级招生部门审核。

2.3 市级招生部门进行审核录取

市级招生部门的录取组负责对各招生学校的预录取名单进行检查。提出拟录取意见，对学校提交的退档理由不充分的，发回学校复查。

2.4 打印、邮寄录取新生名册及《录取通知书》

市级招生部门对符合录取条件的新生打印普通中专新生录取简明登记表。学校可将经市级招生部门审核通过的学生电子信息拷贝到各自的录取电脑上，打印录取通知书，并以挂号信或邮政特快专递方式直接寄发被录取考生所在学校或本人手中。

3 利用VFP数据库实现数据查询

笔者认为，借助VFP数据库表单，可以减少繁琐的命令输入，更大的提高数据的查询效率，更能准确无误的给学校提供报考信息，减少了工作量。

根据录取数据的需要，制作如下表单：

图1

各查询实现如下：

考号查询

SELECT 1

USE zzk02

SELECT 2

USE zzlqk

SELECT 3

USE jhk07

khc=ALLTRIM（thisform.text1.Value）

SELECT zzlqk

LOCATE FOR ALLTRIM（zkzh）==khc

IF FOUND（）

thisform.label2.Caption=zzlqk.zkzh

thisform.label4.Caption=zzlqk.xm

MESSAGEBOX（"該生已被录取到["+ALLTRIM（zzlqk.lqxx）+"]学校["+ALLTRIM（zzlqk.lqzy）+"]专业"，48，"注意"）

ELSE

SELECT zzk02

GO top

LOCATE FOR ALLTRIM（zkzh）==khc

IF FOUND（）

thisform.label2.Caption=zzk02.zkzh

thisform.label4.Caption=zzk02.xm

thisform.Refresh

ELSE

MESSAGEBOX（"无此人。。。"，48，'注意'）

thisform.text1.Value=''

thisform.text1.SetFocus

ENDIF

ENDIF

CLOSE TABLES

姓名查询

CLOSE TABLES

SELECT 1

USE zzk02

SELECT 2

USE zzlqk

SELECT 3

USE jhk07

xmc=ALLTRIM（thisform.text2.Value）

SELECT zzlqk

LOCATE FOR ALLTRIM（xm）==xmc

IF FOUND（）

thisform.label2.Caption=zzlqk.zkzh

thisform.label4.Caption=zzlqk.xm

MESSAGEBOX（"该生已被录取到["+ALLTRIM（zzlqk.lqxx）+"]学校["+ALLTRIM（zzlqk.lqzy）+"]专业"，48，"注意"）

ELSE

SELECT zzk02

GO top

LOCATE FOR ALLTRIM（xm）==xmc

IF FOUND（）

thisform.label2.Caption=zzk02.zkzh

thisform.label4.Caption=zzk02.xm

thisform.Refresh

ELSE

MESSAGEBOX（"无此人。。。"，48，"注意"）

thisform.text2.Value=''

thisform.text2.SetFocus

ENDIF

ENDIF

CLOSE TABLES

4 结束语

以上数据处理方法解决了普通高中会考过程中常遇到的一些问题，提高了工作效率，节省了时间，保证了各项数据的正确性，为普通高中会考提供了有力的保障，更好，更快地完成了考试的各项任务。

参考文献：

[1] 刘韬，骆娟，何旭洪.数据库系统开发导航[M].北京：人民邮电出版社，2011.

[2] 萨仕宣.数据库概论[M].北京：清华大学出版社，2010.

[3] 曾刚.Visual FoxPro数据库编程实例手册[M].北京：海洋出版社，2007.

[4] 陶伟.基于VFP的毕业资格审核系统设计与实现[J].安徽农业大学学报，2011（3）.

[5] 刘环.VFP在高校学生学籍管理系统中的应用[J].长治学院学报，2005（5）.