马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
实现规模效益。与传统的用户拥有硬件软件所有权和使用权以及传统的应用服务商提供一对一的服务模式不同,ASP拥有应用系统所有权,用户拥有使用权,应用系统集中放在ASP的数据中心中,集中管理,分散使用,以一对多的租赁的形式为众多用户提供有品质保证的应用技术服务,实现规模效益。程序|在线2000-09-08・编译青苹果电脑事情室・yesky
Checkuser.asp
在使用程序的入手下手,会见者键进了他们的口令以后,他们的细节被指向了一页,如sendregister.asp,来查验一下详细
的用户名和口令在数据库中是不是存在。
sql_check="selectcount(*)fromloginuserwhereusername="&_
username&"andpassword="&useremail&""
SetRS_check=Application("Conn").Execute(sql_check)
IfRS_check(0)0Then
Session("username")=request.form("username")
response.redirect"default.asp"
EndIf
IfRS_check(0)=0Then
Session("error")="WRONGUSERNAMEORPASSWORD"
response.redirect"index.asp"
EndIf
sql命令反省一个特定的用户是不是已注册了。假如前往值为0,就标明用户名或email有效,将用户引诱回注册页。
假如是会员,就被引诱到default.asp页。这一次又用到了交换函数,以包管假如会员键进了‘(单引号),就要用
(双引号)来交换。
username=replace(request.form("username"),"","")
useremail=replace(request.form("password"),"","")
选择一个检验
Default.asp
一旦乐成登录,就呈现第二个界面,供应会员能够选择的检验科目标列表。在本例中,我们有HTML和DHTML,固然可
以增添表格以进步主题数。Default.asp请求表格安装一个下拉菜单,个中包括主题的列表。查询数据库,从试卷的表格
中汇集两个域。
sql_papers="select*id,topicfrompapersortorderbytopicasc"
SETRS_papers=Application("Conn").Execute(sql_papers)
为了鄙人拉菜单中显现了局,利用以下代码:
SELECTsize=1name=select1onchange="msec(document.form1._
select1.options[document.form1.select1.selectedIndex].value);">
<optionvalue="0">Selecttheexamination
<%DowhilenotRS_papers.EOF%>
<optionvalue="<%=RS_papers("id")%>"><%=lcase(RS_papers("topic"))%></OPTION>
<%
RS_papers.MoveNext
Loop
%>
msec函数在X值的基本上挪用redirect.asp,把查询字符串:?x的值作为下拉菜单中被选择的项的值。
functionmsec(x)
{if(x==0)
{alert("PleaseselectanyoneoftheExaminations")
}
else
{location.href="redirect.asp?section="+x
}
}
</p>帮助用户快速实现各种应用服务,ASP商有整合各方面资源的能力,可在短期内为用户提供所需的解决方案。例如,典型的ERP安装,如果要在客户端安装的话需要半年到二年的时间,但是美国的一些ASP商如USI和CORIO能在90—120天内提供ERP应用方案。 |