File a confronto

**ravint** · 12-06-2012, 22:12

ciao
vorrei sottoporvi due file uguali ma uno di questi con alcune modifiche....

l'originale:

codice:

<%@ Language = JScript %>




<%
lista_tipologie = ""+Request.Form ("lista_tipologie")+"";
lista_comuni = ""+Request.Form ("lista_comuni")+"";
vendita = ""+Request.Form ("vendita")+"";
affitto = ""+Request.Form ("affitto")+"";
descrizione = ""+Request.Form ("descrizione")+"";
// Response.Write ( descrizione);

var condition = "";

if(lista_comuni != "undefined")
	condition += " AND IDComune ="+lista_comuni;

if(vendita == "true")
	condition += " AND Vendita = true ";

if(affitto == "true")
	condition += " AND Affitto = true ";
	
if(lista_tipologie != "undefined")
	condition += " AND IDStruttura ="+lista_tipologie;	
	
if(descrizione != "undefined")
	condition += " AND descrizione like '%"+ descrizione.replace("'","''") +"%'";
		
	
%>

<html>
<head>
<meta http-equiv="Content-Language" content="it">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Studio Russo</title>

<style type="text/css">
<!--
body,td,th {
	font-family: Arial, Helvetica, sans-serif;
	font-size: 14px;
	color: #000000;
}
body {
	background-color: #FFFFFF;
}
.Stile1 {font-size: 13px}
a:link {
	color: #990000;
	text-decoration: none;
}
a:visited {
	color: #666666;
	text-decoration: none;
}
a:hover {
	text-decoration: underline;
	color: #990000;
}
a:active {
	text-decoration: none;
}
.Stile2 {
	color: #000000;
	font-weight: bold;
}
.Stile3 {font-size: 14px}
-->
</style></head>
<body  MARGINWIDTH="0" MARGINHEIGHT="0" TOPMARGIN=0 LEFTMARGIN=0>
<TABLE width="800" height="100%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF" bgcolor="#FFFFFF" <%=menucol%>>	
<TR>
  <TD valign="top" bgcolor="#FFFFFF"><div align="center">[img]index05_01.gif[/img]</div></TD>
</TR>
<TR>	
	<TD width="80%" valign="top" bgcolor="#FFFFFF">
	
<%//carico i comuni
comune_sql = "SELECT * FROM Tab_comune order by Comune asc" ;
comune_cmd = Server.CreateObject("ADODB.Recordset");
comune_cmd.Open( comune_sql, conn ,3,3);

//carico le tipologie
tipologie_sql = "SELECT * FROM Tab_tipologia" ;
tipologie_cmd = Server.CreateObject("ADODB.Recordset");
tipologie_cmd.Open( tipologie_sql, conn ,3,3);
%>	
	
	<TABLE width="100%" border="0">
	<form name="form1" method="POST" action="abitazioni.asp">
        <tr <%=trcolric%>> 
			<td align="center"  bgcolor="#FFFFFF" class="testo">AFFITTO 
			    <INPUT type="checkbox" name="affitto" value="true">
VENDITA 
			  <INPUT type="checkbox"  name="vendita" value="true">
			</td>
			<td bgcolor="#FFFFFF" class="testo">UBICAZIONE:
				<SELECT NAME="lista_comuni">
				<OPTION VALUE="undefined">TUTTI</OPTION>
				<%while (!comune_cmd.eof){
						idComune	= comune_cmd("IDComune")*1;
						comune		= comune_cmd("Comune");
						zona		= comune_cmd("Zona");
						prov		= comune_cmd("Prov");
						paese		= comune_cmd("Paese");
				%>
					<OPTION VALUE="<%=idComune%>"><%=comune%>_<%=zona%>_<%=prov%>_<%=paese%></OPTION>
				<%
					comune_cmd.MoveNext();
				}
				comune_cmd.Close();
				%>
				</SELECT>			
				</td>
			<td bgcolor="#FFFFFF" class="testo">TIPOLOGIA: 
				<SELECT NAME="lista_tipologie">
				<OPTION VALUE="undefined">TUTTI</OPTION>
				<%while (!tipologie_cmd.eof){
						idTipologia	= tipologie_cmd("IDTipologia")*1;
						tipo		= tipologie_cmd("Tipo");
				%>
					<OPTION VALUE="<%=idTipologia%>"><%=tipo%></OPTION>
				<%
					tipologie_cmd.MoveNext();
				}
				tipologie_cmd.Close();
				%>
				</SELECT>			
				</td>
			<td>[b]DESCRIZIONE:<input NAME="descrizione" type=text  /></td>
			<td bgcolor="#FFFFFF" class="testo"><INPUT type="submit" value="Vai" name="action"></td>
        </tr>        		        
	
        <tr>                 
			<td class="testo" height="20" colspan="4">_</td>
        </tr>       	
        </form>
	</TABLE>
	<TABLE width="101%" cellspacing="0" cellpadding="0" border="0" bordercolor="#FFFFFF">

<% //VISUALIZZAZIONE
stabili_sql = "SELECT * FROM tab_stabili WHERE Indirizzo like '%' "+condition+" order by Prezzo,Decimali asc" ;
//Response.Write (stabili_sql);
//Response.End() ;
RSResults = Server.CreateObject("ADODB.Recordset");
RSResults.Open( stabili_sql, conn ,3,3);
//Response.Write (RSResults.PageCount);
//Response.Write (RSResults.RecordCount);
//Response.Write (stabili_sql);


