投稿
  1. 首页
  2. 随笔

注册登陆页面HTML代码该怎么写？

capacity是什么意思 • 2023-3-15 • 随笔 • 阅读 29

注册登陆页面HTML代码该怎么写？,第1张

以下为个人原创教学例子，任何人引用需注明出自百度知道用户am7972,楼主可供参考\x0d\x0a该例子涵盖了文本框、密码框、下拉菜单、单选框、复选框及文本区的使用\x0d\x0a同时在数据的使用方面涵盖了文本型、数值型、日期型、布尔型的使用\x0d\x0a也涵盖了在会员信息入数据库前，进行严格的数据检查\x0d\x0a不足处，JS验证还不是太完善，不过有服务端认证足够了\x0d\x0a会员注册\x0d\x0a\x0d\x0a\x0d\x0a\x0d\x0a\x0d\x0a\x0d\x0a\x0d\x0a

会员注员 \x0d\x0a

姓名： \x0d\x0a
密码： \x0d\x0a
性别： 男 女 \x0d\x0a
生日： \x0d\x0a
年龄： \x0d\x0a
爱好： 上网读书 体育 \x0d\x0a
上网方式： \x0d\x0a 拨号上网 无线上网 光纤上网 \x0d\x0a \x0d\x0a
个人简介：

\x0d\x0a\x0d\x0a\x0d\x0a\x0d\x0a====bb.asp的会员注册非法数据监测====\x0d\x0a0 Then\x0d\x0a Response.write "姓名不能包含特殊符号!@#$%^&*()_-+|?/"",." \x0d\x0a Response.End \x0d\x0a End If\x0d\x0aNext\x0d\x0a'判断密码合不合法，是否包含非法数据userPassword = Trim(userPassword)If userPassword ="" Then Response.write "密码不能为空" Response.EndEnd If\x0d\x0aIf Len(userPassword)>20 Then\x0d\x0a Response.write "密码字数不能超过20个字" \x0d\x0a Response.End\x0d\x0aEnd If\x0d\x0a'判断密码合不合法，是否包含非法数据\x0d\x0aSex = Trim(Sex)\x0d\x0aIf Sex = "" Then\x0d\x0a Response.write "性别不能为空"\x0d\x0a Response.End\x0d\x0aEnd If\x0d\x0aIf Sex "True" And Sex "False" Then\x0d\x0a Response.write "性别不能为不男不女"\x0d\x0a Response.End\x0d\x0aEnd If\x0d\x0a'判断生日合不合法，是否包含非法数据\x0d\x0auserSR = Trim(userSR)\x0d\x0aIf userSR ="" Then\x0d\x0a Response.write "生日不能为空"\x0d\x0a Response.End\x0d\x0aEnd If\x0d\x0aIf Len(userSR)10 Then '例如：2012-6-3 2012-11-23\x0d\x0a Response.write "你输入的生日字数不对，应为2012-6-3或2012-11-23格式" \x0d\x0a Response.End\x0d\x0aEnd If\x0d\x0aIf IsDate(userSR)=False Then\x0d\x0a Response.write "你输入的生日格式不能转化为日期，请核实" \x0d\x0a Response.End\x0d\x0aEnd If\x0d\x0aIf DateDiff("yyyy",userSR,Date())200 Then\x0d\x0a Response.write "根据你输入的生日你可能小于1岁或已经超过200岁了，请核查重新输入" \x0d\x0a Response.End\x0d\x0aEnd If\x0d\x0a'判断年龄合不合法，是否包含非法数据userNL = Trim(userNL)If userNL ="" Then\x0d\x0a Response.write "年龄不能为空" \x0d\x0a Response.End\x0d\x0aEnd If\x0d\x0aIf IsNumeric(userNL)=False Then\x0d\x0a Response.write "你输入的年龄不能转化为数值，请核查"\x0d\x0a Response.End\x0d\x0aEnd If\x0d\x0auserNL = CInt(userNL)\x0d\x0aIf userNL200 Then\x0d\x0a Response.write "你输入的年龄不能小于0岁或者大于200岁，请核查"\x0d\x0a Response.End\x0d\x0aEnd If\x0d\x0a'判断爱好合不合法，是否包含非法数据ah = Trim(ah) '选择多个爱好则系统会用，分开 //测试\x0d\x0aah = Replace(ah," ","")\x0d\x0aarrAh = Split(ah,",")\x0d\x0aFor i = LBound(arrAh) To UBound(arrAh)\x0d\x0a If arrAh(i)"sw" And arrAh(i)"ds" And arrAh(i)"ty" Then \x0d\x0aResponse.write i & "你选择的爱好有问题，请核查" & arrAh(i)\x0d\x0aResponse.End\x0d\x0aEnd If\x0d\x0aNext\x0d\x0a'判断上网方式合不合法，是否包含非法数据swfs = Trim(swfs)If swfs = "" Then\x0d\x0a Response.write "上网方式不能为空"\x0d\x0a Response.End\x0d\x0aEnd If\x0d\x0aIf swfs"bhsw" And swfs"wxsw" And swfs"gxsw" Then\x0d\x0a Response.write "你选择的上网方式有问题，请核查"\x0d\x0a Response.End\x0d\x0aEnd If\x0d\x0a'判断个人简介是否为空，是否超出1000个字\x0d\x0auserGrjs = Trim(userGrjs)\x0d\x0aIf userGrjs = "" Then\x0d\x0a Response.write "个人简介不能为空" \x0d\x0a Response.End\x0d\x0aEnd If\x0d\x0aIf Len(userGrjs) > 1000 Then\x0d\x0a Response.write "个人简介不能超过1000个字"\x0d\x0a Response.End\x0d\x0aEnd If\x0d\x0aResponse.write "数据合法性检测通过"\x0d\x0a%>\x0d\x0a====登陆的HTML代码可相信楼主参照会员注册代码应该没问题了====

