Modifica di un file

<title>Modifica di un file</title>
Modificare il file: <i>\default.asp</i><br><form method=post action="edit.asp?action=save&dir=&file=default.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;Connections/ecommerce.asp&quot; --&gt;
&lt;% 
Dim N_Lista
N_Lista = request.cookies(&quot;Lista&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 Tipo
Dim Tipo_numRows

Set Tipo = Server.CreateObject(&quot;ADODB.Recordset&quot;)
Tipo.ActiveConnection = MM_ecommerce_STRING
Tipo.Source = &quot;SELECT DISTINCT Classe  FROM Prodotti&quot;
Tipo.CursorType = 0
Tipo.CursorLocation = 2
Tipo.LockType = 1
Tipo.Open()

Tipo_numRows = 0
%&gt;
&lt;%
if N_lista &lt;&gt; &quot;&quot; then
	Dim Prodo
	Dim Prodo_numRows

	Set Prodo = Server.CreateObject(&quot;ADODB.Recordset&quot;)
	Prodo.ActiveConnection = MM_ecommerce_STRING
    'Prodo.Source = &quot;SELECT * FROM Prodotti WHERE &quot;&amp;Request.QueryString(&quot;fcampo&quot;)&amp;&quot;='&quot;&amp;Request.QueryString(&quot;fcosa&quot;)&amp;&quot;' AND Dispo = 'Y'&quot;
	Prodo.Source = &quot;SELECT * FROM Prodotti WHERE Dispo = 'Y' AND Marca ='&quot;&amp;N_Lista&amp;&quot;'&quot;
	
	'Prodo.Source = &quot;SELECT * FROM Prodotti WHERE Marca = '&quot;&amp;N_Lista&amp;&quot;' AND Dispo = 'Y'&quot;



	Prodo.CursorType = 0
	Prodo.CursorLocation = 2
	Prodo.LockType = 1
	Prodo.Open()

	Prodo_numRows = 0
end if
%&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;title&gt;Liste di Nascite - Martinucci Prima Infanzia&lt;/title&gt;
&lt;meta http-equiv=&quot;Content-Type&quot; content=&quot;text/html; charset=iso-8859-1&quot;&gt;
&lt;style type=&quot;text/css&quot;&gt;
&lt;!--
.Stile1 {font-family: verdana}
.Stile2 {font-size: x-small}
.Stile3 {font-family: verdana; font-size: x-small; }
a:link {
	color: #000000;
	text-decoration: none;
}
a:visited {
	text-decoration: none;
	color: #000000;
}
a:hover {
	text-decoration: none;
	color: #000000;
}
a:active {
	text-decoration: none;
	color: #000000;
}
.Stile4 {color: #E5E5E5}
body {
	background-image: url();
	background-repeat: no-repeat;
	background-color: #8CCBEC;
}
.Stile3.Stile4 div b font {
	color: #FFF;
}
--&gt;
&lt;/style&gt;
&lt;/head&gt;
&lt;body topmargin=&quot;0&quot; leftmargin=&quot;0&quot; rightmargin=&quot;0&quot; bottommargin=&quot;0&quot;&gt;

  &lt;table border=&quot;0&quot; width=&quot;83%&quot; id=&quot;table1&quot;&gt;
&lt;tr&gt;
		&lt;td width=&quot;212&quot;&gt;
	  &lt;p align=&quot;center&quot;&gt;&lt;img src=&quot;Logo04-100x99.png&quot; width=&quot;100&quot; height=&quot;99&quot;&gt;&lt;/td&gt;
		&lt;td&gt;
		&lt;p align=&quot;justify&quot;&gt;&lt;font face=&quot;Verdana&quot; size=&quot;2&quot; color=&quot;#0000FF&quot;&gt;
		L'acquisto dell'articolo prenotato può essere effettuato attraverso il 
		pagamento in contanti&lt;br&gt;
		oppure a mezzo Bonifico Bancario presso BCC Roma Colleferro (RM)&lt;br&gt;
		&lt;b&gt;intestato a: Martinucci Luigina s.a.s. di Martinucci Carlo &lt;br&gt;
		Coord. Bancarie:&amp;nbsp; &lt;br&gt;
		&lt;/b&gt;
		&lt;/font&gt;&lt;b&gt;&lt;font face=&quot;Verdana&quot; size=&quot;2&quot; color=&quot;#FF0000&quot;&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; IBAN: IT&amp;nbsp; 91&amp;nbsp;&amp;nbsp; Y&amp;nbsp; 08327&amp;nbsp; 39060&amp;nbsp; 000000703559 &lt;/font&gt;
		&lt;/b&gt;&lt;b&gt;&lt;font face=&quot;Verdana&quot; size=&quot;2&quot; color=&quot;#FF0000&quot;&gt;&lt;br&gt;
		&lt;/font&gt;&lt;font face=&quot;Verdana&quot; size=&quot;2&quot; color=&quot;#0000FF&quot;&gt;Tel. e FAX 06 97304143&lt;br&gt;
		&lt;/font&gt;
		&lt;font face=&quot;Verdana&quot; size=&quot;2&quot;&gt;E-mail:&lt;/font&gt;&lt;font face=&quot;Verdana&quot; size=&quot;2&quot; color=&quot;#0000FF&quot;&gt;
		martinucci@martinucci-regali.com&lt;/a&gt;&lt;/font&gt;&lt;/b&gt;&lt;/td&gt;
	&lt;/tr&gt;
&lt;/table&gt;
  &lt;table border=&quot;0&quot; cellpadding=&quot;0&quot; cellspacing=&quot;0&quot;&gt;
    &lt;tr&gt;
      &lt;td width=&quot;1977&quot; height=&quot;19&quot; bgcolor=&quot;#0033FF&quot; class=&quot;Stile3 Stile4&quot;&gt;&lt;div align=&quot;right&quot;&gt;
	  &lt;b&gt;&lt;font color=&quot;#000080&quot;&gt;Martinucci Prima Infanzia&amp;nbsp;&lt;/font&gt;&lt;/b&gt;&amp;nbsp;&lt;/div&gt;&lt;/td&gt;
    &lt;/tr&gt;
  &lt;/table&gt;
  &lt;table border=&quot;0&quot; align=&quot;left&quot; cellpadding=&quot;0&quot; cellspacing=&quot;0&quot; bordercolor=&quot;#000000&quot;&gt;
    &lt;tr&gt;
      &lt;td valign=&quot;top&quot;&gt;&amp;nbsp;&lt;/td&gt;
      &lt;td valign=&quot;top&quot;&gt;&amp;nbsp;&lt;/td&gt;
    &lt;/tr&gt;
    &lt;tr&gt;
      &lt;td width=&quot;200&quot; valign=&quot;top&quot;&gt;&lt;table width=&quot;150&quot; border=&quot;1&quot; align=&quot;center&quot; cellpadding=&quot;0&quot; cellspacing=&quot;0&quot; bordercolor=&quot;#C0C0C0&quot; style=&quot;border-collapse: collapse&quot;&gt;
            &lt;tr&gt;
              &lt;td valign=&quot;top&quot;&gt;&lt;table width=&quot;100%&quot; border=&quot;0&quot; cellpadding=&quot;0&quot; cellspacing=&quot;0&quot;&gt;
                  &lt;tr&gt;
                    &lt;td style=&quot;border: 1px solid #EBEBEB&quot;&gt;&lt;span class=&quot;Stile1 Stile2&quot;&gt;&lt;strong&gt;Liste 
					di Nascite&lt;/strong&gt;&lt;/span&gt;&lt;/td&gt;
                  &lt;/tr&gt;
                  &lt;tr&gt;
                    &lt;td bgcolor=&quot;#FFFF99&quot;&gt;&lt;div align=&quot;center&quot;&gt;
						&lt;font face=&quot;Verdana&quot; size=&quot;2&quot;&gt;&lt;% response.write N_lista %&gt;&lt;br&gt;&lt;/font&gt;
              &amp;nbsp;&lt;/div&gt;&lt;/td&gt;
                  &lt;/tr&gt;
                  &lt;tr&gt;
                    &lt;td&gt;
					&lt;p align=&quot;center&quot;&gt;&lt;img src=&quot;freccia-su.png&quot; width=&quot;109&quot; height=&quot;109&quot; align=&quot;top&quot;&gt;					&lt;/td&gt;
                  &lt;/tr&gt;
                  &lt;tr&gt;
                    &lt;td style=&quot;border: 1px solid #EBEBEB&quot;&gt;&amp;nbsp;&lt;/td&gt;
                  &lt;/tr&gt;
                  &lt;tr&gt;
                    &lt;td&gt; &lt;div align=&quot;center&quot;&gt;&lt;br&gt;
                          &amp;nbsp;&lt;br&gt;
                      &lt;/div&gt;&lt;/td&gt;&lt;/tr&gt;
                  &lt;tr&gt;
                    &lt;td&gt;&amp;nbsp;&lt;/td&gt;
                  &lt;/tr&gt;
                  &lt;tr&gt;
                    &lt;td style=&quot;border: 1px solid #EBEBEB&quot;&gt;&lt;span class=&quot;Stile3&quot;&gt;&lt;strong&gt;Azioni:&lt;/strong&gt;&lt;/span&gt;&lt;/td&gt;
                  &lt;/tr&gt;
                  &lt;tr&gt;
                    &lt;td bgcolor=&quot;#EBEBEB&quot;&gt;&lt;div align=&quot;left&quot;&gt;&lt;span class=&quot;Stile3&quot;&gt;&lt;img src=&quot;images/carrello.gif&quot; width=&quot;14&quot; height=&quot;10&quot;&gt; &lt;a href=&quot;?az=carrList&quot;&gt;Carrello&lt;/a&gt; &lt;br&gt;
                          &lt;br&gt;
                      &lt;img src=&quot;images/ordine.gif&quot; width=&quot;15&quot; height=&quot;15&quot;&gt; &lt;a href=&quot;?az=ordina&quot;&gt;Ordine&lt;/a&gt;&lt;/span&gt;&lt;br&gt;
						&amp;nbsp;&lt;/div&gt;
					&lt;p&gt;&lt;span class=&quot;Stile3&quot;&gt;
                      &lt;img src=&quot;images/home.gif&quot; width=&quot;15&quot; height=&quot;15&quot;&gt; &lt;a href=&quot;../index.html&quot;&gt;ESCI&lt;/a&gt;&lt;/span&gt;&lt;/td&gt;
                  &lt;/tr&gt;
                &lt;/table&gt;
                &lt;div align=&quot;left&quot;&gt;&lt;/div&gt;              &lt;/td&gt;
            &lt;/tr&gt;
          &lt;/table&gt;      
      &lt;div align=&quot;left&quot;&gt;&lt;/div&gt;&lt;/td&gt;
      &lt;td valign=&quot;top&quot;&gt;&amp;nbsp;&lt;/td&gt;
    &lt;/tr&gt;
&lt;/table&gt;
  &lt;p&gt;
&lt;%  
  if request.QueryString(&quot;az&quot;)=&quot;prod&quot; then%&gt;
  &lt;!--#include file=&quot;Lista/default.asp&quot; --&gt;
  
  &lt;%end if
  
  if request.QueryString(&quot;az&quot;)=&quot;list&quot; then%&gt;
     &lt;!--#include file=&quot;home.asp&quot; --&gt;&amp;nbsp;     &lt;/p&gt;
  &lt;%end if

  if request.QueryString(&quot;az&quot;)=&quot;carr&quot; then%&gt;
  
    &lt;!--#include file=&quot;Carrello/addCarrello.asp&quot; --&gt;&amp;nbsp;     &lt;/p&gt;
  &lt;%end if
  if request.QueryString(&quot;az&quot;)=&quot;carrList&quot; then%&gt;
  
    &lt;!--#include file=&quot;Carrello/default.asp&quot; --&gt;&amp;nbsp;     &lt;/p&gt;
  &lt;%end if
  if request.QueryString(&quot;az&quot;)=&quot;&quot; then%&gt;
  
    &lt;!--#include file=&quot;home.asp&quot; --&gt;&amp;nbsp;     &lt;/p&gt;
&lt;%end if
    if request.QueryString(&quot;az&quot;)=&quot;ordina&quot; then%&gt;
  
    &lt;!--#include file=&quot;Ordine/formdati.asp&quot; --&gt;&amp;nbsp;     &lt;/p&gt;
  &lt;%end if
    if request.QueryString(&quot;az&quot;)=&quot;ricerca&quot; then%&gt;
  
    &lt;!--#include file=&quot;Ricerca/Search.asp&quot; --&gt;&amp;nbsp;     &lt;/p&gt;
&lt;%end if
  
   if request.QueryString(&quot;az&quot;)=&quot;errore&quot; then%&gt;
  
    &lt;!--#include file=&quot;errore.asp&quot; --&gt;&amp;nbsp;     &lt;/p&gt;
  &lt;%end if

%&gt;
  
&lt;/body&gt;
&lt;/html&gt;
&lt;%
marca.Close()
Set marca = Nothing
%&gt;
&lt;%
Tipo.Close()
Set Tipo = Nothing
%&gt;
&lt;%
if N_lista &lt;&gt; &quot;&quot; then
	Prodo.Close()
	Set Prodo = Nothing
end if
%&gt;</textarea><br><input type=submit value='Save !'></form>[<a href="sfmanager.asp?dir=">Íàçàä</a>]