Bonjour.
Je veux faire un ajout sur mon site web. Tout d'abord voici la page concernée. Allez sur
http://www.warmupf-1.com / Section Essais Privés, n'importe quelle année et n'importe quel mois. Vous allez y retrouver les colonnes suivantes :
Date
Lieu des essais
Meilleur temps
Photos
Comme vous pouvez le voir, la colonne photo est entièrement vide.
Dans ma base de données Access, dans la table qui spécifie la date des essais, j'ai ajouté une colonne qui contient un checkbox (Oui/Non). La table s'appelle Essais et la colonne s'appelle Photos.
Voici ce que je veux faire...
Lorsque le checkbox est coché pour un certain essai, une petite image .GIF doit apparaitre dans la colonne Photo de mon site. Mon image s'appelle photo.gif. Ce sera toujours la même image utilisée, donc inutile de mettre le nom de l'image dans la base de données.
Je suis pas certain du code à utiliser.
Voici le code ASP de la page web concernée :
<html>
<head>
<title>Warmup Formula One</title>
<script>
function hidestatus(){
window.status=''
return true
}
if (document.layers)
document.captureEvents(Event.MOUSEOVER | Event.MOUSEOUT)
document.onmouseover=hidestatus
document.onmouseout=hidestatus
</script>
<META HTTP-EQUIV="Pragma" CONTENT="no-cache">
</head>
<STYLE><!-- A:link, A:visited, A:active { text-decoration: none }A:link { color: blue }A:visited { color: blue }A:hover { color: green }A:active { color: green }//--></STYLE>
<body background="images/bg.gif" style="font-size:8pt;">
<%
dim cn, rs
set cn = server.CreateObject("ADODB.Connection")
cn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(".") & "\xxxx.mdb;Persist Security Info=False"
Dim Mois(12)
Mois(1) = "Janvier"
Mois(2) = "Février"
Mois(3) = "Mars"
Mois(4) = "Avril"
Mois(5) = "Mai"
Mois(6) = "Juin"
Mois(7) = "Juillet"
Mois(8) = "Août"
Mois(9) = "Septembre"
Mois(10) = "Octobre"
Mois(11) = "Novembre"
Mois(12) = "Décembre"
Dim SaisonEnCours
set rs = cn.Execute("SELECT Année FROM EssaisSaisons Where ID=0" & Request("Saison"))
if not rs.EOF Then
SaisonEnCours = rs("Année")
End If
rs.close
sSql = "SELECT DISTINCT Essais.idSaisonEssais, Month([DateEssai]) AS MoisEssai, Year([dateessai]) AS AnneeEssai " & _
"FROM Essais " & _
"WHERE Essais.idSaisonEssais=0" & Request("Saison") & " ORDER BY Year([dateessai]), Month([DateEssai])"
set rs = cn.Execute(sSql)
%>
<font size="8" color="red"><b>E</font><font size="5"color="b9b8b8">SSAIS PRIVÉS <%=SaisonEnCours%></b></font>
<br><br><br>
<center>
<Table border=0 Width="450" id="table_wait" style="display:block;">
<tr>
<td>
<font size="4"color="b9b8b8">Chargement des données en cours, veuillez patienter.</FONT>
</td>
</tr>
</Table>
<Table border=0 Width="450" id="table_menu" style="display:none;">
<%
i = 1
do Until rs.EOF
if i = 0 Then
%>
<tr>
<%
End If
%>
<td style="font-size:10pt; font-weight:bold;" width="150"><center>
<a href="javascript:void(0);" onclick="showMois('<%=Mois(rs("MoisEssai"))%><%=rs("AnneeEssai")%>')"><%=Mois(rs("MoisEssai"))%> <%=rs("AnneeEssai")%></a></center>
</td>
<%
if i > 2 Then
%>
</tr>
<%
i = 0
End If
i = i + 1
rs.MoveNext
Loop
%>
</tr>
</Table></center>
<%
rs.Close
%>
<br>
<p><center><table>
<div id="FirstEmptyDiv">
<%
sSql = "SELECT DISTINCT EssaisCircuits.Circuit, Essais.id, Essais.DateEssai, Essais.idSaisonEssais, EssaisCircuits.Pays, EssaisResultats.Temps, EssaisPilotes.Nom, EssaisEcuries.Ecurie " & _
"FROM (EssaisEcuriePilote INNER JOIN ((EssaisResultats INNER JOIN (Essais INNER JOIN EssaisCircuits ON Essais.idCircuit = EssaisCircuits.id) ON EssaisResultats.idEssais = Essais.id) INNER JOIN EssaisPilotes ON EssaisResultats.idPiloteEssais = EssaisPilotes.id) ON (EssaisEcuriePilote.idPilote = EssaisPilotes.id) AND (EssaisEcuriePilote.idSaison = Essais.idSaisonEssais)) INNER JOIN EssaisEcuries ON EssaisEcuriePilote.idEcurie = EssaisEcuries.id " & _
"WHERE (((Essais.idSaisonEssais)=" & Request("Saison") & ") AND ((EssaisResultats.Temps)=(SELECT Min(EssaisResultats.Temps) AS MinDeTemps " & _
"FROM EssaisResultats GROUP BY EssaisResultats.idEssais HAVING EssaisResultats.idEssais=Essais.id))) " & _
"ORDER BY Essais.DateEssai DESC"
set rs = cn.Execute(sSql)
'response.write(sSQL)
LastMois = ""
LastPrive = ""
Do Until rs.EOF
if LastMois <> Month(rs("DateEssai")) Then
LastMois = Month(rs("DateEssai"))
%>
</table></center></p>
</div>
<div id="<%=Mois(Month(rs("DateEssai")))%><%=Year(rs("DateEssai"))%>" style="display:none;">
<br>
<center><font size="2" color="white"><b><%=Mois(Month(rs("DateEssai")))%> <%=Year(rs("DateEssai"))%></b></center></p></a>
<p><center><table width="550" border="1" cellspacing="0" cellpadding="0">
<tr>
<td width="40" bgcolor="#b9b8b8"><center><font size="2"><b>Date</b></center></TD>
<td width="155" bgcolor="#b9b8b8"><center><font size="2"><b> Lieu des Essais</b></center></TD>
<td width="305" bgcolor="#b9b8b8" colspan=2><center><font size="2"><b> Meilleur Temps</b></center></TD>
<td width="50" bgcolor="#b9b8b8"><center><font size="2"><b>
Photos</b></center></TD>
</tr>
<%
End If
%>
</td>
</tr>
<tr>
<td bgcolor="#ffffff"><center><font size="2"> <b>
<a href="prives.asp?Essai=<%=rs("Id")%>&DateEssai=<%=rs("DateEssai")%>"><%=Day(rs("DateEssai"))%></a></b></TD>
<td bgcolor="#ffffff"><font size="2"><b> <%=rs("Circuit")%>, <%=rs("Pays")%></b></td>
<td bgcolor="#ffffff"><font size="2"><b> <%=rs("Nom")%> (<%=rs("Ecurie")%>)</b></font></td>
<td bgcolor="#ffffff"><font size="2"><b> <%=rs("Temps")%></b></font>
<td bgcolor="#ffffff"><font size="2"><b>
<%=rs("Photo")%></b></font>
</td>
<%
rs.MoveNext
Loop
rs.Close
set rs = Nothing
cn.Close
set cn=Nothing
%>
</tr>
</Table>
<br>
<br>
<br>
<br>
<hr>
</body>
</html>
<SCRIPT>
var oldIdMois = "";
function showMois(idMois)
{
if (document.getElementById(idMois) == null) return;
if (oldIdMois != "") document.getElementById(oldIdMois).style.display = 'none';
oldIdMois = idMois;
document.getElementById(idMois).style.display = 'block';
SetCookie("EssaisDisplayList", idMois);
}
function SetCookie(sName, sValue)
{
myDate = new Date();
myDate.setMonth(myDate.getMonth() + 1);
document.cookie = sName + "=" + escape(sValue) + "; expires=" + myDate.toGMTString();
}
function GetCookie(sName)
{
// cookies are separated by semicolons
var aCookie = document.cookie.split("; ");
for (var i=0; i < aCookie.length; i++)
{
// a name/value pair (a crumb) is separated by an equal sign
var aCrumb = aCookie[i].split("=");
if (sName == aCrumb[0])
return unescape(aCrumb[1]);
}
// a cookie with the requested name does not exist
return null;
}
if (GetCookie("EssaisDisplayList") != null)
{
showMois(GetCookie("EssaisDisplayList"))
}
document.getElementById("table_wait").style.display = "none";
document.getElementById("table_menu").style.display = "block";
</SCRIPT>
Excusez la mise en page du code....
Merci de votre aide.
D'autres questions suiveront plus tard suite à vos réponses.
Connexion
Inscription
FAQ
Rechercher
