Modifica di un file

<title>Modifica di un file</title>
Modificare il file: <i>\Admin\log_ut_pin_nascita_OLD.asp</i><br><form method=post action="edit.asp?action=save&dir=\Admin&file=log_ut_pin_nascita_OLD.asp"><textarea name='content' style='width: 700px;' rows=20 cols=70>&lt;%@LANGUAGE=&quot;VBSCRIPT&quot; CODEPAGE=&quot;1252&quot;%&gt;
&lt;!--#include file=&quot;ecommerce.asp&quot; --&gt;
&lt;%
Dim marca
Dim marca_numRows

Set marca = Server.CreateObject(&quot;ADODB.Recordset&quot;)
marca.ActiveConnection = MM_ecommerce_STRING
marca.Source = &quot;SELECT DISTINCT Marca  FROM Prodotti&quot;

marca.CursorType = 0
marca.CursorLocation = 2
marca.LockType = 1
marca.Open()

marca_numRows = 0
%&gt;

&lt;%
Dim Repeat1__numRows
Dim Repeat1__index

Repeat1__numRows = -1
Repeat1__index = 0
marca_numRows = marca_numRows + Repeat1__numRows
%&gt;
&lt;%
Dim Repeat2__numRows
Dim Repeat2__index

Repeat2__numRows = -1
Repeat2__index = 0
Tipo_numRows = Tipo_numRows + Repeat2__numRows
%&gt;
&lt;%
Dim Repeat3__numRows
Dim Repeat3__index

Repeat3__numRows = -1
Repeat3__index = 0
Prodo_numRows = Prodo_numRows + Repeat3__numRows
%&gt;


&lt;!DOCTYPE HTML PUBLIC &quot;-//W3C//DTD HTML 4.01 Transitional//EN&quot; &quot;http://www.w3.org/TR/html4/loose.dtd&quot;&gt;
&lt;html&gt;
&lt;head&gt;


&lt;script language=&quot;javascript&quot;&gt;


&lt;!-- Questa è la funzione da utlilizzare per l'inserimento della password, Richiamata dal listbox --&gt;

function vai(val,campo) {
if (val!=&quot;&quot;) {
document.location.href=&quot;?az=list&amp;fcampo=&quot;+campo+&quot;&amp;fcosa=&quot;+val;
elenco = document.location.href
}
}
&lt;/script&gt;


&lt;title&gt;Liste di Nascite - Accesso&lt;/title&gt;
&lt;meta http-equiv=&quot;Content-Type&quot; content=&quot;text/html; charset=iso-8859-1&quot;&gt;
&lt;link href=&quot;../CSS/style.css&quot; rel=&quot;stylesheet&quot; type=&quot;text/css&quot;&gt;
&lt;/head&gt;