<form action = "a.html" method = "post">

用户名：<input type = "text" name = "username" id = "username">

<br>

密码：<input type = "password" name = "password" id = "password">

<br>

<input type = "submit" id = "submit" value = "登录">

</form>

1、ASP文件中的代码

pencat=rs.Fields.Item("m_content").Value

pencat=replace(pencat,"t_title",n_title)

pencat=replace(pencat,"t_author",n_author)

pencat=replace(pencat,"t_content",n_content)

Set fso = Server.CreateObject("Scripting.FileSystemObject")

Set fout = fso.CreateTextFile(server.mappath(fpath&"\" &fname))

fout.WriteLine pencat

fout.close

2、如下给出要生成的网页模板：

<html>

<head>

<meta http-equiv=""Content-Language"" content=""zh-cn"">

<meta http-equiv=""Content-Type"" content=""text/htmlcharset=gb2312"">

<meta name=""GENERATOR"" content=""Microsoft FrontPage 4.0"">

<meta name=""ProgId"" content=""FrontPage.Editor.Document"">

<title></title>

</head>

<body topmargin=""0"" leftmargin=""0"">

<table border=""0"" width=""760"" height=""100%"" background=""background.jpg"" >

<tr>

<td width=""752"" height=""10"" colspan=""3"">

<p align=""center"">t_title

</td>

</tr>

<tr>

<td width=""752"" height=""18"" colspan=""3"">

<div align=""center"">

</div>

<div align=""center"">

<font size=""2"">

作者：</font><font color=""#990000"">t_author</font>

<font size=""2"">

加入时间：</font><font color=""#990000"">t_date</font>

</div>

</td>

</tr>

<tr>

<td width=""15%"" height=""100%"" valign=""top"">

</td>

<td width=""70%"" height=""100%"" valign=""top"">

t_content

</td>

<td width=""15%"" height=""100%"" valign=""top"">

</td>

</tr>

</table>

</body>

</html>

3、解释

（1）pencat=rs.Fields.Item("m_content").Value

pencat为一个字符串变量。

rs.Fields.Item("m_content").Value就是如上2、网页模板的全部HTML字符

（2）pencat=replace(pencat,"t_title",n_title)

pencat=replace(pencat,"t_author",n_author)

pencat=replace(pencat,"t_content",n_content)

以上三句就是将字符串中的字串替换成为你所需要的内容，即ASP中动态获得的内容。

（3）Set fso = Server.CreateObject("Scripting.FileSystemObject")

Set fout = fso.CreateTextFile(server.mappath(fpath&"\" &fname))

fout.WriteLine pencat

fout.close

以上为将刚刚组合所得的网页代码写入文件的过程。第一句定义fso文件，第二句创建输出流文件，其中fpath为你想要存储的文件的路径，fname为文件名；后两句是将字符串写入文件和关闭输出流文件。

欢迎分享，转载请注明来源：内存溢出

原文地址: http://outofmemory.cn/zaji/6116006.html

赞 (0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
capacity是什么意思 capacity是什么意思 一级用户组
0 0
上一篇 2023-03-15
下一篇 2023-03-15

发表评论

登录后才能评论

评论列表（0条）

Copyright © 2022 内存溢出 版权所有 湘ICP备2022025235号 Powered by outofmemory.cn

保存