📄 11618821989907_9.html
字号:
<li id="legv2-16"><a href="javascript:if(confirm('http://tech.ddvip.com/program/other/index.html \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/program/other/index.html'" tppabs="http://tech.ddvip.com/program/other/index.html">其它</a></li> </ul> </div> </div> <div id="tech_content_tl" class="tlad"></div><!-- 内容部分 --><div class="content"> <div class="location"> <a href="javascript:if(confirm('http://www.ddvip.com/ \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://www.ddvip.com/'" tppabs="http://www.ddvip.com/" target="_balnk">豆豆网</a> > <a href="javascript:if(confirm('http://tech.ddvip.com/index.html \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/index.html'" tppabs="http://tech.ddvip.com/index.html">技术应用</a> > <a href="javascript:if(confirm('http://tech.ddvip.com/program/index.html \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/program/index.html'" tppabs="http://tech.ddvip.com/program/index.html">程序设计</a> > <a href="javascript:if(confirm('http://tech.ddvip.com/web/asp/index.html \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/web/asp/index.html'" tppabs="http://tech.ddvip.com/web/asp/index.html">asp</a> > 正文 </div> <div class="content_left"> <div class="article"> <div class="article_title"> <h1>ASP入门基础教程-实例 网上图书管理系统</h1> <div class="title_bottom"><script language="javascript" src="../a_dir_d/title_bottom.js" tppabs="http://tech.ddvip.com/a_dir_d/title_bottom.js"></script></div> <p><a href="javascript:if(confirm('http://tech.ddvip.com/ \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/'" tppabs="http://tech.ddvip.com/">http://tech.ddvip.com</a> 2006年10月27日 <a href="javascript:if(confirm('http://bbs.ddvip.com/ \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://bbs.ddvip.com/'" tppabs="http://bbs.ddvip.com/">社区交流</a></p> </div> <div class="article_content"> <div class="title_bottom_cpr"><script src="../a_dir_d/ad_title_bottom.js" tppabs="http://tech.ddvip.com/a_dir_d/ad_title_bottom.js"></script></div> <!--ID="929"--><div class="searchhot">关键字:<a href="javascript:if(confirm('http://tech.ddvip.com/search.php?key=ASP技巧 \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/search.php?key=ASP技巧'" tppabs="http://tech.ddvip.com/search.php?key=ASP技巧" target="_blank">ASP技巧</a> <a href="javascript:if(confirm('http://tech.ddvip.com/search.php?key=ASP脚本 \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/search.php?key=ASP脚本'" tppabs="http://tech.ddvip.com/search.php?key=ASP脚本" target="_blank">ASP脚本</a> <a href="javascript:if(confirm('http://tech.ddvip.com/search.php?key=Server \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/search.php?key=Server'" tppabs="http://tech.ddvip.com/search.php?key=Server" target="_blank">Server</a> <a href="javascript:if(confirm('http://tech.ddvip.com/search.php?key=ODBC \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/search.php?key=ODBC'" tppabs="http://tech.ddvip.com/search.php?key=ODBC" target="_blank">ODBC</a> <a href="javascript:if(confirm('http://tech.ddvip.com/search.php?key=ASP连接数据库 \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/search.php?key=ASP连接数据库'" tppabs="http://tech.ddvip.com/search.php?key=ASP连接数据库" target="_blank">ASP连接数据库</a> <a href="javascript:if(confirm('http://tech.ddvip.com/search.php?key=ASP入门 \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/search.php?key=ASP入门'" tppabs="http://tech.ddvip.com/search.php?key=ASP入门" target="_blank">ASP入门</a> </div> <div class="article_z"><h2> 本文详细介绍ASP入门基础教程-实例 网上图书管理系统 </h2> </div> <div class="article_ad"><script language="javascript" src="../a_dir_d/ads_250x250.js" tppabs="http://tech.ddvip.com/a_dir_d/ads_250x250.js"></script></div> <div id='clickeye_content'> <div class="article_c" id="fontsize"> <p> 1、通过表单提交用户所填资料;</p><p> 2、按一定的规则自动生成会员ID;</p><p> 3、通过myreset()自定义函数执行重写命令;</p><p> 4、通过mysubmit()自定义函数检查资料是否填写完整,如不完整,弹出相应的提示框,否则进行表单提交,进入本页面的程序处理代码,处理完毕,跳转到"register_OK.asp"页面,显示注册成功相关信息。</p><code><%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><br /><!--#include file="Connections/conn.asp" --><br /><%<br />'如果从表单中提取的用户名不为空,而且session("mName")为空,则,<br />if Request.Form("mName")<>"" and session("mName")="" then<br />'将表单中获取的ID、用户名和密码分别存入变量session("MyID")、session("mName")和session("MyPD")中。<br />session("MyID")=request.Form("ID")<br />session("mName")=Request.Form("mName")<br />session("MyPWD")=request.Form("PassWord")<br />'将从表单中提取来的各项值分别存入相应的变量中。<br />mName=Request.Form("mName")<br />city=Request.Form("city")<br />address=Request.Form("address")<br />postcode=Request.Form("postcode")<br />CardNO=Request.Form("CardNO")<br />CardType=Request.Form("CardType")<br />Tel=Request.Form("Tel")<br />Email=Request.Form("Email")<br />'向DB_Member表中插入一条记录,各字段值就是从表单中提取来的各项值。<br />Ins_sql = "Insert into DB_Member (ID,mName,PassWord,city,address,postcode,CardNO,"&_<br />"CardType,Tel,Email) values('"&session("MyID")&"','"&mName&"','"&session("MyPWD")&_<br />"','"&city&"','"&address&"','"&postcode&"','"&CardNO&"','"&CardType&"','"&Tel&_<br />"','"&Email&"')"<br />conn.execute(Ins_sql)<br />'页面转向到“register_OK.asp”页面。即注册成功页面。<br />response.redirect("register_OK.asp")<br />end if<br />%><br /><%<br />'创建一个记录集对象。<br />Set rs_Max = Server.CreateObject("ADODB.Recordset")<br />'***从会员信息表(DB_Member)中取出最大的会员ID。<br />sql_max="SELECT MAX(ID) AS MaxID FROM DB_Member"<br />rs_max=conn.execute(sql_max)<br />%><br /><html><br /><head><br /><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><br /><title>注册新会员</title><br /><link href="style.css" rel="stylesheet"><br /><style type="text/css"><br /><!--<br />body {<br />background-image: url(images/bg1.jpg);<br />}<br />--><br /></style><br /></head><br /><body leftmargin="0" topmargin="0"><br /><center><br /><table width="640" height="133" border="0" cellpadding="-1" cellspacing="-1"><br /><tr><br /><td background="images/bg.jpg"><img src="images/register_top.gif" width="640" height="130"></td><br /></tr><br /></table><br /><table width="640" height="341" border="0" cellpadding="-1" cellspacing="-1" background="images/bg.jpg"><br /><tr><br /><td valign="top" background="images/buycar_bottom.jpg"><br /><div align="center"><br /><!--开始创建表单--><br /><form method="POST" action="register.asp" name="form1"><br /><table width="346" border="1" align="center" cellpadding="0"<br />cellspacing="0" bordercolor="#FFFFFF" bordercolorlight="#FFFFFF"<br />bordercolordark="#aaaaFF"><br /><tr><br /><!--开始按一定的规则自动生成会员ID--><br /><% no=trim(rs_max("MaxID"))<br />'从rs_max记录集中取出字段名为“MaxID"的值,它就是当前最大的会员ID。<br />'下面分别取出当前的月、日和年的值,作为新会员编号的头部。如果取出的月和日的值为一位数,则在其前添加一个0。<br />if len(month(date()))=1 then<br />cmonth="0"& cstr(month(date()))<br />else<br />cmonth=cstr(month(date()))<br />end if<br />if len(day(date()))=1 then<br />cday="0"& cstr(day(date()))<br />else<br />cday=cstr(day(date()))<br />end if<br />'下面取出新会员编号的后5位的值。<br />select case len(int(Right(no,5)+1))<br />'当从变量(no)中由右向左取5个字符串加1后,其值的长度等于1,则将其值前加上0000后赋给变量cno。<br />case 1<br />cno="0000"+Cstr(int(Right(no,5)+1))<br />case 2<br />cno="000"+Cstr(int(Right(no,5)+1))<br />case 3<br />cno="00"+Cstr(int(Right(no,5)+1))<br />case 4<br />cno="0"+Cstr(int(Right(no,5)+1))<br />case 5<br />cno=Cstr(int(Right(no,5)+1))<br />case Else<br />cno="00001"<br />end select<br />intno="HY"& cStr(Year(Date()))& cmonth& cday&cno<br />%><br /><td width="82" height="27" align="right" nowrap>会员ID:</td><br /><td width="258" height="27">&nbsp;<br /><input type="hidden" name="ID" value="<%= intno %>" size="32"><br /><font color="#666699"><%= intno %></font></td><br /></tr><br /><tr><br /><td height="27" align="right" nowrap>会员名称:</td><br /><td height="27"> <div align="center"><br /><input type="text" name="mName" size="32"><br /></div></td><br /></tr><br /><tr><br /><td height="27" align="right" nowrap>您的密码:</td><br /><td height="27"> <div align="center"><br /><input type="password" name="PassWord" value="" size="32"><br /></div></td><br /></tr><br /><tr><br /><td height="27" align="right" nowrap>城市:</td><br /><td height="27"> <div align="center"><br /><input type="text" name="city" value="" size="32"><br /></div></td><br /></tr><br /><tr><br /><td height="27" align="right" nowrap>地址:</td><br /><td height="27"> <div align="center"><br /><input type="text" name="address" value="" size="32"><br /></div></td><br /></tr><br /><tr><br /><td height="27" align="right" nowrap>邮政编码:</td><br /><td height="27"> <div align="center"><br /><input name="postcode" type="text" value="" size="32" maxlength="6"><br /></div></td><br /></tr><br /><tr><br /><td height="27" align="right" nowrap>信用卡号:</td><br /><td height="27"> <div align="center"><br /><input name="CardNO" type="text" value="" size="32" maxlength="24"><br /></div></td><br /></tr><br /><tr><br /><td height="27" align="right" nowrap>信用卡类型:</td><br /><td height="27"> <div align="center"><br /><input type="text" name="CardType" value="" size="32"><br /></div></td><br /></tr><br /><tr><br /><td height="27" align="right" nowrap>联系电话:</td><br /><td height="27"> <div align="center"><br /><input type="text" name="Tel" value="" size="32"><br /></div></td><br /></tr><br /><tr><br /><td height="27" align="right" nowrap>Email:</td><br /><td height="27"> <div align="center"><br /><input type="text" name="Email" value="" size="32"><br /></div></td><br /></tr><br /><!--创建表单结束--><br /><script language="JavaScript"><br />//创建一个名为myreset的自定义函数。<br />function myreset(){<br />//执行表单重填。<br />form1.reset();<br />event.returnValue=false;<br />}<br /></script><br /><script language="VBScript"><br />'创建一个名为mysubmit的自定义函数。当表单中某项内没有填写数值时,一提交,此函数就显示相应的提示信息。<br />function mysubmit()<br />if form1.mName.value="" then<br />msgbox "请输入会员姓名!"<br />form1.mName.focus()<br />end if<br />if form1.PassWord.value="" then<br />msgbox "请输入会员密码!"<br />form1.PassWard.focus()<br />end if<br />if form1.city.value="" then<br />msgbox "请输入城市!"<br />form1.city.focus()<br />end if<br />if form1.address.value="" then<br />msgbox "请输入地址!"<br />form1.address.focus()<br />end if<br />if form1.Postcode.value="" then<br />msgbox "请输入邮政编码!"<br />form1.Postcode.focus()<br />end if<br />if form1.CardNO.value="" then<br />msgbox "请输信用卡号!"<br />form1.CardNO.focus()<br />end if<br />if form1.Tel.value="" then<br />msgbox "请输入联系电话!"<br />form1.Tel.focus()<br />end if<br />if form1.Email.value="" then<br />msgbox "请输入Email!"<br />form1.Email.focus()<br />end if<br />end function<br /></script><br /><table><br /><tr><br /><td width="314" height="49" align="right"><br /><div align="center"><br /><input type="image" value="提交" src="images/submit.gif" onClick="return mysubmit()"><br /><input type="image" name="Submit" value="重置" src="images/reset.gif" onClick="myreset()"><br /><a href="checkout.asp"><img src="images/home1.gif" width="81" height="36" border="0"></a><br /><input name="Amount" type="hidden" id="Amount" value="0"><br /><input name="grade" type="hidden" id="grade" value="0"><br /></div></td><br /></tr><br /></table><br /></center><br /></body><br /></html></code><p> Register_OK.asp 显示注册会员成功信息页面。 本页面是注册注册成功提示页面。其主要功能有:</p> </div> </div> <!-- 分页 --> <div class="page"><a href="11618821989907_8.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_8.html">上一页</a><a href="11618821989907.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907.html">1</a><a href="11618821989907_2.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_2.html">2</a><a href="11618821989907_3.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_3.html">3</a><a href="11618821989907_4.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_4.html">4</a><a href="11618821989907_5.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_5.html">5</a><a href="11618821989907_6.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_6.html">6</a><a href="11618821989907_7.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_7.html">7</a><a href="11618821989907_8.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_8.html">8</a><span class="current">9</span><a href="11618821989907_10.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_10.html">10</a><a href="11618821989907_10.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_10.html">下一页</a></div> <!-- 分页end --><p style="color:#000000; font-size:12px; text-align:right; padding-right:4px;">作者:含笑 责编:豆豆技术应用</p> <div id="art_content_end_468x60"><script src="../a_dir_d/ads_468x60.js" tppabs="http://tech.ddvip.com/a_dir_d/ads_468x60.js"></script></div> </div> <div class="related"> <div class="relatedtop">与“ASP入门基础教程-实例 网上图书管理系统”相关的文章</div> <ul> <li>暂无相关文章</li> </ul> </div> <div class="clear"></div> <div class="related"> <div class="relatedtop">本栏目更新</div> <ul> <li><a href="javascript:if(confirm('http://tech.ddvip.com/2008-09/122111675163590.html \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/2008-09/122111675163590.html'" tppabs="http://tech.ddvip.com/2008-09/122111675163590.html">实例讲解Access数据库在线压缩的实现方法</a></li>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -