我哪里不对了各位高手为什么不行呢

xingairong 2003-10-16 04:03:13

<form name="form" method="post" action="">
管理员:
<input type="text" name="user">
密码:
<input type="password" name="pswd">
<input type="submit" name="Submit" value="提交">
</form>
<%
dim name,pass
name=trim(request.form("name"))
pass=trim(request.form("pswd"))
if name="111" & pass="222" then
response.redirect"disprec.asp"
response.end
else
response.Write("您不是管理员,请走开")

end if %>
...全文
43 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
xingairong 2003-10-17
  • 打赏
  • 举报
回复
谢谢,这里真好
zhaoliangpat 2003-10-16
  • 打赏
  • 举报
回复
最好分两页!

<form name="form1" method="post" action="yourpage.asp">
管理员:
<input type="text" name="user">
密码:
<input type="password" name="pswd">
<input type="submit" name="Submit" value="提交">
</form>



yourpage.asp



<%
dim name,pass
name=trim(request.form("name"))
pass=trim(request.form("pswd"))
if name="111" and pass="222" then
response.redirect "disprec.asp"
response.end
else
response.Write("您不是管理员,请走开")
end if %>
yzxlyd 2003-10-16
  • 打赏
  • 举报
回复
<%
if Request.Form.Count=0 then
%>

<FORM ACTION="login.asp" METHOD="post">
<Table border=0>
<tr><td>用户名:</td>
<td><INPUT TYPE=text NAME=username VALUE=""></td>
</tr>
<tr><td>密码:</td>
<td><INPUT TYPE=password NAME=password VALUE=""></td>
</tr>
</Table>
<INPUT TYPE=Submit VALUE=确认提交>
<INPUT TYPE=reset VALUE=重新输入>
</FORM>

<%else%>
<%
dim user
dim pwd
user=request.Form("username")
pwd=request.Form("password")
if user="yzxlyd" then
if pwd="52baby" then
response.Write"登陆成功"
else
response.Write"登陆失败"
end if
else
response.Write"无此用户"
end if
end if
%>
你用这个吧。
pp4u 2003-10-16
  • 打赏
  • 举报
回复
action="本页面的文件名"
ydr2002 2003-10-16
  • 打赏
  • 举报
回复
form的名字不要命名为“form”
slumcherry 2003-10-16
  • 打赏
  • 举报
