Utility
Home Messaggi odierni FAQ Ricerca avanzata Lo staff del forum Regolamento Utenti Archivio
Visualizzazione dei risultati da 1 a 3 su 3

Discussione: disabilitazione menù

  1. 03-10-2005, 16:40 #1
    kikysc
    kikysc non è in linea
    Utente di HTML.it L'avatar di kikysc
    Registrato dal
    Sep 2005
    Messaggi
    93
    Invia un messaggio tramite Yahoo a kikysc

    disabilitazione menù

    Ho un form (proposte.htm) che va a consultare un data base tramite l'inserimento di parametri di ricerca, da immettere a scelta tra i menù a discesa presenti sulla pagina.
    Tra questi è presente un menù a discesa "zona" in cui, se viene selezionato la voce "speciale", questo disabilita tutte gli altri menù ;

    Ad effettuare la ricerca c'è un file asp che procede alla consultazione del data base (risultato.asp) e un file di appoggio in html per il risultato della ricerca delle informazioni.

    Il mio problema è che andando a disabilitare i menù la ricerca va in errore e non visualizza il risultato.

    Vi inserisco qui di seguito i codici dei due file:

    la pagina asp:
    codice:
    <% 

Sub Scrivi_intestazione(int_cod_zona) 

Set rst_intestazioni = Server.CreateObject("ADODB.Recordset") 
rst_intestazioni.Open "Select Dettagli FROM affiliati Where codice_affiliato = " & int_cod_zona, conn 
Response.Write rst_intestazioni.Fields("Dettagli") 
rst_intestazioni.Close 

End Sub 

if Request.Form("zonarichiesta") = "-1" Then Response.Redirect("pag_err.htm") 

myDSN="PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};" 
myDSN=myDSN & "DBQ="&Server.MapPath("/data/medioweb.mdb")&";UID=administrator;PWD=;" 

strWhere = " offerte.off_motivazione = " & Request.Form("motivazione") 
if Request.Form("zonarichiesta") <> 0 then strWhere = strWhere & " AND offerte.off_zona = " & Request.Form("zonarichiesta") 
If Request.Form("zonarichiesta") <> 23 Then 'Se si è scelto "speciale" non si aggiungono altre condizioni 
if Request.Form("tipologia") <> 0 then strWhere = strWhere & " AND off_tipologia = " & Request.Form("tipologia") 
if Request.Form("locali") <> 0 then strWhere = strWhere & " AND off_num_locali = " & Request.Form("locali") 
if Request.Form("prezzo") <> 0 then 
Select case Request.Form("prezzo") 
Case 1 
strWhere = strWhere & " AND (off_prezzo > 0 AND off_prezzo <= 40000) " 
Case 2 
strWhere = strWhere & " AND (off_prezzo > 40000 AND off_prezzo <= 60000) " 
Case 3 
strWhere = strWhere & " AND (off_prezzo > 60000 AND off_prezzo <= 80000) " 
Case 4 
strWhere = strWhere & " AND (off_prezzo > 80000 AND off_prezzo <= 100000) " 
Case 5 
strWhere = strWhere & " AND (off_prezzo > 100000 AND off_prezzo <= 200000) " 
End Select 
End If 
End If 

Set conn = Server.CreateObject("ADODB.Connection") 
Set rst = Server.CreateObject("ADODB.Recordset") 
conn.Open myDSN 

rst.Open "SELECT offerte.off_id, offerte.off_riferimento, offerte.off_zona, affiliati.[Ragione Sociale], motivazioni.mot_descrizione As Motivazione, tipologie.tip_descrizione As Tipologia, offerte.off_num_locali, offerte.off_descrizione, offerte.off_prezzo, offerte.off_img FROM ((offerte INNER JOIN affiliati ON offerte.off_zona = affiliati.codice_affiliato) INNER JOIN motivazioni ON offerte.off_motivazione = motivazioni.mot_id) INNER JOIN tipologie ON offerte.off_tipologia = tipologie.tip_id "_ 
& " WHERE " & strWhere & " ORDER BY offerte.off_zona", conn 



%> 


<html> 
<head> 
 
<title>Risultato della ricerca</title> 
 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> 
<script language="JavaScript"> 
<!-- 
function MM_openBrWindow(theURL,winName,features)
{ //v2.0 
window.open(theURL,winName,features); 
} 
//--> 
</script> 
</head> 
<% zona_precedente = 0 %> 
<body bgcolor="#FFFFFF" text="#000000" link="#000099" vlink="#666666" alink="#FF0000"> 
<% If rst.EOF Then %> 
<div align="center"> 


 </P> 
