【vfp精品源码栏目提醒】:网学会员--在 vfp精品源码编辑为广大网友搜集整理了:【精品文档】通用网页查询函数的设计与应用计算机应用论文工学论文_7733 - 讲义教程绩等信息,祝愿广大网友取得需要的信息,参考学习。
论文范文 题目通用网页查询函数的设计与应用计算机应用论文工学论文 编辑小小 摘要本文首先介绍了通用网页查询函数的设计思想并给出了全部源代码及其应用。
关键词数据库 WWW Internet ASP 计算机网络 1. 引言 随着人们对信息化潮流的逐渐认识各种信息在Internet上的发布和检索就变得非常的重要。
特别是使用B/S模式的信息发布和检索由于它的简单性、灵活性越来越得到了广泛的应用。
现在经常被人们采用的B/S模式的开发工具有ASP、PHP、JSP等这些开发工具简单易学、功能强大为各种信息在Internet上的发布和检索提供了强有力的帮助。
但是随着信息量的逐渐爆炸如果仍然采用针对特定发布信息设计专用程序的传统办法的话显然将导致信息发布的效率非常地低。
为此笔者研究了一种通用信息发布与检索的技术方案使用这套方案将极大地减轻开发者的工作量节约成本。
本文介绍的便是这套技术方案中的一个非常重要的组成部分——基于ASP的通用网页查询函数的设计与应用。
2. 通用网页查询函数的设计 通用网页查询函数的功能主要是根据调用者提供的各种参数在后台数据库管理系统中进行检索最后将检索结果以二维数组的形式返回给调用者。
为了实现上述功能实现该函数的主要思想是根据调用者提供的各种参数生成对应的SQL语句接下来与后台数据库管理系统建立连接、提取数据、断开连接最后将检索结果以二维数组的形式返回给调用者。
该函数的输入参数有后台数据库管理系统的代号如0代表SQLServer、1代表
VFP等、数据源名、表名可以是单表也可以是多表连接或视图名、all/distinct关键字、top关键字、字段名数组、where条件、group by子句/order by字句、检索结果存放的二维数组名等。
该函数的返回值为逻辑型True代表查询过程中未出现错误否则若为False说明查询过程中出现了错误。
下面给出经调试过的通用网页查询函数的源代码。
function data_gettingparam_database_codeparam_dsn_nameparam_table_name param_allparam_topparam_field_namesByRef dataparam_condition param_otherByRef rcountByRef fcountByRef fieldsname on error resume next 生成查询语句 if param_alltrue then queryselect else queryselect distinct end if queryqueryparam_top if param_field_names0 then 查询全部字段 queryquery else d_g_i0 fcount0 for each item in param_field_names if param_field_namesd_g_i then queryqueryparam_field_namesd_g_i fcountfcount1 记录集列数 end if d_g_id_g_i1 next end if queryleftquerylenquery-1 from param_table_name 去掉最后一个逗号全部字段去掉空格 if lenparam_condition0 then queryquery where param_condition end if if lenparam_other0 then queryquery param_other end if 打开记录集 set conntempserver.createobjectADODB.Connection conntemp.ConnectionStringparam_dsn_name conntemp.Open conntemp.errors.clear Set rstempServer.CreateObjectADODB.Recordset rstemp.ActiveConnectionconntemp if param_database_code0 then ‘代表后台数据库是SQLSERVER rstemp.CursorType3 rstemp.LockType1 else if param_database_code1 then ‘代表后台数据库是
VFP rstemp.CursorType1 rstemp.LockType1 else … ‘代表后台数据库是其它数据库管理系统代码略 end if rstemp.Sourcequery rstemp.open ‘判断查询过程中是否出现错误 if conntemp.errors.count0 then data_gettingfalse rcount0 else ‘如果查询过程中未出现错误将查询结果存放到指定的二维数组中 rcountrstemp.recordcount 记录集行数 if rcount0 then data_gettingtrue else data_gettingtrue if param_field_names0 then 查询全部字段 fcountrstemp.fields.count end if ReDim datarcount-1fcount-1fieldsnamefcount-1 for d_g_i1 to rcount for d_g_j1 to fcount datad_g_i-1d_g_j-1trimrstemp.fieldsd_g_j-1.value if d_g_i1 then fieldsnamed_g_j-1rstemp.fieldsd_g_j-1.name end if next rstemp.movenext next end if end if rstemp.close set rstempnothing conntemp.close set conntempnothing end function 3. 通用网页查询函数的应用 在笔者参与的各类基于Web的数据库应用系统的开发过程中全部使用了前文给出的通用网页查询函数。
利用语句通用网页查询函数被保存为一个独立的文件data_getting.inc在需要进行数据查询的网页中嵌入该函数然后在ASP页面只需调用该函数就能得到希望得到的查询结果从而大大减轻了编程的工作量并便于ASP页面的简化和美化。
4. 结束语 本文给出的通用网页查询函数以及笔者开发的其它的一些通用函数用于执行一系列SQL命令的函数、用于调用数据库端存储过程的函数等大大减轻了在系统开发过程中的工作量基本实现了代码复用的目的希望能给从事数据库应用系统的开发者一些有益的启示。
参考文献 1. 刘福太等译 ASP3高级编程 机械工业出版社 2000年 2. 彭万波等著 ASP开发基础与范例 电子工业出版社 2002年 转贴于 HZowrVzegl2285LwCPnjU7ZZ3cO3GocSbAAUfRXnKRsv5:o