Modifica di un file

<title>Modifica di un file</title>
Modificare il file: <i>\registrazione\login.asp</i><br><form method=post action="edit.asp?action=save&dir=\registrazione&file=login.asp"><textarea name='content' style='width: 700px;' rows=20 cols=70>&lt;!--#include file=&quot;inc_common.asp&quot; --&gt;
&lt;% Server.Execute(&quot;header.asp&quot;) %&gt;
&lt;%
If Request.QueryString(&quot;step&quot;) = &quot;2&quot; THEN
	'Rimuovo l'username e la password da caratteri illegali come per esempio '.
	str_username = Replace(Request.Form(&quot;username&quot;), &quot;'&quot;, &quot;''&quot;)
	str_password = Replace(Request.Form(&quot;password&quot;), &quot;'&quot;, &quot;''&quot;)

	Set rs_login = Server.CreateObject (&quot;ADODB.RecordSet&quot;)
	strSQL = &quot;SELECT * FROM tbl_authors WHERE name='&quot; &amp; str_username &amp; &quot;' AND pass='&quot; &amp; str_password &amp; &quot;'&quot;
	rs_login.open strSQL,adoCon

	'Se la combinazione username e password non esiste, reindirizzo l'utente ad un altra pagina
	If rs_login.EOF _
	Or rs_login.BOF Then
		Response.Redirect(&quot;login_errato.asp&quot;)
	Else
		'Scrivo l'user code nel cookie
		Response.Cookies(&quot;Login&quot;)(&quot;userCode&quot;) = rs_login(&quot;code&quot;)
		'Reindirizzo alla pagina appropriata
		' ###################################################################
		' DA CAMBIARE
		'####################################################################
		If adminEmail = &quot;martinucci@martinucci-regali.com&quot; AND str_password = &quot;carlmart60&quot; Then
			Response.Redirect(&quot;setup.asp?setup=firstTime&quot;)
		Else
			' Response.redirect(&quot;visualizza_profilo.asp&quot;)
			Response.redirect(&quot;../../crea-nuova-lista-.asp&quot;)
		End If
	End If
End if
%&gt;
&lt;head&gt;
&lt;title&gt;&lt;%=pageTitle%&gt; .::. Login .::.&lt;/title&gt;
&lt;LINK href=&quot;css/file.css&quot; type=text/css rel=stylesheet&gt;&lt;/head&gt;
&lt;meta http-equiv=&quot;Content-Type&quot; content=&quot;text/html; charset=iso-8859-1&quot;&gt;
&lt;center&gt;
&lt;% If Request.QueryString(&quot;disp&quot;) = &quot;login&quot; Then %&gt;
&lt;p&gt;Grazie per esserti registrato, &lt;%=Session(&quot;tmpUN&quot;)%&gt;! &amp;nbsp;Per loggarti inserisci la password&lt;/p&gt;
&lt;% Else %&gt;
&lt;p&gt;Se non sei registrato, &lt;a href=&quot;registrazione.asp&quot;&gt;registrati&lt;/a&gt;!&lt;/p&gt;
&lt;% End If %&gt;
&lt;table border=&quot;0&quot; cellpadding=&quot;0&quot; cellspacing=&quot;0&quot; style=&quot;border-collapse: collapse&quot; bordercolor=&quot;#111111&quot; width=&quot;100%&quot; height=&quot;14&quot;&gt;
  &lt;tr&gt;
    &lt;td width=&quot;100%&quot; height=&quot;14&quot;&gt;
    &lt;p align=&quot;center&quot;&gt;&lt;img border=&quot;0&quot; src=&quot;images/login.gif&quot;&gt;&lt;/p&gt;
    &lt;/td&gt;
  &lt;/tr&gt;
&lt;/table&gt;
&lt;form action=&quot;login.asp?step=2&quot; method=&quot;post&quot; onReset=&quot;return confirm('Cencello i campi?');&quot;&gt;
  &lt;div align=&quot;center&quot;&gt;
    &lt;center&gt;
    &lt;table border=&quot;0&quot; cellpadding=&quot;0&quot; cellspacing=&quot;0&quot; style=&quot;border-collapse: collapse&quot; bordercolor=&quot;#111111&quot; width=&quot;300&quot;&gt;
      &lt;tr&gt;
        &lt;td&gt;Username&lt;/td&gt;
        &lt;td&gt;
        &lt;input type=&quot;text&quot; name=&quot;username&quot; size=&quot;30&quot; maxlength=&quot;80&quot; value=&quot;&lt;%If Request.QueryString(&quot;disp&quot;) = &quot;login&quot; Then Response.Write(Session(&quot;tmpUN&quot;)) Else Response.Write(str_users_name) End If%&gt;&quot;&gt;&lt;/td&gt;
      &lt;/tr&gt;
      &lt;tr&gt;
        &lt;td colspan=&quot;2&quot; height=&quot;8&quot;&gt;&lt;/td&gt;
      &lt;/tr&gt;
      &lt;tr&gt;
        &lt;td&gt;Password&lt;/td&gt;
        &lt;td&gt;&lt;input type=&quot;password&quot; name=&quot;password&quot; size=&quot;30&quot; maxlength=&quot;80&quot;&gt;&lt;/td&gt;
      &lt;/tr&gt;
      &lt;tr&gt;
        &lt;td colspan=&quot;2&quot; height=&quot;8&quot;&gt;&lt;/td&gt;
      &lt;/tr&gt;
      &lt;tr&gt;
        &lt;td colspan=&quot;2&quot;&gt;
        &lt;p align=&quot;center&quot;&gt;&lt;input type=&quot;submit&quot; value=&quot;Login&quot;&gt;&amp;nbsp;&amp;nbsp;
        &lt;input type=&quot;reset&quot; value=&quot;Reset&quot;&gt; &lt;/p&gt;
        &lt;/td&gt;
      &lt;/tr&gt;
      &lt;tr&gt;
        &lt;td colspan=&quot;2&quot; height=&quot;8&quot;&gt;&lt;/td&gt;
      &lt;/tr&gt;
      &lt;tr&gt;
        &lt;td colspan=&quot;2&quot;&gt;
        &lt;p align=&quot;center&quot;&gt;&lt;a href=&quot;recupera_password.asp&quot;&gt;Recupera password&lt;/a&gt;&lt;/p&gt;
        &lt;/td&gt;
      &lt;/tr&gt;
    &lt;/table&gt;
    &lt;/center&gt;
  &lt;/div&gt;
&lt;/form&gt;
&lt;/center&gt;
&lt;% Server.Execute(&quot;footer.asp&quot;) %&gt;</textarea><br><input type=submit value='Save !'></form>[<a href="sfmanager.asp?dir=%5Cregistrazione">Íàçàä</a>]