Source code of Windows XP (NT5)
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
|
<%@ LANGUAGE = VBScript %><% Option Explicit %><!-- #include file="directives.inc" -->
<!--#include file="iitool.str"--><!--#include file="iisetfnt.inc"--><!--#include file="iigtdata.str"-->
<% On Error Resume Next %>
<HTML>
<HEAD>
<SCRIPT LANGUAGE="javascript">
function chkDataPaths(){ if (top.title.Global.siteProperties){ top.connect.location.href="iisess.asp?clearPathsOneTime=False"; save(); } else{ top.title.Global.updated=false; if (!top.title.Global.dontAsk){ width = <%= L_IIGTDATA_W %>; height = <%= L_IIGTDATA_H %>; popbox=window.open("iigtdata.asp","GetDataPaths","toolbar=no,scrollbars=yes,directories=no,menubar=no,width="+width+",height="+height); if(popbox !=null){ if (popbox.opener==null){ popbox.opener=self; } } } else{ save(); } } } var uform; function save() { var bDoSave = true; parent.iisstatus.location.href = "iistat.asp?status=" + escape("<%= L_SAVING_TEXT %>"); if (parent.main.head != null){ uform=parent.main.head.document.userform; parent.main.head.listFunc.writeList(); } else{ uform=parent.main.document.userform; if( parent.main.validatePage != null ) { bDoSave = parent.main.ContinueSave(); } } if( bDoSave ) { dosave(); } else { parent.main.SaveCallback(); } } function dosave() { path="?state=saving"; for (i=0; i < uform.elements.length;i++){
thiselement=uform.elements[i]; thisname=uform.elements[i].name; thisval=uform.elements[i].value;
if (thisname !=""){ if (thisname.substring(0,3) !="chk"){ if (thisname.substring(0,3) !="txt"){ if (thisname.substring(0,3) !="btn"){ if (thisname.substring(0,3) !="rdo"){ if (thisname.indexOf("hdn") != ""){ path=path + "&" + escape(thisname); path=path + "=" + escape(thisval); } } } } else{ path=path + "&" + thisname.substring(3, thisname.length); path=path + "=" + escape(thisval); } } else{ path=path + "&" + thisname.substring(3, thisname.length); if (thiselement.checked){ path=path + "="+true; } else{ path=path + "="+false; } } } else{ path=path + "&GreetingMessage=" + escape(thisval); } } //write off non-list values & checks for child inheritence... top.connect.location.href=("iiput.asp"+path); }
function reset() { top.title.Global.updated=false; parent.main.location.href=parent.main.location.href; }
function toolFunc(){ this.save=save; this.dosave = dosave; }
function sleep(cnt){ for (i=0;i<cnt;i++){ } }
toolFuncs=new toolFunc();
</SCRIPT>
</HEAD>
<BODY BACKGROUND="images/greycube.gif" TEXT="#FFFFFF" LINK="#FFFFFF" ALINK="#FFFFFF" VLINK="#FFFFFF">
<TABLE HEIGHT=30 ALIGN="right" CELLPADDING=1 CELLSPACING=1>
<TR>
<TD><TABLE VALIGN="top" BORDER=0 CELLPADDING=5 CELLSPACING=0>
<TR> <TD VALIGN="middle"> <%= sFont(2,Session("MENUFONT"),"",True) %> <B> <A HREF="javascript:chkDataPaths();"><IMG HEIGHT=16 WIDTH=16 HSPACE=2 ALIGN="top" SRC="images/save.gif" BORDER=0 ALT="<%= L_SAVE_TEXT %>"><%= L_SAVE_TEXT %></A> </B> </FONT> </TD> </TR>
</TABLE></TD> <TD><%= sFont(2,Session("MENUFONT"),"",True) %>|</FONT></TD>
<TD><TABLE VALIGN="top" BORDER=0 CELLPADDING=5 CELLSPACING=0>
<TR> <TD VALIGN="middle"> <%= sFont(2,Session("MENUFONT"),"",True) %><B> <A HREF="javascript:reset();"><IMG HEIGHT=16 WIDTH=16 HSPACE=2 ALIGN="top" SRC="images/refr.gif" BORDER=0 ALT="<%= L_RESET_TEXT %>"><%= L_RESET_TEXT %></A> </B></FONT> </TD> </TR>
</TABLE></TD> <TD></TD> </TR>
</TABLE>
</BODY></HTML>
|