回复
你是想name和pass一致时才导向吗? 如果时应该是并的关系, 用 and
1 白手起家 亲爱的朋友们,只要你认真看过这篇文章我将兑现以下的承诺: ■你将了解单片机是什么和一些关于它的故事。也许这在上文已经实现。 ■你可能对单片机产生学习兴趣。能从头一直看到这里的朋友应该是已经有了兴趣。 ■你可以了解学习单片机的软、硬件条件和一般使用方法。 ■跟随文中的制作部分可以建立起一套可爱的单片机学习、实验环境。 ■跟随文中的制作部分可以制作出以单片机为核心的实用小作品。 ■完成以上内容,你的经历将会给你更多。 2 十八般武艺 单片机下载线、实验板的制作 3 成家立业 到此为止,单片机的理论与实践全部完成,我松了一口气,也不知我说得对不对、细不细、好不好。我既希望简单明 了又希望面面俱到,既想轻松风趣又想认真严谨。不能单调无趣、不可一带而过,我用我的写作方式与大家分享一个故事, 一个《无线电》爱好者与单片机之间的浪漫爱情故事。 4 用武之地 我认真地完成着,打磨每一个细节的棱角,希望可以呼应《无线电》扩版的喜讯,带给大家技术类文章全新面貌。有 喜有优,请大家给予我鼓励,让我可以继续与大家交流、分享;有过有失,请诸位务必指正批评,令我在大家的帮助下学 习、进步。希望本文可以给您带来技术上的收益和快乐的心情。 未来的日子里你会安静的坐在自己的房间看书、实验,时而苦思冥想,时而欢呼胜利。单片机世界疆土辽阔,有看不 完的知识、学不尽的门道。我能做的事情也只是激发你对单片机的兴趣,后面的路还有很长要靠你自己慢慢摸索。 《无线电》 是不错的导师,集合优秀的制作和思想,伴随着爱好者成长。除此之外还要多看一些书籍,在书店里单片机相关的图书较 来较多,无数后起之秀开始关注单片机,选择一本适合你的书显得特别重要。以我的经验而言,在选择时最好不要被书名 的绚丽所吸引,关键是要看全书的内容。如果翻开一本书,前面的内容能看懂,后面的内容看不懂,则说明这是适合你的 书。同时还要看书中是不是理论结合实验,即不只是讲一堆理论,又不完全倾向于实验。或是问一问老师或是学习单片机 的前辈,让他们推荐几本口碑不错的书。除了书本的知识,有条件的朋友可以上网找一些优秀的网站和论坛“泡一泡” ,多 学习、多看帖子、多参与讨论、多收集网上的优秀资源。深入学习的同时也要广闻各方面知识,要尽量概观全局,用开扩 的眼界发现新的价值。最重要的是始终保持谦虚谨慎的状度,在单片机的武林,高手如云。最后祝各位书山顺风路、学海 顺风舟。
前 言 visual basic继承了basic语言易学易用的特点,特别适合于初学者学习windows系统编程。随着21世纪信息社会的到来,计算机在人们的工作和生活中的深入,要求我们越来越多地与计算机打交道,为了使用户在繁忙的日程工作中得到放松,于是出现了各种各样的休闲软件,如聊天工具,游戏等等。于是我们小组着手设计开始一个这样的游戏软件。通过这学期来Visual Basic的学习,我初步掌握了Visual Basic语言的最基本的知识,于是在化希耀张兵等老师的指导下动手用Visual Basic编写俄罗斯方块游戏。 无可争议,《俄罗斯方块》是有史以来最伟大的游戏之一。它是永恒的娱乐经典,但它实际上又和那些传统的经典娱乐方式不同,因为它的本质是电子化的,所以它的确属于现代产物。《俄罗斯方块》举世闻名的游戏性,在该游戏新鲜出炉时就显得非常直观。某些与坠落的玩具碎片和它们的形状有关的东西,使得哪怕新手也会很自然地企图把它们排列起来,并加以适当组合,就好似《俄罗斯方块》触动了我们某些内在的感官,使得哪怕是我们当中最杂乱无章的人也要把事情整理妥当。 在曾经发布过的所有游戏中,《俄罗斯方块》还被认为是仅有的一个能够真正吸引广泛人群的作品。某些批评家也许会声称,《俄罗斯方块》要比过去二十年间出现的任何东西都要浪费人们的时间。至于我们,则要欣然提名它为GameSpot评选出的历史上最伟大游戏之一。 为了怀念经典,也为了能够给大多的计算机用户在工作之余找到一个休闲、娱乐的一个方式,我们小组开始着手用VB语言开发一个经典的俄罗斯方块游戏。 工程概况 1.1 项目名称 俄罗斯方块游戏 1.2 设计平台 VB 全称Visual Basic,它是以Basic语言作为其基本语言的一种可视化编程工具。 Vb是microsoft公司于1991年退出的windows应用程序开发工具visual意思是“可视化的”。在它刚推出来时,自身还存在一些缺陷,功能也相对少一些。但是经过多年的开发研究。最近microsoft公司又推出了VB6.0版本 VB6.0运行环境:硬件,要求486以上的处理器、16MB以上内存,50MB 以上的硬盘,cd-rom驱动器,鼠标。软件:要求windows 95以上版本。 1.3程序设计思想 游戏是用来给大家娱乐的,所以要能在使用的过程中给大家带来快乐,消除大家的疲劳,所以我们在游戏中添加了漂亮的场景和动听的音乐,设置了过关升级的功能,激发大家的娱乐激情。 从游戏的基本玩法出发,主要就是俄罗斯方块的形状和旋转,我们在设计中在一个图片框中构造了一个4*4的网状小块,由这些小块组合成新的形状,每四个小块连接在一起就可以构造出一种造型,因此我们总共设计了7中造型,每种造型又可以通过旋转而变化出2到4种形状,利用随机函数在一个预览窗体中提前展示形状供用户参考,然后将展示的形状复制到游戏窗体中进行摆放,在游戏窗体中用户就可以使用键盘的方向键来控制方块的运动,然后利用递归语句对每一行进行判断,如果有某行的方块是满的,则消除这行的方块,并且使上面的方块自由下落,其中,方块向下的速度是有时钟控件控制的,在游戏中,用户也可以使用向下键加快下落速度,定义一个变量,对消除的函数进行记录,最后就可以得出用户的分数,用if 语句对分数判断,达到一定的积分就可以升级到下一个档次。 俄罗斯方块游戏设计的主要步骤为以下10个方面: (1)游戏界面的设计。 (2)俄罗斯方块的造型。 (3)俄罗斯方块的旋转。 (4)俄罗斯方块的运动情况(包括向左,向右和向下)。 (5)俄罗斯方块的自动消行功能。 (6)游戏级别的自由选择。 (7)游戏速度的自由选择。 (8)游戏得分的计算。 (9)游戏菜单选项的设计及功能实现。 (10)游戏的背景音乐。 1.4运用的控件和主要对象 我们在设计过程中主要用到的控件有:command控件,image控件,picture控件,label控件,timer控件,text控件,windows media player控件等等。 1.5主要实现的功能 我们开发的俄罗斯方块游戏,主要实现了以下几种功能: 1.可以灵活控制方块在图形框中运动。 2.游戏过程中方块可以自由旋转。 3.当某一行的方块排列满时,将自动将这一行方块消除,然后将上面所有方块向下移动,可以支持连续消行。 4.游戏前可以选择游戏的速度和游戏的等级,游戏速度既为方块下落速度,游戏等级为初始游戏时在基层随机生成一定行数的无规律方块,生成的行数由你来选择,每行至少产生5个以上的无规律方块,这样增加了游戏难度,对于游戏高手来说,无疑不是一个新的挑战。 5.游戏的得分支持积分,并且按照公式: 得分 = 原来分数+ 100 * (2 ^ 同时消除的行数-1) 这样,你同一时间消除

28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