基于Internet在线个体系谱的设计 The Online Programs of Individual’s Pedigree Based Internet.pdfVIP

乳业科学与技术)) 2011年第3期 (总第 148期 ) 137 基于 Internet在线个体系谱的设计 范 强 辽宁农业职业技术学院，辽宁营口115009 摘 要：本文以Excel文件为数据库，采用ASP语言编程，实现了个体系谱的在线查询功能，为选种选 配提供 了依据 。 关键词：ASP；Excel；奶牛；系谱 中图分类号：TS201．3 文献标识码：A 文章编号：1671—5187(2011)03—0137·05 TheOnlineProgramsofIndividual’SPedigreeBasedInternet FanQiang LiaoningAgriculturalCollege，YingkouofLiaoning115009，China Abstract：A methodofimportingdatafrom anExcelfilebyASPprogramswasdescribedandthepedigreeofindividual’Srunon Internetplatform designedbyASPwasdeveloped． Keywords：ASP，Excel，COW，pedigree 系谱是系统记载奶牛 自身和祖先的发育情 单元格的边框，并结合 Response．Write语句，在单 况、外形鉴定、生产性能、繁殖记录以及免疫情 元格内输出内容，完成横式系谱卡的绘制过程。 况的一种文件，是进行个体早期选种和间接选种 l_3个体信息的查询 的主要参考资料，是养殖场开展品种改 良、提高 查询功能是通过Form…／Form表单来实 生产性能的主要依据。随着奶牛群体的不断繁育 现的，主要代码如下： 扩大，个体间的亲缘关系逐渐复杂起来，纸介质 form method=posttabletrtd编 号 ： 的系谱卡不仅容易丢失和损坏，而且在个体查询 ／tdtdinputtype=textname=”V”size=12 时很不方便。 inputtype=submitvalue=”查询” 目前，大型奶牛场的系谱管理主要是借助计 ％nn=Request．Fomr (”v”、％ 算机来完成的，而且是单机运行，没有在线查询 ／tdtr／table／ofri／l 功能。本文用 ASP语言编程，结合Excel文件开 为了不影响整个系谱卡的效果，这个表单～ 发出一个种畜管理系统，实现个体系谱的在线查 般放在整个页面的最下角。 询，为奶牛选种、选配供依据。 2ASP源程序 1ASP管理系统 打开一个记事本文件，将文件名和后缀更改 ASP (ActiveServerPages)是一种服务器端 为 “index．asp”，并保存。 脚本编写环境，可创建和运行动态的应用程序 ， 主要全部代码如下： 结合 ADO (ActiveDataObject)技术访 问各种数 ％Dim Conn，Driver，DBPath，Rs，an 据库，广泛用于信息系统的开发与应用。 l确定数据源路径 1．1数据的读取 SetConn=Server．CreateObject(”ADODB．Connect