|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
在实现ERP等高端的ASP应用时,用户需要提供核心的经营资料,需要ASP商有很高的信用度。楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。紧接上节,我们的旧事体系已能完成一样平常的旧事在线增加,删除等的功效,但这仍是不敷够的,有的用户大概必要查找一下过往某一专题内容的相干旧事条目,而一个比教完美的旧事体系,固然少难免也的完成这个功效。
如今即刻就为我们的旧事体系增加上(全文/题目)的检索功效吧,起首我们做一个检索表单,见上面的HTML代码,把这些代码放在必要旧事检索的web页面上。就能够供用户便利地完成旧事征采。
《formmethod="POST"action="http://XXX..com.cn/cgi-win/search/search.asp"》
《p》《selectname="select"size="1"》
《optionselectedvalue="search_1"》旧事检索(题目)《/option》
《optionvalue="search_2"》旧事检索(全文)《/option》
《/select》《inputtype="text"name="key"size="20"》《inputtype="submit"value="搜 索"
name="search"》《/p》
《/form》
在这个FORM的基本增加上处置征采的ASP程序search.asp。在表单用我们用key这个参数来唆使出必要婚配的字串,而select参数指定是基于全文搜刮仍是题目搜刮。
如今进进程序处置部分,看看我们的search.asp程序。
*search.asp
《%@language="vbscript"%》
《%
ifrequest.form("key")=""then
response.redirect"/"
endif
selectcaserequest.form("select")
case"search_1"
%》
《!--#includeVirtual="/cgi-win/search/news/data.inc"--》
《%
Setrs_1=Server.CreateObject("ADODB.Recordset")
sql="select*fromdatawhereinstr(news_title,"&request.form("key")&")》0"
sql=sql+"Orderbynews_idDesc,news_classASC"
rs_1.opensql,conn_1,3,2
case"search_2"
%》
《!--#includeVirtual="/cgi-win/search/news/data.inc"--》
《%
Setrs_1=Server.CreateObject("ADODB.Recordset")
sql="select*fromdatawhereinstr(news_comment,"&request.form("key")&")》0"
sql=sql+"Orderbynews_idDesc,news_classASC"
rs_1.opensql,conn_1,3,2
endselect
ifrs_1.bofthen
response.redirect"/"
response.end
endif
rs_1.movefirst
dispmess="《tableborder=0width=100%cellpadding=0cellspacing=0class=a9》"
disp=""
dowhilenotrs_1.eof
ifnotrs_1.eofthen
disp=disp&"《tr》《td》《ahref=http://www.aaaaa.com.cn/news/read.asp?news_id="&rs_1("news_id")&"target=_blank》》》"&rs_1("news_title")&"《fontsize=1》("&rs_1("news_month")&"-"&rs_1("news_day")&")《/font》《/a》《/td》《/tr》《/p》"
rs_1.movenext
endif
loop
dispmess=dispmess&disp
dispmess=dispmess&"《/table》"
dispmess="document.write("&dispmess&")"
%》
《%=dispmess%》
经由过程传进的KEY参数和select(全文或题目检索参数),天生一条SQL查询语句,分离在题目的数据库字段或在内容的字段中查找是不是包括有key的字串,如过有的话就加如我们的了局纪录集,最初把旧事题目显现出来。而输入界面固然能够满意您团体的必要,本人来定制,这里不接纳分页来显现了。人人能够在这个旧事公布体系的基本上,分离您自己的必要,把它计划得更加完善。
至此,我们的这套团体网站主动旧事公布体系基础上制造终了了。</p>使用cdonts,可以发送、查看邮件,实现webmail的功能。结合wsh,可以实现对nt主机的管理,如nt用户管理、iis虚拟主机设置、exchange邮箱设置等等,就像管理本地机一样方便。 |
|