|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
Checkuser.asp 在应用程序的开始,访问者键入了他们的口令之后,他们的细节被指向了一页,如sendregister.asp,来检验一下详细 的用户名和口令在数据库中是否存在。 sql_check = "select count(*) from loginuser where username =\\'" & _ username &"\\' and password = \\'" & useremail &"\\'" Set RS_check = Application("Conn").Execute(sql_check) If RS_check(0) < > 0 Then Session("username") = request.form("username") response.redirect "default.asp" End If If RS_check(0) = 0 Then Session("error") = "WRONG USER NAME OR PASSWORD" response.redirect "index.asp" End If 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, topic from paper sort order by topic asc" SET RS_papers = Application("Conn").Execute(sql_papers) 为了在下拉菜单中显示结果,使用以下代码: SELECT size=1 name=select1 onchange="msec(document.form1._ select1.options[document.form1.select1.selectedIndex].value);" > < option value="0" >Select the examination < %Do while not RS_papers.EOF% > < option value="< %=RS_papers("id")% >" >< %=lcase(RS_papers("topic"))% >< /OPTION > < % RS_papers.MoveNext Loop % > msec函数在X值的基础上调用 redirect.asp,把查询字符串: ?x 的值作为下拉菜单中被选择的项的值。 function msec(x) {if (x==0) { alert("Please select any one of the Examinations") } else { location.href="redirect.asp?section=" + x } } 返回类别: 教程 上一教程: bbs树形结构的实现方式(三) 下一教程: 不刷新页面的情况下调用远程ASP 您可以阅读与"用ASP开发一个在线考试程序(四)"相关的教程: · 用ASP开发一个在线考试程序(七) · 用ASP开发一个在线考试程序(五) · 用ASP开发一个在线考试程序(一) · 用ASP开发一个在线考试程序(六) · 用ASP开发一个在线考试程序(八) |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |