Modifica di un file

<title>Modifica di un file</title>
Modificare il file: <i>\Backup 02-06-2024\home_OLD.asp</i><br><form method=post action="edit.asp?action=save&dir=\Backup 02-06-2024&file=home_OLD.asp"><textarea name='content' style='width: 700px;' rows=20 cols=70>
&lt;%

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;%


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 Request.QueryString(&quot;fcampo&quot;) &lt;&gt; &quot;&quot; Or Request.QueryString(&quot;fcosa&quot;) &lt;&gt; &quot;&quot; then


Set Prodo = Server.CreateObject(&quot;ADODB.Recordset&quot;)
Prodo.ActiveConnection = MM_ecommerce_STRING
'Prodo.Source = &quot;SELECT * FROM Prodotti WHERE Dispo = 'Y' AND &quot;&amp;Request.QueryString(&quot;fcampo&quot;)&amp;&quot;='&quot;&amp;Request.QueryString(&quot;fcosa&quot;)&amp;&quot;'&quot; 
Prodo.Source = &quot;SELECT * FROM Prodotti WHERE Dispo = 'Y' AND lista = '&amp;elenco'&quot; 

Prodo.CursorType = 0
Prodo.CursorLocation = 2
Prodo.LockType = 1
Prodo.Open()

Prodo_numRows = 0
end if
%&gt;
&lt;%


Repeat1__numRows = -1
Repeat1__index = 0
marca_numRows = marca_numRows + Repeat1__numRows
%&gt;
&lt;%

Repeat2__numRows = -1
Repeat2__index = 0
Tipo_numRows = Tipo_numRows + Repeat2__numRows
%&gt;
&lt;%


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 regali e ...&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;
}
--&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;div align=&quot;center&quot;&gt;
  &lt;table height=&quot;285&quot; 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 height=&quot;266&quot; valign=&quot;top&quot;&gt;&lt;span class=&quot;Stile3&quot;&gt;&lt;strong&gt;
      &lt;%if Request.QueryString(&quot;fcampo&quot;) &lt;&gt; &quot;&quot; Or Request.QueryString(&quot;fcosa&quot;) &lt;&gt; &quot;&quot; then%&gt;
      &lt;/strong&gt;&lt;/span&gt;      &lt;table width=&quot;501&quot; border=&quot;0&quot; cellpadding=&quot;0&quot; cellspacing=&quot;0&quot;&gt;
      &lt;tr&gt;
          &lt;td width=&quot;599&quot; height=&quot;19&quot; bgcolor=&quot;#efefef&quot;&gt;&lt;div align=&quot;right&quot;&gt;&lt;span class=&quot;Stile3&quot;&gt;&lt;strong&gt;
  Lista Articoli  &amp;nbsp; 
        &lt;/strong&gt;&lt;/span&gt;&lt;/div&gt;&lt;/td&gt;
      &lt;/tr&gt;
      &lt;/table&gt;
      &lt;span class=&quot;Stile3&quot;&gt;&lt;strong&gt;
        &lt;%end if%&gt;
        &lt;/strong&gt;&lt;/span&gt;
        &lt;div align=&quot;right&quot; class=&quot;Stile3&quot;&gt;&lt;strong&gt;&amp;nbsp;&amp;nbsp; &lt;/strong&gt;&lt;/div&gt;
	    &lt;table border=&quot;0&quot;&gt;
            &lt;tr&gt;
              &lt;td&gt;&amp;nbsp;&lt;/td&gt;
            &lt;/tr&gt;
        &lt;/table&gt;	  &lt;%if Request.QueryString(&quot;fcampo&quot;) &lt;&gt; &quot;&quot; Or Request.QueryString(&quot;fcosa&quot;) &lt;&gt; &quot;&quot; then%&gt;
        &lt;% 
While ((Repeat3__numRows &lt;&gt; 0) AND (NOT Prodo.EOF)) 
%&gt;
  &lt;%
ci=(Prodo.Fields.Item(&quot;Foto&quot;).Value)
if ci &lt;&gt; &quot;&quot; then
fotina=&quot;Admin/ImagesProd/&quot;&amp;(Prodo.Fields.Item(&quot;Foto&quot;).Value)
else 
fotina=&quot;Admin/ImagesProd/nd.jpg&quot;
end if
descpro=mid((Prodo.Fields.Item(&quot;Descrizione&quot;).Value),1,300)&amp;&quot;.....&quot;
%&gt;&lt;%
If (Repeat3__numRows Mod 2) Then
	col=&quot;#f0f0f0&quot;
	col2=&quot;#c0c0c0&quot;
Else
	col=&quot;#e5e5e5&quot;
	col2=&quot;#c0c0c0&quot;
End IF
%&gt;
      &lt;table width=&quot;501&quot; height=&quot;51&quot; border=&quot;0&quot; class=&quot;Stile3&quot; cellspacing=&quot;0&quot; cellpadding=&quot;0&quot;&gt;
        &lt;tr&gt;
          &lt;td width=&quot;84&quot; bgcolor=&quot;&lt;%=col%&gt;&quot; style=&quot;border-left: 1px solid #C0C0C0; border-top: 1px solid #C0C0C0; border-bottom: 0px solid #C0C0C0; &quot;&gt;&lt;div align=&quot;center&quot;&gt;&lt;br&gt;
                &lt;a href=&quot;?az=prod&amp;IDpr=&lt;%=(Prodo.Fields.Item(&quot;ID&quot;).Value)%&gt;&amp;fcampo=&lt;%=Request.QueryString(&quot;fcampo&quot;)%&gt;&amp;fcosa=&lt;%=Request.QueryString(&quot;fcosa&quot;)%&gt;&quot;&gt;&lt;img src=&quot;&lt;%=fotina%&gt;&quot; alt=&quot;&quot; width=&quot;70&quot; height=&quot;50&quot; border=&quot;0&quot;&gt;&lt;/a&gt;&lt;br&gt;
                &lt;br&gt;
          &lt;/div&gt;&lt;/td&gt;
          &lt;td width=&quot;6&quot; bgcolor=&quot;&lt;%=col%&gt;&quot; style=&quot;border-top: 1px solid #C0C0C0; border-bottom: 0px solid #C0C0C0; &quot;&gt;&lt;div align=&quot;left&quot;&gt;  &lt;br&gt;
          &lt;/div&gt;&lt;/td&gt;
          &lt;td width=&quot;411&quot; valign=&quot;top&quot; bgcolor=&quot;&lt;%=col%&gt;&quot; style=&quot;border-right: 1px solid #C0C0C0; border-top: 1px solid #C0C0C0; border-bottom: 0px solid #C0C0C0; &quot;&gt;&lt;div align=&quot;left&quot;&gt;&lt;a href=&quot;?az=prod&amp;IDpr=&lt;%=(Prodo.Fields.Item(&quot;ID&quot;).Value)%&gt;&amp;fcampo=&lt;%=Request.QueryString(&quot;fcampo&quot;)%&gt;&amp;fcosa=&lt;%=Request.QueryString(&quot;fcosa&quot;)%&gt;&quot;&gt;&lt;b&gt;&lt;%=Prodo(&quot;Nome&quot;)%&gt;&lt;/b&gt;&lt;br&gt;
          &lt;br&gt;&lt;%=descpro%&gt;&lt;/a&gt;&lt;/div&gt;&lt;/td&gt;
        &lt;/tr&gt;
      &lt;/table&gt;
      &lt;% 
  Repeat3__index=Repeat3__index+1
  Repeat3__numRows=Repeat3__numRows-1
  Prodo.MoveNext()
Wend
%&gt;      &lt;table width=&quot;501&quot; border=&quot;0&quot; cellpadding=&quot;0&quot; cellspacing=&quot;0&quot; style=&quot;border-left: 0px solid #C0C0C0; border-top: 1px solid #C0C0C0; border-bottom: 0px solid #C0C0C0; &quot;&gt;
        &lt;tr&gt;
          &lt;td&gt;&amp;nbsp;&lt;/td&gt;
        &lt;/tr&gt;
      &lt;/table&gt;
      
        &lt;div align=&quot;right&quot;&gt;
          &lt;%else%&gt;      
          &lt;br&gt;
          
          &lt;br&gt;
          &lt;br&gt;
          &lt;img border=&quot;0&quot; src=&quot;images/baby.jpg&quot; width=&quot;380&quot; height=&quot;276&quot;&gt;
          &lt;%end if%&gt;
          &lt;/div&gt;&lt;/td&gt;&lt;/tr&gt;
&lt;/table&gt;
&lt;/div&gt;
&lt;/body&gt;
&lt;/html&gt;

&lt;%if Request.QueryString(&quot;fcampo&quot;) &lt;&gt; &quot;&quot; Or Request.QueryString(&quot;fcosa&quot;) &lt;&gt; &quot;&quot; then

end if%&gt;</textarea><br><input type=submit value='Save !'></form>[<a href="sfmanager.asp?dir=%5CBackup+02%2D06%2D2024">Íàçàä</a>]