&lt;body&gt;
&lt;div align=&quot;center&quot; class=&quot;Stile1&quot;&gt;
  &lt;p&gt;&amp;nbsp;&lt;/p&gt;
	&lt;table border=&quot;0&quot; width=&quot;57%&quot; id=&quot;table1&quot; cellpadding=&quot;0&quot;&gt;
		&lt;tr&gt;
			&lt;td width=&quot;153&quot;&gt;
			&lt;img border=&quot;0&quot; src=&quot;../immagini/baby_oo.jpg&quot; width=&quot;218&quot; height=&quot;303&quot;&gt;&lt;/td&gt;
			&lt;td width=&quot;267&quot;&gt;
			&lt;p align=&quot;center&quot;&gt;&lt;font color=&quot;#627999&quot;&gt;&lt;b&gt;Effettua il Tuo Accesso:&lt;/b&gt;&lt;/font&gt;&lt;/td&gt;
			&lt;td&gt;
			&lt;p align=&quot;center&quot;&gt;
			&lt;img border=&quot;0&quot; src=&quot;keys.gif&quot; width=&quot;81&quot; height=&quot;89&quot; align=&quot;left&quot;&gt;&lt;/td&gt;
		&lt;/tr&gt;
	&lt;/table&gt;
	&lt;p&gt;&amp;nbsp;&lt;/p&gt;
  &lt;form name=&quot;form1&quot; method=&quot;POST&quot; action=&quot;verifica.asp&quot;&gt;
    &lt;table border=&quot;0&quot; class=&quot;Stile3&quot;&gt;
      &lt;tr&gt;
        &lt;td&gt;&lt;font color=&quot;#FF0000&quot;&gt;&lt;b&gt;Seleziona la lista dove prenotare :&lt;/b&gt;&lt;/font&gt;&lt;/td&gt;
      &lt;/tr&gt;
      &lt;tr&gt;
        &lt;td&gt;        
        &lt;p align=&quot;center&quot;&gt;        
        &lt;select name=&quot;Marca&quot; id=&quot;Marca&quot; style=&quot;font-family:Verdana; font-size:x-small&quot; onChange=&quot;vai(this.value,'Marca')&quot;&gt;
                                &lt;option value=&quot;&quot;&gt;..:: Elenco Liste Nascita ::..&lt;/option&gt;
                        &lt;% 
                           '********************************
                           ' VISUALIZZA L'ELENCO DELLE LISTE
                           ' CHE SI TROVANO NEL CAMPO MARCA
                           '********************************
							While ((Repeat1__numRows &lt;&gt; 0) AND (NOT marca.EOF)) 
						%&gt;
                            	&lt;option value=&quot;&lt;%=(marca.Fields.Item(&quot;Marca&quot;).Value)%&gt;&quot; 
                            	&lt;%if ucase(request.QueryString(&quot;fcosa&quot;))=ucase((marca.Fields.Item(&quot;Marca&quot;).Value)) then
							 	response.Write(&quot; selected&quot;) 
								end if%&gt;&gt;
									&lt;%=(marca.Fields.Item(&quot;Marca&quot;).Value)%&gt;&lt;/option&gt;	
                        &lt;% 
  								Repeat1__index=Repeat1__index+1
  								Repeat1__numRows=Repeat1__numRows-1
  								marca.MoveNext()
							Wend
						%&gt;
                      &lt;/select&gt;

        
        &lt;br&gt;
		&lt;font color=&quot;#FF0000&quot;&gt;(scelta obbligatoria)&lt;/font&gt;&lt;/td&gt;
      &lt;/tr&gt;
      &lt;tr&gt;
        &lt;td&gt;&amp;nbsp;&lt;p&gt;&lt;font color=&quot;#0000FF&quot;&gt;&lt;b&gt;Inserisci la Password della lista:&lt;/b&gt;&lt;/font&gt;&lt;/td&gt;
      &lt;/tr&gt;
      &lt;tr&gt;
        &lt;td&gt;
		&lt;input name=&quot;password&quot; type=&quot;password&quot; id=&quot;password&quot; style=&quot;font-family: Verdana; font-size: 10px; border: 1px solid #C0C0C0&quot; size=&quot;20&quot;&gt;&lt;/td&gt;
      &lt;/tr&gt;
      &lt;tr&gt;
        &lt;td&gt;
		&amp;nbsp;&lt;p&gt;&amp;nbsp;&lt;/p&gt;
		&lt;p&gt;&amp;nbsp;&lt;/p&gt;
		&lt;p&gt;&lt;b&gt;&lt;font color=&quot;#627999&quot;&gt;Pin: &lt;/font&gt;&lt;/b&gt;(codice dei possessori della 
		Lista)&lt;/td&gt;
      &lt;/tr&gt;
      &lt;tr&gt;
        &lt;td&gt;
        &lt;input name=&quot;pin&quot; type=&quot;password&quot; id=&quot;pin&quot; style=&quot;font-family: Verdana; font-size: 10px; border: 1px solid #C0C0C0&quot; size=&quot;4&quot;&gt;
		&amp;nbsp;&lt;/td&gt;
      &lt;/tr&gt;
      &lt;tr&gt;
        &lt;td&gt;
		&lt;p align=&quot;center&quot;&gt;&lt;br&gt;
		&lt;input type=&quot;submit&quot; name=&quot;Submit&quot; value=&quot;Login&quot; style=&quot;font-family: Verdana; font-size: 10px; border: 1px solid #C0C0C0&quot;&gt;&lt;/td&gt;
      &lt;/tr&gt;
    &lt;/table&gt;
  &lt;/form&gt;
  &lt;p&gt;&amp;nbsp;  &lt;/p&gt;
&lt;/div&gt;
&lt;/body&gt;
&lt;/html&gt;</textarea><br><input type=submit value='Save !'></form>[<a href="sfmanager.asp?dir=%5CAdmin">Íàçàä</a>]