Escludere giorno settimana

[elbaforum]

Ciao a tutti,
ho realizzato la seguente pagina (vedi) con filtro della data.
Ho i campi della tabella con i nomi dei giorni della settimana impostati su si/no ,
quando un utente filtra la data vorrei evitare di mostrargli quel dato se quel giorno è lunedi,
ma non trovo il modo di filtrare questo dato. Grazie in anticipo, saluti e buon anno a tutti.

[optime]

non ho capito, fa' un esempio, grazie

[elbaforum]

Ciao Optime, cerco di spiegarmi meglio,
nella pagina indicata vengono visualizzati tutti gli orari salvati in db,
quando scelgono una data qualsiasi,
vengono mostrati solo gli orari di quella data, però avendo salvato nella tabella anche i giorni della settimana che non si effettua la corsa, se richiamo l'orario di una domenica, dove escludo la domenica non deve apparire.

Se vedi la pagina capisci meglio.

[optime]

non è che tu abbia il dono della chiarezza ma forse ho capito. il menu a tendina lo devi caricare in base al contenuto del db. quindi fai una SELECT DISTINCT con i giorni della settimana, poi carichi la tendina.

that easy!

[elbaforum]

Si in effetti,

la tendina è già funzionante, devo filtrare i vari giorni della settimana vedi il codice seguente

<tr id="nave<%=naveRec("traghettiid")%>"> 
<td><%=naveRec("datadal")%> - <%=naveRec("dataal")%></td> 
<td><%=formatDateTime(naveRec("orapartenza"), vbShortTime)%> - <%=formatDateTime((naveRec("orapartenza") + naveRec("durata")), vbShortTime)%></td>
<td><%=formatDateTime(naveRec("durata"), vbShortTime)%></td> 
<td><%=naveRec("portopartenza")%> - <%=naveRec("portoarrivo")%></td> 
<td><% if naveRec("lunedi") = false then%>Non si effettua il luned&igrave;
<%else%><%end if%> 
<% if naveRec("martedi") = false then%>Non si effettua il marted&igrave;
<%else%><%end if%> 
<% if naveRec("mercoledi") = false then%>Non si effettua il mercoled&igrave;
<%else%><%end if%>
<% if naveRec("giovedi") = false then%>Non si effettua il gioved&igrave;
<%else%><%end if%> 
<% if naveRec("venerdi") = false then%>Non si effettua il venerd&igrave;
<%else%><%end if%> 
<% if naveRec("sabato") = false then%>Non si effettua il sabato
<%else%><%end if%> 
<% if naveRec("domenica") = false then%>Non si effettua la domenica
<%else%><%end if%></td> <td><% if naveRec("linkid") = "498" then%>">Prenota<%end if%></td> </tr><%

[optime]

spezza il codice su più righe, così è illeggibile

[elbaforum]

in base ai navrec("lunedi") ecc..
devo evitare di mostrare la partenza solo quando viene fatta la query sulla data singola se il lunedi è su false.

[optime]

ok, tutto quel codice lo incapsuli in una IF fatta così

Giorno=....ricavi il giorno della settimana, magari già dalla tendina
IF  navrec(Giorno)=True Then
' qui metti il codice che mostra la riga
ELSE
' salta la riga
END IF

[elbaforum]

Si ma me lo ripete per sette volte
vedi il cod completo:

Set naveRec = Server.CreateObject("ADODB.RecordSet")
if giorno = "" then
naveSQL = "SELECT * FROM traghetti WHERE linkid = " & linkrec("linkid") & " ORDER BY orapartenza ASC;"
else
naveSQL = "SELECT * FROM traghetti WHERE linkid = " & linkrec("linkid") & " and datadal <= #" & giornosql &"# and dataal >= #" & giornosql &"# ORDER BY orapartenza ASC;"
end if

naveRec.Open naveSQL, objConn, 3, 3, 1
If not naveRec.BOF then
Response.Write ("<table class=""bordo space testo"" id=""nave"&linkrec("linkid")&"""><tr>"&vbnewline)
Response.Write ("<td style=""width:150px;"">Orario valido dal - al")
Response.Write ("<td style=""width:120px;"">Partenza - Arrivo</td>")
Response.Write ("<td style=""width:60px;"">Durata</td>")
Response.Write ("<td style=""width:130px;"">Tratta</td>")
Response.Write ("<td style=""width:160px;"">Note</td>")
Response.Write ("<td style=""width:60px;"">Prenota</td>")
Response.Write ("</tr>"&vbnewline)
else
if not giorno = "" then
Response.Write ("<p style=""font-size:10pt"">E' possibile che nella data scelta non siano disponibili partenze o che non siano stati pubblicati gli orari per questa compagnia di traghetti</p>"&vbnewline)
'response.write navesql
end if
End If
i=0
Do While Not naveRec.EOF
NoResults = False
if pagina = "principale" then
%><tr id="nave<%=naveRec("traghettiid")%>">
<td><%=naveRec("datadal")%> - <%=naveRec("dataal")%></td>
<td><%=formatDateTime(naveRec("orapartenza"), vbShortTime)%> - <%=formatDateTime((naveRec("orapartenza") + naveRec("durata")), vbShortTime)%></td>
<td><%=formatDateTime(naveRec("durata"), vbShortTime)%></td>
<td><%=naveRec("portopartenza")%> - <%=naveRec("portoarrivo")%></td>
<td><% if naveRec("lunedi") = false then%>Non si effettua il luned&igrave;
<%else%><%end if%>
<% if naveRec("martedi") = false then%>Non si effettua il marted&igrave;
<%else%><%end if%>
<% if naveRec("mercoledi") = false then%>Non si effettua il mercoled&igrave;
<%else%><%end if%>
<% if naveRec("giovedi") = false then%>Non si effettua il gioved&igrave;
<%else%><%end if%>
<% if naveRec("venerdi") = false then%>Non si effettua il venerd&igrave;
<%else%><%end if%>
<% if naveRec("sabato") = false then%>Non si effettua il sabato
<%else%><%end if%>
<% if naveRec("domenica") = false then%>Non si effettua la domenica
<%else%><%end if%></td>
<td><% if naveRec("linkid") = "498" then%>">Prenota<%end if%></td>
</tr><% 
i=i+1
naveRec.MoveNext
Loop
If not naveRec.BOF then
Response.Write ("</table>" & vbnewline)
End If
naveRec.close
end if

'/traghetti

Response.Write ("</div>" & vbNewline )%><%
	linkRec.MoveNext
	linkcount = linkcount + 1
	Wend
	end if
	linkRec.Close
	Response.Write "
" & pgHTML
%>

[elbaforum]

Stavo pensando
ricavo il giorno della settimana con Response.Write(WeekDayName(WeekDay(giorno),false))
e lo aggiungo alla query
o è meglio if then?