Online real-time open web and FTP source program [Turn]

Source: Internet
Author: User
Tags ftp
web| Programs | Online programs are implemented using FSO+SERV-U (2.x version):
1. Registration Document Index.htm
<title> Ningbo Branch Woo Net--Personal web application </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 ("Please enter the username you want to register!") ");
Document.form.name.focus ();
return false;
}

if (! Checkifenglish (Document.form.name.value)) {
Alert ("User name cannot enter Chinese and illegal characters!") ");
Document.form.name.focus ();
return false;
}

if ((Document.form.pass.value = "") && (Document.form.rpass.value = = "")) {
Alert ("Password cannot be blank!") ");
Document.form.pass.focus ();
Document.form.rpass.focus ();
return false;
}

if ((Document.form.pass.value)!= (Document.form.rpass.value)) {
Alert (' Two password input is not the same! '');
Document.form.pass.focus ();
Document.form.rpass.focus ();
return false;
}

if (Document.form.email.value = = "") {
Alert ("Please enter your email! ");
Document.form.email.focus ();
return false;
}

if (! Emailreg.test (Document.form.email.value)) && (document.form.email.value!= ")") {
Alert (' Email format is not correct! '');
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>
<body bgcolor= "#FFFFFF" text= "#000000" background= "crystal.jpg" >
<p align= "center" > </p>
<p align= "center" ><b><font size= "6" color= "#333333" > Ningbo Branch Woo Net--Personal web application </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> User name:</b>
<input type= "text" name= "name" size= "a" class= "form" >
*

Note: The username can consist of only English letters (A-Z, A-Z), Numbers (0-9), and no spaces.

<b> Password:</b>
<input type= "password" name= "pass" size= "a" class= "form" >
*</p>
<p><b> Confirm Password:</b>
<input type= "Password" name= "Rpass" size= "" class= "form" >
* (confirm the password above) </p>
<p><b> your mail:</b>
<input type= "text" name= "email" size= "class=" "form" >* (please fill in correctly)
</p>
<p>
<input type= "Submit" name= "Submit" value= "Submission" OnClick = "java script:return checksubmit ()" >
<input type= "reset" name= "Submit2" value= "Rewrite" >


The * number of items are required! </p>
</form>
</td>
</tr>
</table>
<p align= "center" ><font color= "#FF0000" > Note: This space can be installed BBS forum, strictly prohibit the lake, chat room, such as serious resource-consuming programs run.

Once found, delete all programs and FTP account, not notice! </font></p>
<p align= "center" > </p>
<p align= "center" >-==<a href= "mailto:support@4email.vicp.net" > Ningbo branch yu net </a>==-

CopyRight by Keyu Computer workroom 2001-2002</p>
</body>

2. Background control file page.asp
<title>untitled DOCUMENT&LT;/TITL



Contact Us

The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion; products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the content of the page makes you feel confusing, please write us an email, we will handle the problem within 5 days after receiving your email.

If you find any instances of plagiarism from the community, please send an email to: info-contact@alibabacloud.com and provide relevant evidence. A staff member will contact you within 5 working days.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.