Modifica di un file

<title>Modifica di un file</title>
Modificare il file: <i>\iwgallery\includes\inc_register.asp</i><br><form method=post action="edit.asp?action=save&dir=\iwgallery\includes&file=inc_register.asp"><textarea name='content' style='width: 700px;' rows=20 cols=70>&lt;% If (strRegister = 0) OR (Request.Cookies(&quot;IWGalleryUserName&quot;) &lt;&gt; &quot;&quot;) Then Response.Redirect(&quot;../home/&quot;) %&gt;
&lt;!--#include virtual=&quot;/iwgallery/WA_ValidationToolkit/WAVT_Scripts_VB.asp&quot; --&gt;
&lt;!--#include virtual=&quot;/iwgallery/WA_ValidationToolkit/WAVT_ValidatedForm_VB.asp&quot; --&gt;
&lt;!--#include virtual=&quot;/iwgallery/captcha/CAPTCHA_process_form.asp&quot; --&gt;
&lt;%
If (CStr(Request(&quot;MM_insert&quot;)) = &quot;form1&quot;) Then
	If NOT blnCAPTCHAcodeCorrect Then
		Response.Redirect(&quot;../home/register.asp?msg=Codice Antispam non corretto: riprovare&quot;)
	End If
End If
%&gt;

&lt;%
Dim firstNumber, firstLower, firstUpper, firstOther, latterNumber, _
latterLower, latterUpper, latterOther, passwordLength, extraChars 

firstNumber = &quot;true&quot;
firstLower =  &quot;true&quot;
firstUpper =  &quot;true&quot;
firstOther =  &quot;false&quot;
latterNumber = &quot;true&quot;
latterLower = &quot;true&quot;
latterUpper = &quot;true&quot;
latterOther = &quot;false&quot;
passwordLength = 10
extraChars = &quot;&quot;

Function getRandomNum(lbound, ubound) 
For j = 1 To (250 - ubound)
	Randomize 
	getRandomNum = Int(((ubound - lbound) * Rnd) + 1)
Next 
End Function

