此JavaScript支持多个用户，多个密码，和多个目标网页。它的提出是一个非常容易使用的界面，使得添加和删除用户轻而易举
<SCRIPT LANGUAGE="JavaScript"><!– Beginvar params=new Array(4);var script=document.js.scrpt.value;document.js.scrpt.value="Create your users, their passwords, and their destination pages using the form above.nnThen, click ‘Show Coding’ to see the login HTML and JavaScript that you need to put on your page to password-protect your site with that info.nnQuestions about this script or how to put it on your site should be directed to it’s author via email: , we don’t even totally understand this JavaScript!*";var alpha="ABCDEFGHIJKLMNOPQRSTUVWXYZABCDEFGHI";showmem(document.members);function showmem(form) {document.members.num.value=document.members.memlist.length;var which=form.memlist.selectedIndex;splt(form.memlist[which].value);form.entry.value=which+1;for (i=2;i<5;i++) {form.elements[i].value=params[i-2]; };}function splt(choice) {p=0;for (i=0;i<3;i++) {a=choice.indexOf("|",p);params[i]=choice.substring(a,p);p=a+1; }}function addnew(form) {newmem=getfields(form);var who=prompt("New User’s Name:","");form.memlist[form.memlist.length] = new Option(who, newmem, false, true);if (navigator.appName=="Netscape") {document.js.scrpt.value=script;history.go(0);}else {showmem(document.members); }}function getfields(form) {newmem="";for (i=2;i<5;i++) {newmem+=form.elements[i].value+"|"; };for (i=3;i<5;i++) {a=form.elements[i];for (k=0;k<8;k++) { }}return(newmem);}function delthis(form) {if (confirm("Delete "+form.memname.value+"?")) {form.memlist.options[form.entry.value-1]=null;form.message.value=form.memname.value+" Deleted";form.memlist.selectedIndex=0;if (navigator.appName=="Netscape") {document.js.scrpt.value=script;history.go(0);}else {showmem(document.members); } }}function update(form) {msg="no";a=form.elements[i];for (k=0;k<8;k++) {b=a.value.substring(k,k+1);c=b.toUpperCase();form.memlist[form.entry.value-1].value=getfields(form);form.message.value=form.memname.value+"’s record was updated"; }}function create(form) {
var html="<center><form name=login>n";html+="<table border=1 cellpadding=3>nn";html+="<!– Original: Dion –>n";html+="<!– Web Site: –>n";html+="<!– This script and many more are available free online at –>n";html+="<!– The JavaScript Source!! .internet.com”>http://javascript.internet.com –>nn";html+='<tr><td colspan=2 align=center><font size="+2">’;html+='<b>Members-Only Area!</b></font></td></tr>n’;html+="<tr><td>Username:</td><td><select name=memlist>n<option value=’x’>";for (j=0;j<form.memlist.length;j++) {splt(form.memlist.options[j].value);h1=makehash(params[1],3);h2=makehash(params[1],10)+" ";var page="";for (var i=0;i<8;i++) {letter=params[2].substring(i,i+1);ul=letter.toUpperCase();a=alpha.indexOf(ul,0);a+=(h2.substring(i,i+1)*1);page+=alpha.substring(a,a+1);}html+="n<option value=’"+params[0]+"|"+h1+"|"+page+"’>"+params[0];};html+="n</select></td></tr>n";html+="<tr><td>Password:</td><td><input type=password size=10 maxlength=8 name=pass></td></tr>n";html+='<tr><td colspan=2 align=center><input type=button value="Login" onclick="check(this.form)"></td>n’;html+="</tr>n</table>n</form>n";document.js.scrpt.value=html+script+"</center>";}function makehash(pw,mult) {pass=pw.toUpperCase();hash=0;for (i=0;i<8;i++) {letter=pass.substring(i,i+1);c=alpha.indexOf(letter,0)+1;hash=hash*mult+c;}return(hash);}// End –></script>
<table border=1 width="400"><tr><form name=members><td rowspan=4><select name=memlist size=10 onChange="showmem(this.form)"><option selected value="John Smith|password|mainpage|">John Smith<option value="Peter Jones|theirpwd|endpages|">Peter Jones<option value="Sue Brown|asdfvcxz|nowheres|">Sue Brown<option value="Sally West|zaqxswde|logintop|">Sally West</select></td><td align=right>User:</td><td><input type=hidden value="0" name=entry><input type=text name=memname size=8 value=""></td></tr><tr><td align=right>Password:</td><td><input type=text name=password size=8 maxlength=8><font size="-1"><– Must be exactly 8 characters</font></td></tr><tr><td align=right>Page Name:</td><td><input type=text name=pagename size=8 maxlength=8><b>.html</b><font size="-1"><– Must be exactly 8 characters</font></td></tr><tr><td colspan=2 align=center><input type=button value="New User" onclick="addnew(this.form);"><input type=button value="Delete User" onclick="delthis(this.form);"><input type=button value="Update/Show Coding" onclick="update(this.form); create(this.form);"></td></tr>
<tr><td colspan=3 align=center><input type=text size=60 name=message value="Note: Password/Page Name must be exactly 8 letters! (a-z)"><input type=hidden name=num value=1></td></form></tr></table>
发现一种久违的感动。