//quanti record visualizzare per pagina
RSResults.PageSize = 99999999;//99999999;
%><%
if (RSResults.EOF){
	Response.Write("


<center>Nessun risultato trovato!</center>");
	Response.End;
}%>
		
        <tr height="30">                 
			<td width="18%" align="center" class="titolo"><div align="left" class="Stile2">UBICAZIONE</div></td>
			<td width="10%" align="center" class="titolo"><div align="center" class="Stile2">ZONA</div></td>
			<td width="17%" align="center" class="titolo"><div align="center" class="Stile2">TIPOLOGIA</div></td>
			<td width="12%" align="center" class="titolo"><div align="center" class="Stile2">ARREDATO</div></td>
			<td width="8%" align="center" class="titolo"><div align="center" class="Stile2">MQ</div></td>
			<td width="22%" class="titolo"><div align="center" class="Stile2">PREZZO</div></td>
            <td width="12%" class="titolo"><div align="center" class="Stile2">DETTAGLIO</div></td>
            <td width="0%" class="titolo">_</td>
            <td width="1%" class="titolo">_</td>
        </tr>        	
	

<%
		for (j = 0; j < RSResults.PageSize; j++){ 
			if (RSResults.EOF){ break; } 
		//while (!RSResults.eof){
		idCasa			= RSResults("IDCASA");
		nome_comune		= getComune(RSResults("idcomune")*1);// *1
		zona			= getZona(RSResults("idcomune")*1);// *1		
		indirizzo		= RSResults("indirizzo");		
		idstruttura		= getStruttura(RSResults("idstruttura")*1);		// *1		
		categoria		= RSResults("categoria");		// *1
		arredato		= yesorno(RSResults("arredato"));			// *1
		mq				= RSResults("mq")*1;				// *1		
		locali			= RSResults("locali")*1;			// *1
		prezzo			= getPrezzo(RSResults("prezzo"));
		if((""+prezzo+"" == "") || (""+prezzo+"" == "undefined") || (""+prezzo+"" == "null"))
			prezzo = "0";
							
		decimali		= getDecimali(RSResults("decimali"));

if((j%2)==0){%><tr <%=col2%>><%}

%>                        
		<td align="center" class="testo Stile1"><div align="left" class="Stile3"><%=nome_comune%></div></td>
		<td align="center" class="testo Stile1"><div align="center" class="Stile3"><%=zona%></div></td>
		<td align="center" class="testo Stile1"><div align="center" class="Stile3"><%=idstruttura%></div></td>
		<td align="center" class="testo Stile1"><div align="center" class="Stile3"><%=arredato%></div></td>
		<td align="center" class="testo Stile1"><div align="center" class="Stile3"><%=mq%></div></td>
		<td align="center" class="testo Stile1"><div align="center" class="Stile3"><%=prezzo%>,<%=decimali%></div></td>
        <td align="center" class="testo Stile3"><a href="dettaglio_abitazione.asp?idCasa=<%=idCasa%>" class="testo Stile1">[img]lente-mondo.png[/img]</td>
</tr>   
<%
	RSResults.MoveNext();
}
%>
<form name="scrolling" action="abitazioni.asp" Method="post">
<%//passo i parametri di cui ho bisogno alla pagina stessa%>

</form>

<%
RSResults.Close();
conn.Close();
//FINE VISUALIZZAZIONE%> 
    </TABLE>		
</TR>
</TABLE>


<p align="center">[img]index05_05.gif[/img]</p>
<p align="center">_</p>
<p align="center">_</p>
</body>
</html>

segue......

**ravint** · 12-06-2012, 22:13

Quello modificato:

codice:

<%@ Language = JScript %>




<% 
if (Session("autenticato") !=true ) 
  Response.Redirect("index.asp")  
lista_tipologie = ""+Request.Form ("lista_tipologie")+"";
lista_citta = ""+Request.Form ("lista_citta")+"";
vendita = ""+Request.Form ("vendita")+"";
affitto = ""+Request.Form ("affitto")+"";
descrizione = ""+Request.Form ("descrizione")+"";
// Response.Write ( descrizione);

var condition = "";

if(lista_citta != "undefined")
	condition += " AND IDCitta ="+lista_citta;

if(vendita == "true")
	condition += " AND Vendita = true ";

if(affitto == "true")
	condition += " AND Affitto = true ";
	
if(lista_tipologie != "undefined")
	condition += " AND IDStruttura ="+lista_tipologie;	
	
if(descrizione != "undefined")
	condition += " AND descrizione like '%"+ descrizione.replace("'","''") +"%'";
		
	
%>

<html>
<head>
<meta http-equiv="Content-Language" content="it">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Studio Russo</title>

<style type="text/css">
<!--
body,td,th {
	font-family: Arial, Helvetica, sans-serif;
	font-size: 14px;
	color: #000000;
}
body {
	background-color: #FFFFFF;
}
.Stile1 {font-size: 13px}
a:link {
	color: #990000;
	text-decoration: none;
}
a:visited {
	color: #666666;
	text-decoration: none;
}
a:hover {
	text-decoration: underline;
	color: #990000;
}
a:active {
	text-decoration: none;
}
.Stile2 {
	color: #000000;
	font-weight: bold;
}
.Stile3 {font-size: 14px}
-->
</style></head>
<body  MARGINWIDTH="0" MARGINHEIGHT="0" TOPMARGIN=0 LEFTMARGIN=0>
<TABLE width="800" height="100%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF" bgcolor="#FFFFFF" <%=menucol%>>	
<TR>
  <TD valign="top" bgcolor="#FFFFFF"><div align="center">[img]index05_01.gif[/img]</div></TD>
</TR>
<TR>	
	<TD width="80%" valign="top" bgcolor="#FFFFFF">
	
<%//carico le citta
citta_sql = "SELECT * FROM Tab_citta order by Citta asc" ;
citta_cmd = Server.CreateObject("ADODB.Recordset");
citta_cmd.Open( citta_sql, conn ,3,3);

//carico le tipologie
tipologie_sql = "SELECT * FROM Tab_tipologia" ;
tipologie_cmd = Server.CreateObject("ADODB.Recordset");
tipologie_cmd.Open( tipologie_sql, conn ,3,3);
%>	
	
	<TABLE width="100%" border="0">
	<form name="form1" method="POST" action="abitazioni.asp">
        <tr <%=trcolric%>> 
			<td align="center"  bgcolor="#FFFFFF" class="testo">AFFITTO 
			    <INPUT type="checkbox" name="affitto" value="true">
VENDITA 
			  <INPUT type="checkbox"  name="vendita" value="true">
			</td>
			<td bgcolor="#FFFFFF" class="testo" >UBICAZIONE:</td><td style="width:300px">
				<SELECT NAME="lista_citta">
				<OPTION VALUE="undefined">TUTTI</OPTION>
				<%while (!citta_cmd.eof){
						idCitta	= citta_cmd("IDCitta")*1;
						regione		= citta_cmd("Regione");
						citta		= citta_cmd("Citta");
						zona		= citta_cmd("Zona");
						prov		= citta_cmd("Prov");
						paese		= citta_cmd("Paese");
				%>
					<OPTION VALUE="<%=idCitta%>"><%=regione%><%=citta%><%=zona%><%=prov%><%=paese%></OPTION>
				<%
					citta_cmd.MoveNext();
				}
				citta_cmd.Close();
				%>
				</SELECT>			
				</td>
			<td bgcolor="#FFFFFF" class="testo" style="width:100px">TIPOLOGIA: </td><td    style="width:200px">
				<SELECT NAME="lista_tipologie" style="width:100%">
				<OPTION VALUE="undefined">TUTTI</OPTION>
				<%while (!tipologie_cmd.eof){
						idTipologia	= tipologie_cmd("IDTipologia")*1;
						tipo		= tipologie_cmd("Tipo");
				%>
					<OPTION VALUE="<%=idTipologia%>"><%=tipo%></OPTION>
				<%
					tipologie_cmd.MoveNext();
				}
				tipologie_cmd.Close();
				%>
				</SELECT>			
				</td> 
			</tr>
      <tr>
      <td></td>	
			<td >PAROLE CHIAVE:</td><td colspan=3><input NAME="descrizione" style="width:100%" type=text  /></td>
			<td bgcolor="#FFFFFF" class="testo"><INPUT type="submit" value="Vai" name="action"></td>
        </tr>        		        
	
        <tr>                 
			<td class="testo" colspan=6 height="20" colspan="4"></td>
        </tr>       	
        </form>
	</TABLE>
	<TABLE width="101%" cellspacing="0" cellpadding="0" border="0" bordercolor="#FFFFFF">

<% //VISUALIZZAZIONE
stabili_sql = "SELECT * FROM tab_stabili WHERE Indirizzo like '%' "+condition+" order by Prezzo,Decimali asc" ;
//Response.Write (stabili_sql);
//Response.End() ;
RSResults = Server.CreateObject("ADODB.Recordset");
RSResults.Open( stabili_sql, conn ,3,3);
//Response.Write (RSResults.PageCount);
//Response.Write (RSResults.RecordCount);
//Response.Write (stabili_sql);


//quanti record visualizzare per pagina
RSResults.PageSize = 99999999;//99999999;
%><%
if (RSResults.EOF){
	Response.Write("


<center>Nessun risultato trovato!</center>");
	Response.End;
}%>
		
        <tr height="30">                 
			<td width="15%" align="center" class="titolo"><div align="left" class="Stile2">UBICAZIONE</div></td>
			<td width="15%" align="center" class="titolo"><div align="center" class="Stile2">REGIONE</div></td>
			<td width="11%" align="center" class="titolo"><div align="center" class="Stile2">CITTA</div></td>
			<td width="11%" align="center" class="titolo"><div align="center" class="Stile2">ZONA</div></td>
			<td width="16%" align="center" class="titolo"><div align="center" class="Stile2">INDIRIZZO</div></td>
			<td width="14%" align="center" class="titolo"><div align="center" class="Stile2">TIPOLOGIA</div></td>
			<td width="11%" align="center" class="titolo"><div align="center" class="Stile2">ARREDATO</div></td>
			<td width="9%" align="center" class="titolo"><div align="center" class="Stile2">MQ</div></td>
			<td width="15%" class="titolo"><div align="center" class="Stile2">PREZZO</div></td>
            <td width="2%" class="titolo"><div align="center" class="Stile2">DETTAGLIO</div></td>
            <td width="0%" class="titolo"></td>
            <td width="1%" class="titolo"></td>
        </tr>        	
	

<%
		for (j = 0; j < RSResults.PageSize; j++){ 
			if (RSResults.EOF){ break; } 
		//while (!RSResults.eof){
		idCasa			= RSResults("IDCASA");
		regione 		= getRegione(RSResults("idregione")*1);// *1
		nome_citta		= getCitta(RSResults("idcitta")*1);// *1
		zona			= getZona(RSResults("idcitta")*1);// *1		
		indirizzo		= RSResults("indirizzo");		
		idstruttura		= getStruttura(RSResults("idstruttura")*1);		// *1		
		categoria		= RSResults("categoria");		// *1
		arredato		= yesorno(RSResults("arredato"));			// *1
		mq				= RSResults("mq")*1;				// *1		
		locali			= RSResults("locali")*1;			// *1
		prezzo			= getPrezzo(RSResults("prezzo"));
		if((""+prezzo+"" == "") || (""+prezzo+"" == "undefined") || (""+prezzo+"" == "null"))
			prezzo = "0";
							
		decimali		= getDecimali(RSResults("decimali"));

if((j%2)==0){%><tr <%=col2%>><%}

%>                        
		<td align="center" class="testo Stile1"><div align="left" class="Stile3"><%=regione%></div></td>
		<td align="center" class="testo Stile1"><div align="left" class="Stile3"><%=nome_citta%></div></td>
		<td align="center" class="testo Stile1"><div align="center" class="Stile3"><%=zona%></div></td>
		<td align="center" class="testo Stile1"><div align="center" class="Stile3"><%=indirizzo%></div></td>
		<td align="center" class="testo Stile1"><div align="center" class="Stile3"><%=idstruttura%></div></td>
		<td align="center" class="testo Stile1"><div align="center" class="Stile3"><%=arredato%></div></td>
		<td align="center" class="testo Stile1"><div align="center" class="Stile3"><%=mq%></div></td>
		<td align="center" class="testo Stile1"><div align="center" class="Stile3"><%=prezzo%>,<%=decimali%></div></td>
        <td align="center" class="testo Stile3"><a href="dettaglio_abitazione.asp?idCasa=<%=idCasa%>" class="testo Stile1">[img]lente-mondo.png[/img]</td>
</tr>   
<%
	RSResults.MoveNext();
}
%>
<form name="scrolling" action="abitazioni.asp" Method="post">
<%//passo i parametri di cui ho bisogno alla pagina stessa%>

</form>

<%
RSResults.Close();
conn.Close();
//FINE VISUALIZZAZIONE%> 
    </TABLE>		
</TR>
</TABLE>


<p align="center">[img]index05_05.gif[/img]</p>
<p align="center"></p>
<p align="center"></p>
</body>
</html>

ovviamente è stata modificata anche i vari file data.MDB modificando la yabella Tab_comuni in Tab_citta, aggiunto il campo Regioni modificati i campi IDComuni e Comuni in IDCitta e Citta.....

eppure ci sto diventando pazzo perche mi riporta questo errore:

Microsoft OLE DB Provider for ODBC Drivers error '80040e37'

[Microsoft][ODBC Microsoft Access Driver] The Microsoft Jet database engine cannot find the input table or query 'Tab_citta'. Make sure it exists and that its name is spelled correctly.

/MODIFICA_SITO/pubblica/abitazioni/abitazioni.asp, line 86

qualcuno mi puoi aiutare a capire dove sbaglio???
grazie
max

**br1** · 12-06-2012, 23:07

E' detto qui:

cannot find the input table or query 'Tab_citta'. Make sure it exists and that its name is spelled correctly.

... non trova la tabella Tab_citta ... sei sicuro di non aver usato à nel nome?

**ravint** · 13-06-2012, 07:51

si si sono sicuro... gia controllato e ricontrollato...

il tutto è un po intricato perche alcuni file data.mdb si riescono ad aprire bene e quindi a modificare altri li devo aprire con una altro software che ripristina i file di access che comunque riesco a modificare... eppure mi appare sempre questo cavolo di errore...

**optime** · 13-06-2012, 08:48

Originariamente inviato da ravint
si si sono sicuro... gia controllato e ricontrollato...

il tutto è un po intricato perche alcuni file data.mdb si riescono ad aprire bene e quindi a modificare altri li devo aprire con una altro software che ripristina i file di access che comunque riesco a modificare... eppure mi appare sempre questo cavolo di errore...

non capisco: hai diversi file data.mdb? che vuol dire?

**ravint** · 13-06-2012, 09:55

si diciamo che il sistema è composto da molte cartelle in alcune di queste cartelle ci sono i file data.mdb che alcuni si replicano in altri non ho trovato le stesse informazioni ma in parte

quella più importante è la cartella pubblica, all'interna di questa ci sono tante altre cartelle e alcuni file tra cui un file data.mdb
le cartelle di cui sopra ci sono le solite : abitazioni, citta (che prima era comuni) admin, image, gestione, documenti ect ect poi ci sono altre cartelle chiamate _vti_pvt, _vti_cfg, _vti_log... etc etc all'interno di alcune di queste ci altri file data.cfg che non riesco ad aprire.

nella cartelle abitazione c'e' un file data.mdb che riesco ad aprire e modificare nella cartella cita un altro file data.mdb che riesco ad aprire e modificare... e cosi via all'interno di queste cartelle ci sono altre sotto cartelle con all'interno altri file data.mdb che non riesco ad aprire...

uff che vuoi che ti dica... è un delirio questo programma chi la fatto evidentemente si nutre di peperonata o impepata di cozze a colazione....

**optime** · 13-06-2012, 10:16

lascia perdere le cartelle _vti*, sono cartelle riservate il cui contenuto è gestito automaticamente

se l'errore è generato qui

citta_sql = "SELECT * FROM Tab_citta order by Citta asc" ;
citta_cmd = Server.CreateObject("ADODB.Recordset");
citta_cmd.Open( citta_sql, conn ,3,3);

devi controllare quale mdb viene aperto controllando l'apertura della connessione (conn)

**ravint** · 13-06-2012, 11:06

le line 86:

codice:

81 <%//carico le citta 
82 citta_sql = "SELECT * FROM Tab_citta order by Citta asc" ; 
83 citta_cmd = Server.CreateObject("ADODB.Recordset"); 
84 citta_cmd.Open( citta_sql, conn ,3,3); 
85
86 //carico le tipologie 
87 tipologie_sql = "SELECT * FROM Tab_tipologia" ; 
88 tipologie_cmd = Server.CreateObject("ADODB.Recordset"); 
89 tipologie_cmd.Open( tipologie_sql, conn ,3,3); %>

ma scusa conn ,3,3 cosa vorrebbe dire?? connessione???

**optime** · 13-06-2012, 11:20

conn è l'oggetto connessione. vedi dove e come lo apri

**ravint** · 13-06-2012, 11:30

all'interno della cartella pubblica c'e' la cartella include dove all'interno c'è il file connection.asp che contiene questo:

codice:

<% var conn = Server.CreateObject("ADODB.Connection") conn.Open("DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" + Server.MapPath("/wwwroot/data.mdb")); //variabili usate nel programma path = Server.MapPath("/wwwroot"); pathImg = Server.MapPath("wwwroot/images/"); %>

mi sono dimenticato di dirti che c'e' anche una cartella wwwroot che è la parte privata dove ci sono quasi le stesse cose c'e' nella cartella pubblica..

su quel file data.mdb dove punta, le tabelle le avevo già corrette...

Discussione: File a confronto

Strumenti discussione

Ricerca discussione

Visualizza

File a confronto

Permessi di invio