ASP教程之向记事本里写进数据、一个修正暗码的判...
asp可以使用微软的activeX使得网页功能无比强大，不过安全性也较差，而且是基于的windows服务器，所以性能稳定性也一般数据<%@language="Vbscript"%><%Response.Expires=0%>
<%ifSession("fz_login")="8"then%>
<%
ifRequest.ServerVariables("HTTP_METHOD")="POST"Andcheckme"true"then
username=Request.Form("username")
password=Request.Form("password")
setfs=server.CreateObject("Scripting.FileSystemObject")
Setf=fs.OpenTextFile(server.MapPath("userpw.asp"),2,True)
f.writeline"<%"
f.writeline"P_username="&chr(34)&username&chr(34)
f.writeline"P_password="&chr(34)&password&chr(34)
f.writelinechr(37)&">"
f.close
setf=nothing
setfs=nothing
session("logusername")=username
session("logpassword")=password
edit_ok
endif
%>
<%subedit_ok()%>
<scriptlanguage="javascript">
alert("您的用户名与暗码已乐成修正!");
document.location.href="welcome.htm";
</script>
<%endsub%>
<scriptlanguage="javascript">
functioncheckform(){
if(document.form1.username.value==""){
alert("请输出新用户名,其实不能为空!");
document.form1.username.focus();
returnfalse;
}
if(document.form1.password.value==""){
alert("请输出新暗码!");
document.form1.password.focus();
returnfalse;
}
if(document.form1.username.value.length<6||document.form1.password.value.length<6){
alert("为了收集平安，请输出年夜于6个字符的用户名和暗码!");
document.form1.username.value="";
document.form1.password.value="";
document.form1.password1.value="";
returnfalse;
}
if(document.form1.password1.value!=document.form1.password.value){
alert("您输出的暗码纷歧致!");
document.form1.password1.focus();
document.form1.password1.value="";
returnfalse;
}
if(confirm("您真的要修正暗码吗？")==false){
document.location.href="welcome.htm";
returnfalse;}
else
returntrue;
}
</script>
<html><head><title>修正暗码</title>
<METANAME="robots"CONTENT="none">
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<linkrel="stylesheet"href="images/font.css"type="text/css">
</head>
<bodybgcolor="#9CC7EF"leftMargin=0marginwidth="0"topmargin=0>
<tablewidth=530border="0"cellspacing="0"cellpadding="0"align="center">
<tralign="center"bgcolor="<%=main_color%>">
<td>
<tablewidth="100%"border="1"cellspacing="1"cellpadding="4"class="p9"bordercolorlight="#1059A5"bordercolordark="#9CC7EF">
<formname="form1"method="post"action="edit_pws.asp"onsubmit="javascript:returncheckform();">
<tr>
<tdheight="40">
<divalign="center"><spanstyle="font-size:14.9px"><b><fontcolor="<%=maintitle_color%>">修
改管理员帐号</font></b></span></div>
</td>
</tr>
<trbgcolor="<%=textzero_color%>">
<tdheight="30"align="center">新用户名：<inputtype="text"name="username"size=30class="p9">
</td>
</tr>
<trbgcolor="<%=textzero_color%>">
<tdalign="center"height="30">新密码：<inputtype="password"name="password"size=30class="p9">
</td>
</tr>
<trbgcolor="<%=textzero_color%>">
<tdalign="center"height="30">考证暗码：</p>由于ASP还是一种Script语言所没除了大量使用组件外，没有办法提高其工作效率。它必须面对即时编绎的时间考验，同时我们还不知其背后的组件会是一个什么样的状况； Response:从字面上讲是“响应”，因此这个是服务端向客户端发送东西的，例如Response.Write 以HTML语言整合(HTML负责界面上，ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。 交流是必要的，不管是生活还是学习我们都要试着去交流，通过交流我们可以学到很多我们自己本身所没有的知识，可以分享别人的经验甚至经历。 不能只是将它停留在纸上谈兵的程度上。 在平时的学习过程中要注意现学现用，注重运用，在掌握了一定的基础知识后，我们可以尝试做一些网页，也许在开始的时候我们可能会遇到很多问题，比如说如何很好的构建基本框架。 他的语法和设计思路和VB完全相同，导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是，相当多的ASP教程混合了Javascript,VBscript等等脚本语言，搞的初学者。 多看多学多思。多看一些关于ASP的书籍，一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人，向同学老师多多学习，不论知识的大小;多思则是要将学到的知识灵活运用。 另外因为asp需要使用组件，所以了解一点组件的知识(ADODB也是组件)
页:
[1]