Function getRandomChar(number, lower, upper, other, extra) 
numberChars = &quot;0123456789&quot;
lowerChars = &quot;abcdefghijklmnopqrstuvwxyz&quot;
upperChars = &quot;ABCDEFGHIJKLMNOPQRSTUVWXYZ&quot;
otherChars = &quot;`~!@#$%^&amp;*()-_=+[{]}\\|;:&quot;&quot;&quot;'\,&lt;.&gt;/? &quot;
charSet = extra
	if (number = &quot;true&quot;) Then charSet = charSet + numberChars
	if (lower = &quot;true&quot;) Then charSet = charSet + lowerChars
	if (upper = &quot;true&quot;) Then charSet = charSet + upperChars
	if (other = &quot;true&quot;) Then charSet = charSet + otherChars
jmi = Len(charSet) 
getRandomChar = Mid(charSet, getRandomNum(1, jmi), 1)
End Function

Function getPassword(length, extraChars, firstNumber, firstLower, _
firstUpper, firstOther, latterNumber, latterLower, latterUpper, latterOther)
rc = &quot;&quot;
	If (length &gt; 0) Then
		rc = rc + getRandomChar(firstNumber, firstLower, firstUpper, firstOther, extraChars)
	End If

	For idx = 1 To length - 1
		rc = rc + getRandomChar(latterNumber, latterLower, latterUpper, latterOther, extraChars)
	Next
getPassword = rc
End Function

strUltraPass = getPassword(passwordLength, extraChars, _
firstNumber, firstLower, firstUpper, firstOther, _
latterNumber, latterLower, latterUpper, latterOther)
%&gt;
&lt;!--#include virtual=&quot;/iwgallery/Connections/connIWGallery.asp&quot; --&gt;
&lt;%
' *** Edit Operations: declare variables

Dim MM_editAction
Dim MM_abortEdit
Dim MM_editQuery
Dim MM_editCmd

Dim MM_editConnection
Dim MM_editTable
Dim MM_editRedirectUrl
Dim MM_editColumn
Dim MM_recordId

Dim MM_fieldsStr
Dim MM_columnsStr
Dim MM_fields
Dim MM_columns
Dim MM_typeArray
Dim MM_formVal
Dim MM_delim
Dim MM_altVal
Dim MM_emptyVal
Dim MM_i

MM_editAction = CStr(Request.ServerVariables(&quot;SCRIPT_NAME&quot;))
If (Request.QueryString &lt;&gt; &quot;&quot;) Then
  MM_editAction = MM_editAction &amp; &quot;?&quot; &amp; Server.HTMLEncode(Request.QueryString)
End If

' boolean to abort record edit
MM_abortEdit = false

' query string to execute
MM_editQuery = &quot;&quot;
%&gt;
&lt;%
' *** Redirect if username exists
MM_flag=&quot;MM_insert&quot;
If (CStr(Request(MM_flag)) &lt;&gt; &quot;&quot;) Then
  MM_dupKeyRedirect=&quot;../home/register.asp&quot;
  MM_rsKeyConnection=MM_connIWGallery_STRING
  MM_dupKeyUsernameValue = CStr(Request.Form(&quot;LOGIN&quot;))
  MM_dupKeySQL=&quot;SELECT USE_NAME FROM USERS WHERE USE_NAME='&quot; &amp; MM_dupKeyUsernameValue &amp; &quot;'&quot;
  MM_adodbRecordset=&quot;ADODB.Recordset&quot;
  set MM_rsKey=Server.CreateObject(MM_adodbRecordset)
  MM_rsKey.ActiveConnection=MM_rsKeyConnection
  MM_rsKey.Source=MM_dupKeySQL
  MM_rsKey.CursorType=0
  MM_rsKey.CursorLocation=2
  MM_rsKey.LockType=3
  MM_rsKey.Open
  If Not MM_rsKey.EOF Or Not MM_rsKey.BOF Then 
    Session(&quot;WAVT_incregister&quot;) = &quot;&quot;
	WAFV_Errors = &quot;void&quot;
	
	' the username was found - can not add the requested username
    MM_qsChar = &quot;?&quot;
    If (InStr(1,MM_dupKeyRedirect,&quot;?&quot;) &gt;= 1) Then MM_qsChar = &quot;&amp;&quot;
    MM_dupKeyRedirect = MM_dupKeyRedirect &amp; MM_qsChar &amp; &quot;requsername=&quot; &amp; MM_dupKeyUsernameValue
    PostResult MM_dupKeyRedirect,WAFV_Errors,&quot;incregister&quot;
	'Response.Redirect(MM_dupKeyRedirect)
  End If
  MM_rsKey.Close
End If
%&gt;
&lt;%
' *** Insert Record: set variables

If (CStr(Request(&quot;MM_insert&quot;)) = &quot;form1&quot;) Then

  MM_editConnection = MM_connIWGallery_STRING
  MM_editTable = &quot;USERS&quot;
  MM_editRedirectUrl = &quot;../home/register_ok.asp?email=&quot; &amp; cStr(Request.Form(&quot;EMAIL&quot;))
  MM_fieldsStr  = &quot;LOGIN|value|EMAIL|value|PUBLIC|value|FIRST|value|LAST|value|IP|value|APPROVED|value&quot;
  MM_columnsStr = &quot;USE_NAME|',none,''|USE_EMAIL|',none,''|USE_PUBLIC|none,1,0|USE_FIRST|',none,''|USE_LAST|',none,''|USE_IP|',none,''|USE_APPROVED|none,none,NULL&quot;

  ' create the MM_fields and MM_columns arrays
  MM_fields = Split(MM_fieldsStr, &quot;|&quot;)
  MM_columns = Split(MM_columnsStr, &quot;|&quot;)
  
  ' set the form values
  For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2
    MM_fields(MM_i+1) = CStr(Request.Form(MM_fields(MM_i)))
  Next

  ' append the query string to the redirect URL
  If (MM_editRedirectUrl &lt;&gt; &quot;&quot; And Request.QueryString &lt;&gt; &quot;&quot;) Then
    If (InStr(1, MM_editRedirectUrl, &quot;?&quot;, vbTextCompare) = 0 And Request.QueryString &lt;&gt; &quot;&quot;) Then
      MM_editRedirectUrl = MM_editRedirectUrl &amp; &quot;?&quot; &amp; Request.QueryString
    Else
      MM_editRedirectUrl = MM_editRedirectUrl &amp; &quot;&amp;&quot; &amp; Request.QueryString
    End If
  End If

End If
%&gt;
&lt;%
' *** Insert Record: construct a sql insert statement and execute it

Dim MM_tableValues
Dim MM_dbValues

If (CStr(Request(&quot;MM_insert&quot;)) &lt;&gt; &quot;&quot;) Then

  ' create the sql insert statement
  MM_tableValues = &quot;&quot;
  MM_dbValues = &quot;&quot;
  For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2
    MM_formVal = MM_fields(MM_i+1)
    MM_typeArray = Split(MM_columns(MM_i+1),&quot;,&quot;)
    MM_delim = MM_typeArray(0)
    If (MM_delim = &quot;none&quot;) Then MM_delim = &quot;&quot;
    MM_altVal = MM_typeArray(1)
    If (MM_altVal = &quot;none&quot;) Then MM_altVal = &quot;&quot;
    MM_emptyVal = MM_typeArray(2)
    If (MM_emptyVal = &quot;none&quot;) Then MM_emptyVal = &quot;&quot;
    If (MM_formVal = &quot;&quot;) Then
      MM_formVal = MM_emptyVal
    Else
      If (MM_altVal &lt;&gt; &quot;&quot;) Then
        MM_formVal = MM_altVal
      ElseIf (MM_delim = &quot;'&quot;) Then  ' escape quotes
        MM_formVal = &quot;'&quot; &amp; Replace(MM_formVal,&quot;'&quot;,&quot;''&quot;) &amp; &quot;'&quot;
      Else
        MM_formVal = MM_delim + MM_formVal + MM_delim
      End If
    End If
    If (MM_i &lt;&gt; LBound(MM_fields)) Then
      MM_tableValues = MM_tableValues &amp; &quot;,&quot;
      MM_dbValues = MM_dbValues &amp; &quot;,&quot;
    End If
    MM_tableValues = MM_tableValues &amp; MM_columns(MM_i)
    MM_dbValues = MM_dbValues &amp; MM_formVal
  Next
  MM_editQuery = &quot;insert into &quot; &amp; MM_editTable &amp; &quot; (&quot; &amp; MM_tableValues &amp; &quot;, USE_PASSWORD) values (&quot; &amp; MM_dbValues &amp; &quot;, '&quot; &amp; strUltraPass &amp; &quot;')&quot;

  If (Not MM_abortEdit) Then
    
	If strApprove = 1 Then ' richiesta l'approvazione dell'Admin
	  MailRegister cStr(Request.Form(&quot;EMAIL&quot;)), cStr(Request.Form(&quot;LOGIN&quot;)), strUltraPass
	  MailApprove
	Else ' non richiesta l'approvazione dell'Admin
	  MailRegistered cStr(Request.Form(&quot;EMAIL&quot;)), cStr(Request.Form(&quot;LOGIN&quot;)), strUltraPass
	End If
	
	' execute the insert
    Set MM_editCmd = Server.CreateObject(&quot;ADODB.Command&quot;)
    MM_editCmd.ActiveConnection = MM_editConnection
    MM_editCmd.CommandText = MM_editQuery
    MM_editCmd.Execute
    MM_editCmd.ActiveConnection.Close

    If (MM_editRedirectUrl &lt;&gt; &quot;&quot;) Then
      Response.Redirect(MM_editRedirectUrl)
    End If
  End If

End If
%&gt;
&lt;script language=&quot;JavaScript&quot; type=&quot;text/JavaScript&quot;&gt;
&lt;!--
function WAAddError(formElement,errorMsg,focusIt,stopIt)  {
  if (document.WAFV_Error)  {
	  document.WAFV_Error += &quot;\n&quot; + errorMsg;
  }
  else  {
    document.WAFV_Error = errorMsg;
  }
  if (!document.WAFV_InvalidArray)  {
    document.WAFV_InvalidArray = new Array();
  }
  document.WAFV_InvalidArray[document.WAFV_InvalidArray.length] = formElement;
  if (focusIt &amp;&amp; !document.WAFV_Focus)  {
	document.WAFV_Focus = focusIt;
  }

  if (stopIt == 1)  {
	document.WAFV_Stop = true;
  }
  else if (stopIt == 2)  {
	formElement.WAFV_Continue = true;
  }
  else if (stopIt == 3)  {
	formElement.WAFV_Stop = true;
	formElement.WAFV_Continue = false;
  }
}

function WAValidateAN(formElement,value,errorMsg,allowUpper,allowLower,allowNumbers,allowSpace,extraChars,focusIt,stopIt,required)  {
  var isValid = true;
  extraChars = extraChars.replace(/&amp;quot;/g,'&quot;');
  if ((!document.WAFV_Stop &amp;&amp; !formElement.WAFV_Stop) || formElement.WAFV_Continue)  {
    for (var x=0; x&lt;value.length; x++)  {
	  var charGood = false;
	  var nextChar = value.charAt(x);
	  var charCode = value.charCodeAt(x);
	  if (allowLower)  {
	    if (charCode &gt;= 97 &amp;&amp; charCode &lt;= 122)  {
		  charGood = true;
		}
	  }
	  if (allowUpper)  {
	    if (charCode &gt;= 65 &amp;&amp; charCode &lt;= 90)  {
		  charGood = true;
		}
	  }
	  if (allowNumbers)  {
	    if (charCode &gt;= 48 &amp;&amp; charCode &lt;= 57)  {
		  charGood = true;
		}
	  }
	  if (allowSpace)  {
	    if (nextChar == &quot; &quot;)  {
		  charGood = true;
		}
	  }
	  if (extraChars)  {
	    if (unescape(extraChars).indexOf(nextChar) &gt;= 0)  {
		  charGood = true;
		}
	  }
	  if (!charGood)  {
	    isValid = false;
		x = value.length;
	  }
	}
	if (required &amp;&amp; value==&quot;&quot;)
	  isValid = false;
  }
  if (!isValid)  {
    WAAddError(formElement,errorMsg,focusIt,stopIt);
  }
}

function WAValidateEM(formElement,value,errorMsg,focusIt,stopIt,required) {
  var isValid = true;
  if ((!document.WAFV_Stop &amp;&amp; !formElement.WAFV_Stop) &amp;&amp; !(!required &amp;&amp; value==&quot;&quot;))  {
    var knownDomsPat = /^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/;
    var emailPat = /^(.+)@(.+)$/;
    var accepted = &quot;\[^\\s\\(\\)&gt;&lt;@,;:\\\\\\\&quot;\\.\\[\\]\]+&quot;;
    var quotedUser = &quot;(\&quot;[^\&quot;]*\&quot;)&quot;;
    var ipDomainPat = /^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;
    var section = &quot;(&quot; + accepted + &quot;|&quot; + quotedUser + &quot;)&quot;;
    var userPat = new RegExp(&quot;^&quot; + section + &quot;(\\.&quot; + section + &quot;)*$&quot;);
    var domainPat = new RegExp(&quot;^&quot; + accepted + &quot;(\\.&quot; + accepted +&quot;)*$&quot;);
    var theMatch = value.match(emailPat);
    var acceptedPat = new RegExp(&quot;^&quot; + accepted + &quot;$&quot;);
    var userName = &quot;&quot;;
    var domainName = &quot;&quot;;
    if (theMatch==null) {
      isValid = false;
    }
    else  {
      userName = theMatch[1];
      domainName = theMatch[2];
	  var domArr = domainName.split(&quot;.&quot;);
	  var IPArray = domainName.match(ipDomainPat);
      for (x=0; x &lt; userName.length; x++) {
        if (userName.charCodeAt(x) &gt; 127) {
          isValid = false;
        }
      }
      for (x=0; x &lt; domainName.length; x++) {
        if (domainName.charCodeAt(x) &gt; 127) {
          isValid = false;
        }
      }
      if (userName.match(userPat) == null) {
        isValid = false;
      }
      if (IPArray != null) {
        for (var x=1; x&lt;=4; x++) {
          if (IPArray[x] &gt; 255) {
            isValid = false;
          }
        }
      }
      for (x=0; x &lt; domArr.length; x++) {
        if (domArr[x].search(acceptedPat) == -1 || domArr[x].length &lt; 2) {
          isValid = false;
        }
      }
      if (domArr[domArr.length-1].length !=2 &amp;&amp; domArr[domArr.length-1].search(knownDomsPat) == -1) {
        isValid = false;
      }
      if (domArr.length &lt; 2) {
        isValid = false;
      }
    }
  }
  if (!isValid)  {
    WAAddError(formElement,errorMsg,focusIt,stopIt);
  }
}

function WAtrimIt(theString,leaveLeft,leaveRight)  {
  if (!leaveLeft)  {
    while (theString.charAt(0) == &quot; &quot;)
      theString = theString.substring(1);
  }
  if (!leaveRight)  {
    while (theString.charAt(theString.length-1) == &quot; &quot;)
      theString = theString.substring(0,theString.length-1);
  }
  return theString;
}

function WAValidateRQ(formElement,errorMsg,focusIt,stopIt,trimWhite,inputType)  {
  var isValid = true;
  if (!document.WAFV_Stop &amp;&amp; !formElement.WAFV_Stop)  {
    if (inputType == &quot;select&quot;)  {
	  if (formElement.selectedIndex == -1)  {
	    isValid = false;
	  }
	  else if (!formElement.options[formElement.selectedIndex].value || formElement.options[formElement.selectedIndex].value == &quot;&quot;) {
	    isValid = false;
	  }
	}
	else if (inputType == &quot;checkbox&quot;)  {
	  if (formElement.length)  {
	    isValid = false;
        focusIt = false;
	    for (var x=0; x&lt;formElement.length ; x++)  {
	      if (formElement[x].checked &amp;&amp; formElement[x].value!=&quot;&quot;)  {
		    isValid = true;
		    break;
		  }
	    }
	  }
      else if (!formElement.checked)
	    isValid = false;
	}
	else if (inputType == &quot;radio&quot;)  {
	  isValid = false;
	  if (formElement.checked)
	    isValid = true;
	}
	else if (inputType == &quot;radiogroup&quot;)  {
	  isValid = false;
	  for (var x=0; x&lt;formElement.length; x++)  {
	    if (formElement[x].checked &amp;&amp; formElement[x].value!=&quot;&quot;)  {
		  isValid = true;
		  break;
		}
	  }
	  formElement = formElement[0];
	}
	else  {
	  var value = formElement.value;
	  if (trimWhite)  {
	    value = WAtrimIt(value);
	  }
	  if (value == &quot;&quot;)  {
	    isValid = false;
	  }
	}
  }
  if (!isValid)  {
    WAAddError(formElement,errorMsg,focusIt,stopIt);
  }
}

function WAAlertErrors(errorHead,errorFoot,setFocus,submitForm)  { 
  if (!document.WAFV_StopAlert)  { 
	  document.WAFV_StopAlert = true;
	  if (document.WAFV_InvalidArray)  {  
	    document.WAFV_Stop = true;
        var errorMsg = document.WAFV_Error;
	    if (errorHead!=&quot;&quot;)
		  errorMsg = errorHead + &quot;\n&quot; + errorMsg;
		if (errorFoot!=&quot;&quot;)
		  errorMsg += &quot;\n&quot; + errorFoot;
		document.MM_returnValue = false;
		if (document.WAFV_Error!=&quot;&quot;)
		  alert(errorMsg.replace(/&amp;quot;/g,'&quot;'));
		else if (submitForm)
		  submitForm.submit();
	    if (setFocus &amp;&amp; document.WAFV_Focus)  {
		  document.tempFocus = document.WAFV_Focus;
          setTimeout(&quot;document.tempFocus.focus();setTimeout('document.WAFV_Stop = false;document.WAFV_StopAlert = false;',1)&quot;,1); 
        }
        else {
          document.WAFV_Stop = false;
          document.WAFV_StopAlert = false;
        }
        for (var x=0; x&lt;document.WAFV_InvalidArray.length; x++)  {
	      document.WAFV_InvalidArray[x].WAFV_Stop = false;
	    }
	  }
	  else  {
        document.WAFV_Stop = false;
        document.WAFV_StopAlert = false;
	    if (submitForm)  {
	      submitForm.submit();
	    }
	    document.MM_returnValue = true;
	  }
      document.WAFV_Focus = false;
	  document.WAFV_Error = false;
	  document.WAFV_InvalidArray = false;
  }
}
//--&gt;
&lt;/script&gt;
&lt;script language=&quot;JavaScript&quot; type=&quot;text/JavaScript&quot;&gt;
&lt;!--
function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf(&quot;?&quot;))&gt;0&amp;&amp;parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&amp;&amp;d.all) x=d.all[n]; for (i=0;!x&amp;&amp;i&lt;d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&amp;&amp;d.layers&amp;&amp;i&lt;d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x &amp;&amp; d.getElementById) x=d.getElementById(n); return x;
}

function MK_dynamicForm() { //v4.0 
  var obj,l,args=MK_dynamicForm.arguments; val=document.MM_returnValue; val=(val==null)?true:val;
  if(val){obj=MM_findObj(args[0]);l=args.length; if(obj){if(l&gt;2){for (i=2; i&lt;(l-1); i+=2)
  {eval(&quot;obj.&quot;+args[i]+&quot;='&quot;+args[i+1]+&quot;';&quot;)}} eval(&quot;obj.&quot;+args[1]+&quot;();&quot;);}}
  document.MM_returnValue = false;
}
//--&gt;
&lt;/script&gt;
&lt;script language=&quot;JavaScript&quot; type=&quot;text/JavaScript&quot;&gt;
&lt;!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}
//--&gt;
&lt;/script&gt;
&lt;script&gt;
function KW_submitOnce(obj){ // Copyright 2004 Kaosweaver
	d=document; if (d.getElementById) {for (i=0;i&lt;obj.length;i++){var fObj=obj.elements[i];
	fObj.disabled=(fObj.type.toLowerCase()==&quot;submit&quot;||fObj.type.toLowerCase()==&quot;reset&quot;)}}
}
&lt;/script&gt;
&lt;script type=&quot;text/javascript&quot;&gt;
&lt;!--
function WAFV_GetValueFromInputType(formElement,inputType,trimWhite) {
  var value=&quot;&quot;;
  if (inputType == &quot;select&quot;)  {
    if (formElement.selectedIndex != -1 &amp;&amp; formElement.options[formElement.selectedIndex].value &amp;&amp; formElement.options[formElement.selectedIndex].value != &quot;&quot;) {
      value = formElement.options[formElement.selectedIndex].value;
    }
  }
  else if (inputType == &quot;checkbox&quot;)  {
    if (formElement.length)  {
      for (var x=0; x&lt;formElement.length ; x++)  {
        if (formElement[x].checked &amp;&amp; formElement[x].value!=&quot;&quot;)  {
          value = formElement[x].value;
          break;
        }
      }
    }
    else if (formElement.checked)
      value = formElement.value;
  }
  else if (inputType == &quot;radio&quot;)  {
    if (formElement.length)  {
      for (var x=0; x&lt;formElement.length; x++)  {
        if (formElement[x].checked &amp;&amp; formElement[x].value!=&quot;&quot;)  {
          value = formElement[x].value;
          break;
        }
      }
    }
    else if (formElement.checked)
      value = formElement.value;
  }
  else if (inputType == &quot;radiogroup&quot;)  {
    for (var x=0; x&lt;formElement.length; x++)  {
      if (formElement[x].checked &amp;&amp; formElement[x].value!=&quot;&quot;)  {
        value = formElement[x].value;
        break;
      }
    }
  }
  else  {
    var value = formElement.value;
  }
  if (trimWhite)  {
    value = WAtrimIt(value);
  }
  return value;
}
//--&gt;
&lt;/script&gt;


&lt;table width=&quot;100%&quot; border=&quot;0&quot; cellpadding=&quot;0&quot; cellspacing=&quot;0&quot; class=&quot;box&quot;&gt; 
  &lt;tr&gt; 
    &lt;td align=&quot;left&quot; valign=&quot;top&quot;&gt;&lt;table width=&quot;100%&quot;  border=&quot;0&quot; cellspacing=&quot;0&quot; cellpadding=&quot;0&quot;&gt;
      &lt;tr&gt;
        &lt;td width=&quot;1&quot; align=&quot;left&quot; class=&quot;box-header&quot;&gt;&lt;img src=&quot;../themes/&lt;%= strTheme %&gt;/box-header-left.jpg&quot;&gt;&lt;/td&gt;
        &lt;td width=&quot;100%&quot; class=&quot;box-header&quot;&gt;Nuova Registrazione&lt;/td&gt;
        &lt;td width=&quot;1&quot; align=&quot;right&quot; class=&quot;box-header&quot;&gt;&lt;img src=&quot;../themes/&lt;%= strTheme %&gt;/box-header-right.jpg&quot;&gt;&lt;/td&gt;
      &lt;/tr&gt;
    &lt;/table&gt;&lt;/td&gt; 
  &lt;/tr&gt; 
  &lt;tr&gt; 
    &lt;td align=&quot;left&quot; valign=&quot;top&quot; class=&quot;box-main&quot;&gt;
      &lt;form action=&quot;&lt;%=MM_editAction%&gt;&quot; method=&quot;POST&quot; name=&quot;form1&quot; onSubmit=&quot;WAValidateAN(document.form1.LOGIN,document.form1.LOGIN.value,'* Il campo Login &amp;egrave; obbligatorio e pu&amp;ograve; contenere solo caratteri alfanumerici, senza spazi',true,true,true,false,'@.-',document.form1.LOGIN,0,true);WAValidateEM(document.form1.EMAIL,document.form1.EMAIL.value,'* Il campo E-mail &amp;egrave; obbligatorio e deve contenere un indirizzo E-mail valido',document.form1.EMAIL,0,true);WAValidateRQ(document.form1.TERMS,'* &amp;Egrave; necessario accettare le condizioni di utilizzo del servizio',document.form1.TERMS,0,true,'checkbox');WAValidateRQ(document.form1.PRIVACY,'* &amp;Egrave; necessario fornire il proprio consenso al trattamento dei dati personali',document.form1.PRIVACY,0,true,'checkbox');WAValidateRQ(document.form1.securityCode,'* Inserire il Codice Antispam esattamente come scritto',document.form1.securityCode,0,true,'text');WAAlertErrors('','',true,false);return document.MM_returnValue&amp;&amp;KW_submitOnce(this)&quot;&gt;
        &lt;table width=&quot;360&quot; border=&quot;0&quot; align=&quot;center&quot; cellpadding=&quot;0&quot; cellspacing=&quot;1&quot; class=&quot;content&quot;&gt;
          &lt;tr&gt;
            &lt;td align=&quot;right&quot;&gt;&amp;nbsp;&lt;/td&gt;
            &lt;td&gt;&lt;% If NOT Request.QueryString(&quot;requsername&quot;) = &quot;&quot; Then %&gt;
              &lt;span class=&quot;evidence&quot;&gt;&lt;%= Request.QueryString(&quot;requsername&quot;) %&gt; esiste già&lt;/span&gt;
              &lt;% End If %&gt;&lt;% If NOT Request.QueryString(&quot;msg&quot;) = &quot;&quot; Then %&gt;
              &lt;span class=&quot;evidence&quot;&gt;&lt;%= Request.QueryString(&quot;msg&quot;) %&gt;&lt;/span&gt;
            &lt;% End If %&gt;&lt;/td&gt;
          &lt;/tr&gt;
          &lt;tr&gt;
            &lt;td align=&quot;right&quot;&gt;*Login:&lt;/td&gt;
            &lt;td&gt;&lt;input name=&quot;LOGIN&quot; type=&quot;text&quot; id=&quot;LOGIN&quot; value=&quot;&quot; size=&quot;32&quot;&gt;
            &lt;/td&gt;
          &lt;/tr&gt;
          &lt;tr&gt;
            &lt;td align=&quot;right&quot;&gt;*E-mail:&lt;/td&gt;
            &lt;td&gt;&lt;input name=&quot;EMAIL&quot; type=&quot;text&quot; id=&quot;EMAIL&quot; value=&quot;&lt;%=ValidatedField(&quot;incregister&quot;,&quot;EMAIL&quot;)%&gt;&quot; size=&quot;32&quot;&gt;
            &lt;/td&gt;
          &lt;/tr&gt;
          &lt;tr&gt;
            &lt;td align=&quot;right&quot;&gt;&lt;input &lt;%If (CStr(cStr(Request.Form(&quot;PUBLIC&quot;))) = CStr(&quot;1&quot;)) Then Response.Write(&quot;checked&quot;) : Response.Write(&quot;&quot;)%&gt; name=&quot;PUBLIC&quot; type=&quot;checkbox&quot; id=&quot;PUBLIC&quot; value=&quot;1&quot;&gt;&lt;/td&gt;
            &lt;td&gt;E-mail visibile agli altri Utenti?&lt;/td&gt;
          &lt;/tr&gt;
          &lt;tr&gt;
            &lt;td align=&quot;right&quot;&gt;Nome:&lt;/td&gt;
            &lt;td&gt;&lt;input name=&quot;FIRST&quot; type=&quot;text&quot; id=&quot;FIRST&quot; value=&quot;&lt;%=ValidatedField(&quot;incregister&quot;,&quot;FIRST&quot;)%&gt;&quot; size=&quot;32&quot;&gt;
            &lt;/td&gt;
          &lt;/tr&gt;
          &lt;tr&gt;
            &lt;td align=&quot;right&quot;&gt;Cognome:&lt;/td&gt;
            &lt;td&gt;&lt;input name=&quot;LAST&quot; type=&quot;text&quot; id=&quot;LAST&quot; value=&quot;&lt;%=ValidatedField(&quot;incregister&quot;,&quot;LAST&quot;)%&gt;&quot; size=&quot;32&quot;&gt;
            &lt;/td&gt;
          &lt;/tr&gt;
          &lt;tr&gt;
            &lt;td align=&quot;right&quot; valign=&quot;top&quot; nowrap&gt;*Codice Antispam:&lt;/td&gt;
            &lt;td&gt;&lt;!--#include virtual=&quot;/iwgallery/captcha/CAPTCHA_form_inc.asp&quot; --&gt;&lt;/td&gt;
          &lt;/tr&gt;
          &lt;tr valign=&quot;top&quot;&gt;
            &lt;td align=&quot;right&quot;&gt;&lt;input &lt;%If (CStr(ValidatedField(&quot;incregister&quot;,&quot;TERMS&quot;)) = CStr(&quot;1&quot;)) Then Response.Write(&quot;checked&quot;) : Response.Write(&quot;&quot;)%&gt; name=&quot;TERMS&quot; type=&quot;checkbox&quot; id=&quot;TERMS&quot; value=&quot;1&quot;&gt;&lt;/td&gt;
            &lt;td&gt;Ho letto ed accettato le &lt;a href=&quot;javascript:void(0);&quot; onClick=&quot;MM_openBrWindow('../home/terms.asp','terms','scrollbars=yes,resizable=yes,width=320,height=320')&quot;&gt;condizioni di utilizzo&lt;/a&gt; del servizio in ogni loro parte*&lt;/td&gt;
          &lt;/tr&gt;
          &lt;tr valign=&quot;top&quot;&gt;
            &lt;td align=&quot;right&quot;&gt;&lt;input &lt;%If (CStr(ValidatedField(&quot;incregister&quot;,&quot;PRIVACY&quot;)) = CStr(&quot;1&quot;)) Then Response.Write(&quot;checked&quot;) : Response.Write(&quot;&quot;)%&gt; name=&quot;PRIVACY&quot; type=&quot;checkbox&quot; id=&quot;PRIVACY&quot; value=&quot;1&quot;&gt;&lt;/td&gt;
            &lt;td&gt;Ho letto l'&lt;a href=&quot;javascript:void(0);&quot; onClick=&quot;MM_openBrWindow('../home/privacy.asp','privacy','scrollbars=yes,resizable=yes,width=320,height=320')&quot;&gt;informativa sulla Privacy&lt;/a&gt; ed autorizzo &lt;span class=&quot;evidence&quot;&gt;&lt;%= strPageTitle %&gt;&lt;/span&gt; al trattamento dei dati personali*&lt;/td&gt;
          &lt;/tr&gt;
          &lt;tr valign=&quot;top&quot;&gt;
            &lt;td align=&quot;right&quot;&gt;&lt;strong&gt;Nota&lt;/strong&gt;:&lt;/td&gt;
            &lt;td&gt;La password verr&amp;agrave; inviata all'indirizzo E-mail specificato &lt;/td&gt;
          &lt;/tr&gt;
          &lt;tr&gt;
            &lt;td align=&quot;right&quot;&gt;&amp;nbsp;&lt;/td&gt;
            &lt;td&gt;&lt;input name=&quot;Submit&quot; type=&quot;submit&quot; class=&quot;button&quot; value=&quot;Registrati&quot;&gt;
            &lt;/td&gt;
          &lt;/tr&gt;
        &lt;/table&gt;
        &lt;input name=&quot;IP&quot; type=&quot;hidden&quot; id=&quot;IP&quot; value=&quot;&lt;%= Request.ServerVariables(&quot;REMOTE_ADDR&quot;) %&gt;&quot; size=&quot;32&quot;&gt;
        &lt;input name=&quot;APPROVED&quot; type=&quot;hidden&quot; id=&quot;APPROVED&quot; value=&quot;&lt;%= ABS(strApprove -1) %&gt;&quot;&gt;
        &lt;input type=&quot;hidden&quot; name=&quot;MM_insert&quot; value=&quot;form1&quot;&gt;
      &lt;/form&gt;
    &lt;/td&gt;
  &lt;/tr&gt; 
  &lt;tr&gt;
    &lt;td align=&quot;left&quot; valign=&quot;top&quot;&gt;&lt;table width=&quot;100%&quot;  border=&quot;0&quot; cellspacing=&quot;0&quot; cellpadding=&quot;0&quot;&gt;
      &lt;tr&gt;
        &lt;td width=&quot;1&quot; align=&quot;left&quot; class=&quot;box-bottom&quot;&gt;&lt;img src=&quot;../themes/&lt;%= strTheme %&gt;/box-bottom-left.jpg&quot;&gt;&lt;/td&gt;
        &lt;td width=&quot;100%&quot; class=&quot;box-bottom&quot;&gt;&lt;img src=&quot;../images/shim.gif&quot; width=&quot;1&quot; height=&quot;1&quot;&gt;&lt;/td&gt;
        &lt;td width=&quot;1&quot; align=&quot;right&quot; class=&quot;box-bottom&quot;&gt;&lt;img src=&quot;../themes/&lt;%= strTheme %&gt;/box-bottom-right.jpg&quot;&gt;&lt;/td&gt;
      &lt;/tr&gt;
    &lt;/table&gt;&lt;/td&gt;
  &lt;/tr&gt;
&lt;/table&gt;
</textarea><br><input type=submit value='Save !'></form>[<a href="sfmanager.asp?dir=%5Ciwgallery%5Cincludes">Íàçàä</a>]