<font face="Verdana, Arial, Helvetica, sans-serif" size=2> 
<P align="center">Siamo spiacenti, ma nel nostro database non ci sono offerte che soddisfano la tua richiesta</P> 
<P align="center">Clicca qui richiedere il tuo immobile</P> </font> 
<% 
Else %> 
<% 
While not rst.EOF 
if zona_precedente <> rst.Fields("off_zona") Then 
if zona_precedente <> 0 then Response.Write ("</table>

 </P>") 'Chiude la tabella nel caso in cui non sia la prima zona visualizzata 
zona_precedente = rst.Fields("off_zona") 
%> 
<table width="452" border="0" cellpadding="0" align="center"> 
<tr> 
<td width="204" valign="top"><div align="right">[img]IMG/logo1.gif[/img]
 
<font size="1"><font face="Verdana, Arial, Helvetica, sans-serif" color="#000099">FRANCHISING 
NETWORK</font></font></div></td> 
<td width="242" valign="top"><% Call Scrivi_intestazione(zona_precedente) %></td> 
</tr> 
</table> 

 

 
<div align="center"> 
<table width="620" border="0" cellspacing="2" cellpadding="0" bgcolor="#CCCCCC"> 
<tr> 
<td bgcolor="#00008A" align="center" valign="middle" width="106"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#FFFFFF">ZONA</font></td> 
<td bgcolor="#00008A" valign="middle" align="center" width="104"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#FFFFFF">TIPOLOGIA</font></td> 
<td bgcolor="#00008A" align="center" valign="middle" width="271"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#FFFFFF">DESCRIZIONE</font></td> 
<td bgcolor="#00008A" valign="middle" align="center" width="61"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000000"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#FFFFFF">PREZZO</font></font></td> 
<td bgcolor="#00008A" align="center" valign="middle" width="32"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000000"><font color="#FFFFFF">RIF</font></font></td> 
<td bgcolor="#00008A" valign="middle" align="center" width="32"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#FFFFFF">FOTO</font></td> 
</tr> 
<% 
End If 
%> 
<tr> 
<td bgcolor="#EDF5FE" align="center" valign="middle" width="106"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000000"><% = rst.Fields("Ragione Sociale") %></font></td> 
<td bgcolor="#EDF5FE" align="center" valign="middle" width="104"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000000"><% = rst.Fields("Tipologia") %></font></td> 
<td bgcolor="#EDF5FE" valign="middle" align="center" width="271"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000000"><% = rst.Fields("off_descrizione") %></font></td> 
<td bgcolor="#EDF5FE" valign="middle" align="center" width="61"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000000"><% = rst.Fields("off_prezzo") %></font></td> 
<td bgcolor="#EDF5FE" width="32" valign="middle" align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000000"><% = rst.Fields("off_riferimento") %></font></td> 
<td bgcolor="#EDF5FE" width="32" valign="middle" align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000000"> 
<% if rst.Fields("off_img") = "" Or IsNull(rst.Fields("off_img")) Then 
Response.Write ("-") 
Else 
%> 
<a href="java script:;" onClick="MM_openBrWindow('window.asp?<% = rst.Fields("off_id") %> ','Mediocasa','resizable=yes,width=510,h
eight=380')">[img]IMG/camer005.gif[/img]</a></td> 
<% 
End If %></font></td> 
</tr> 
<% rst.MoveNext 
Wend %> 
</table> 
<% End If %> 


 </p> 
<hr noshade size="1" width="620"> 
<font color="#000099"><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href="proposte.htm">NUOVA 
RICERCA</a></font></font> 


 </p> 
</div> 
</body> 
</html>
    Rispondi quotando Rispondi quotando
  2. 03-10-2005, 16:42 #2
    kikysc
    kikysc non è in linea
    Utente di HTML.it L'avatar di kikysc
    Registrato dal
    Sep 2005
    Messaggi
    93
    Invia un messaggio tramite Yahoo a kikysc
    e la pagina HTML:

    codice:
    <html> 
<head> 
<title>Proposte Immobiliari</title> 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> 
<STYLE type="text/css"> A:link, A:visited {text-decoration:none;} A:hover {text-decoration:underline; color;#6699CC;)</STYLE> 
<script language="JavaScript"> 
<!-- 
function MM_preloadImages() { //v3.0 
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array(); 
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++) 
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}} 
} 

function MM_findObj(n, d) { //v4.0 
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) { 
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);} 
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n]; 
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document); 
if(!x && document.getElementById) x=document.getElementById(n); return x; 
} 

