当前位置: 首页 > 图文教程 > 网络编程 > ASP > 在线实时开通WEB及FTP源程序

ASP
[原创]asp下用实现模板加载的的几种方法总结
asp下利用fso实现文件夹或文件移动改名等操作函数
asp cint clng的范围与防止cint和clng的溢出解决方法大全
asp防范跨站点脚本攻击的的方法
独孤剑写的马克斯迅雷片库采集插件1.4 官方最新版提供下载了
根据日期得到生肖的ASP函数
不错的主要用于加密的vbs(asp)位移运算类
Script.VBS.Agent.ai juan.vbs专杀
循环取值Request.QueryString的用法
asp下实现字符串的补充fill()
无服务器做任意二级米子站
几种另类的ASP后门
asp事物功能简单小应用
ASP获取网页全部图片地址并保存为数组的正则
通过客户端验证上传图片文件大小的ASP源码
asp下计算分页的几种方法
谈动态多行多列,循环行和列,输出M行N列的ASP代码
asp在线执行sql语句的函数
asp正则html的图片,对图自动缩放大小
文件名 正则表达式提取方法

ASP 中的 在线实时开通WEB及FTP源程序


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 60 ::
收藏到网摘: n/a

程序利用FSO+SERV-U(2.x版本)实现:
1、注册文件index.htm
<html>
<head>
<title>宁波科宇网——个人网页申请</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="Javascript">
function CheckIfEnglish( String )
{
var Letters = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890-";
var i;
var c;
if(String.charAt( 0 )==''-'')
return false;
if( String.charAt( String.length - 1 ) == ''-'' )
return false;
for( i = 0; i < String.length; i ++ )
{
c = String.charAt( i );
if (Letters.indexOf( c ) < 0)
return false;
}
return true;
}

function checkSubmit() {
var EmailReg = /^[_a-z0-9]+@([_a-z0-9]+\.)+[a-z0-9]{2,3}$/;
if (document.form.name.value == "") {
alert("请输入您要注册的用户名!");
document.form.name.focus();
return false;
}

if (!CheckIfEnglish(document.form.name.value )) {
alert("用户名不能输入中文及非法字符!");
document.form.name.focus();
return false;
}

if ((document.form.pass.value == "")&&(document.form.rpass.value == "")) {
alert("密码不能为空!");
document.form.pass.focus();
document.form.rpass.focus();
return false;
}

if ((document.form.pass.value)!=(document.form.rpass.value)) {
alert (''二次密码输入不一样!'');
document.form.pass.focus();
document.form.rpass.focus();
return false;
}

if (document.form.email.value == "") {
alert("请输入您的Email!");
document.form.email.focus();
return false;
}

if ((!EmailReg.test(document.form.email.value))&&(document.form.email.value!='''')) {
alert (''Email的格式不正确!'');
document.form.email.focus();
return false;
}

return true;
}
</script>

<script language="JavaScript">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->
</script>
</head>
<body bgcolor="#FFFFFF" text="#000000" background="crystal.jpg">
<p align="center"> </p>
<p align="center"><b><font size="6" color="#333333">宁波科宇网——个人网页申请</font></b></p>
<p align="center"></p>
<table width="65%" border="0" align="center">
<tr>
<td>
<form name="form" method="post" action="page.asp">
<p><b>用户名称:</b>
<input type="text" name="name" size="10" class="form">
*

注意:用户名只能由英文字母(a-z、A-Z),数字(0-9)构成,不能有空格。

<b>密  码:</b>
<input type="password" name="pass" size="10" class="form">
*</p>
<p><b>确认密码:</b>
<input type="password" name="rpass" size="10" class="form">
*(确认上面的密码)</p>
<p><b>您的MAIL:</b>
<input type="text" name="email" size="20" class="form">*(请正确填写)
</p>
<p>
<input type="submit" name="Submit" value="提交" onClick ="java script:return checkSubmit()">
<input type="reset" name="Submit2" value="重写">


其中*号项目为必填项目!</p>
</form>
</td>
</tr>
</table>
<p align="center"><font color="#FF0000">注意:本空间可以安装BBS论坛,严格禁止江湖、聊天室等严重占用资源的程序运行。

一经发现,删除全部程序及FTP帐号,并不于通知!</font></p>
<p align="center"> </p>
<p align="center">-==<a href="mailto:[email protected]">宁波科宇网</a>==-

CopyRight By KeYu Computer WorkRoom 2001-2002</p>
</body>
</html>

2、后台控制