function MM_nbGroup(event, grpName) { //v3.0 
var i,img,nbArr,args=MM_nbGroup.arguments; 
if (event == "init" && args.length > 2) { 
if ((img = MM_findObj(args[2])) != null && !img.MM_init) { 
img.MM_init = true; img.MM_up = args[3]; img.MM_dn = img.src; 
if ((nbArr = document[grpName]) == null) nbArr = document[grpName] = new Array(); 
nbArr[nbArr.length] = img; 
for (i=4; i < args.length-1; i+=2) if ((img = MM_findObj(args[i])) != null) { 
if (!img.MM_up) img.MM_up = img.src; 
img.src = img.MM_dn = args[i+1]; 
nbArr[nbArr.length] = img; 
} } 
} else if (event == "over") { 
document.MM_nbOver = nbArr = new Array(); 
for (i=1; i < args.length-1; i+=3) if ((img = MM_findObj(args[i])) != null) { 
if (!img.MM_up) img.MM_up = img.src; 
img.src = (img.MM_dn && args[i+2]) ? args[i+2] : args[i+1]; 
nbArr[nbArr.length] = img; 
} 
} else if (event == "out" ) { 
for (i=0; i < document.MM_nbOver.length; i++) { 
img = document.MM_nbOver[i]; img.src = (img.MM_dn) ? img.MM_dn : img.MM_up; } 
} else if (event == "down") { 
if ((nbArr = document[grpName]) != null) 
for (i=0; i < nbArr.length; i++) { img=nbArr[i]; img.src = img.MM_up; img.MM_dn = 0; } 
document[grpName] = nbArr = new Array(); 
for (i=2; i < args.length-1; i+=2) if ((img = MM_findObj(args[i])) != null) { 
if (!img.MM_up) img.MM_up = img.src; 
img.src = img.MM_dn = args[i+1]; 
nbArr[nbArr.length] = img; 
} } 
} 

function MM_displayStatusMsg(msgStr) { //v1.0 
status=msgStr; 
document.MM_returnValue = true; 
} 
//--> 
</script> 
</head> 
 
<form name="form1" method="post" action="risultato.asp"> 
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="Cognome" color="#000000"><font size="1">Seleziona 
la motivazione *
 

 
</font></font> 
<select name="motivazione" size="1"> 
<option value="1">acquisto</option> 
<option value="2">affitto</option> 
</select> 
<font face="Verdana, Arial, Helvetica, sans-serif" size="Cognome" color="#000000"> 
</font><font face="Verdana, Arial, Helvetica, sans-serif" size="Cognome" color="#000000"><font face="Verdana, Arial, Helvetica, sans-serif" size="Cognome" color="#000000"><font face="Verdana, Arial, Helvetica, sans-serif" size="Cognome" color="#000000"><font face="Verdana, Arial, Helvetica, sans-serif" size="Cognome" color="#000000"><font face="Verdana, Arial, Helvetica, sans-serif" size="Cognome" color="#000000"><font size="1"></font></font></font></font></font> 
</font> </div></td> 
<td></td> 
</tr> 
<tr> 
<td height="100"></td> 
<td valign="top" bgcolor="#EDF5FE"> 
</font> <div align="right"> 
<div align="left"> 
<div align="center"> 
<div align="left"> 
<div align="center"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">Zona 
desiderata
 

 
</font> 
<script> 
function ZonaChange(selZona) { 
var selValue = selZona.options[selZona.selectedIndex].value; 
if(selValue != -1) { 
if (selValue == 23) { 
selZona.form.motivazione.disabled = true; 
selZona.form.tipologia.disabled = true; 
selZona.form.locali.disabled = true; 
selZona.form.prezzo.disabled = true; 
} 
else { 
selZona.form.motivazione.disabled = false; 
selZona.form.tipologia.disabled = false; 
selZona.form.locali.disabled = false; 
selZona.form.prezzo.disabled = false; 
} 
} 
} 
</script> 
<select name="zonarichiesta" size="1" onchange="ZonaChange(this);"> 
<option value="0">qualsiasi zona</option> 
<option value="-1">-------- LAZIO ----------</option> 
<option value="9">giardinetti</option> 
<option value="16">colleprenestino</option> 
<option value="4">torre angela/torrenova</option> 
<option value="3">finocchio</option> 
<option value="15">borghesiana</option> 
<option value="6">castelverde/lunghezza</option> 
<option value="21">gianicolense</option> 
<option value="10">villanova di guidonia</option> 
<option value="14">frascati</option> 
<option value="-1">-------- CAMPANIA----------</option> 
<option value="20">battipaglia 1</option> 
<option value="-1">-------- TOSCANA ----------</option> 
<option value="13">prato est</option> 
<option value="19">prato ovest</option> 
<option value="-1">-------- PUGLIA ----------</option> 
<option value="18">foggia</option> 
<option value="-1">-------- VENETO ----------</option> 
<option value="22">treviso</option> 
<option value="-1">-------- SPECIALE --------</option> 
<option value="23">speciale turistico</option> 
</select> 
</div> 
</div> 
</div> 
</div> 
</div> 
</td> 
<td valign="top" bgcolor="#EDF5FE"> <div align="center"></div> 
<div align="left"></div> 
<div align="center"> 
<div align="center"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">Tipologia 
Immobile </font><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">
 

 
</font> 
<select name="tipologia" size="1"> 
<option value="1">appartamento</option> 
<option value="2">indipendente</option> 
<option value="3">rustico</option> 
<option value="4">villa</option> 
<option value="5">terreno</option> 
<option value="6">negozio</option> 
<option value="7">box</option> 
</select> 
</div> 

 
</div></td> 
<td valign="top" bgcolor="#EDF5FE"> <div align="center"> <font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">Num. 
Locali 
 

 
</font> 
<select name="locali" size="1"> 
<option value="0">Qualsiasi</option> 
<option value="1">1</option> 
<option value="2">2</option> 
<option value="3">3</option> 
<option value="4">4</option> 
<option value="5">5</option> 
</select> 

 
</div></td> 
<td valign="top" bgcolor="#EDF5FE"> <div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000000">Fascia 
prezzo *
 

 
</font> 
<select name="prezzo" size="1"> 
<option value="1">da 0 a 40.000</option> 
<option value="2">da 41.000 a 60.000</option> 
<option value="3">da 61.000 a 80.000</option> 
<option value="4">da 81.000 a 100.000</option> 
<option value="5">da 101.000 a 200.000</option> 
<option value="0" selected>tutte le fasce</option> 
</select> 
</div></td> 
<td></td> 
</tr> 
<tr> 
<td height="88"></td> 
<td colspan="4" valign="top" bgcolor="#EDF5FE"> 
<div align="center"> 
<input type="submit" name="Submit" value="Trova"> 

 

 
<font face="Verdana, Arial, Helvetica, sans-serif" size="Cognome" color="#000000"><font size="1">* 
I campi contrassegnati con l'asterisco sono obbligatori</font> 
 
<font face="Verdana, Arial, Helvetica, sans-serif" size="Cognome" color="#000000"><font size="1">Il 
nostro portafoglio immobiliare è in continua crescita con 
il crescere del numero dei nostri punti vendita</font>
 

 
<font face="Verdana, Arial, Helvetica, sans-serif" size="Cognome" color="#000000"><font size="1"><font size="2"> 
<marquee scrollamount=4> 
Lascia la tua richiesta 
</marquee> 
</font></font></font></font></font></div><font face="Verdana, Arial, Helvetica, sans-serif" size="Cognome" color="#000000"><font face="Verdana, Arial, Helvetica, sans-serif" size="Cognome" color="#000000"><font face="Verdana, Arial, Helvetica, sans-serif" size="Cognome" color="#000000"> 
</form></font></font></font></td> 
<td></td> 
</tr> 
<tr> 
<td height="5"></td> 
<td></td> 
<td></td> 
<td></td> 
<td></td> 
<td></td> 
</tr> 
</table></td> 
</tr> 
<tr> 
<td height="21"></td> 
</tr> 
</table> 
<table width="683" border="0" cellpadding="0" cellspacing="0" align="center" bgcolor="#FFFFFF"> 
<tr> 
<td valign="top" height="19" colspan="3"> <hr size="1" noshade align="center"> 
</td> 
</tr> 
<tr> 
<td valign="top" height="48" colspan="3"> <div align="center"> 
<object classid="clsid27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="683" height="48"> 
<param name=movie value="IMG/agenzie.swf"> 
<param name=quality value=high> 
<embed src="IMG/agenzie.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="683" height="48"> 
</embed> </object> 
</div></td> 
</tr> 
<tr> 
<td valign="top" height="19" colspan="3"> <hr size="1" width="683" noshade> 
</td> 
</tr> 
<tr> 
<td width="310" height="51"></td> 
<td width="63" valign="top"> <div align="center">[img]IMG/loghino.jpg[/img]<font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000099">
 
HOME</font></div></td> 
<td width="310"></td> 
</tr> 
</table> 
</body> 
</html>
    Rispondi quotando Rispondi quotando
  3. 04-10-2005, 13:36 #3
    kikysc
    kikysc non è in linea
    Utente di HTML.it L'avatar di kikysc
    Registrato dal
    Sep 2005
    Messaggi
    93
    Invia un messaggio tramite Yahoo a kikysc
    mi hanno detto che il mio problema è il file asp...ma non capisco quale istruzione vada cambiata per permettere al data base di essere consultato!
    Rispondi quotando Rispondi quotando
« Discussione precedente | Prossima discussione »

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  

Regole del Forum

Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.