Trucsweb.com

Forum de discussion

 Forum « Programmation Javascript » (archives)

Re: Date

Envoyé: 10 octobre 2002, 8h40 par samlon


J'ai réussi !! mais si dans ma table il y a plusieurs absences a signaler, là ca ne marche pas car j'ai pas fait la boucle <%Rs.MoveFirst do while not Rs.eof%>
pour lire toutes les fiches.
Mais ca je sais pas comment l'insérer pour que ca marche.

voila mon code:

Dim njTemp

For n = 1 to nbrCase
njTemp = n - nDateDebut+1
if nNomJour = 1 then response.write "<tr>"

if (njTemp) = nJour then
response.write "<a href="""&nURL&"?date="&DateSerial(nAnnee, nMois, njTemp)&"""><td align=""center"" valign=""middle"" class=""calJourSel"" style=""border: 1 solid #000000"" width=""110"" height=""45"">"
else if month(dateDebut) <> month(dateFin) then
if (njTemp) >= day(dateDebut) AND (njTemp) <= day(nDate2) AND month(nDate) = month(dateDebut) OR (njTemp) <= day(dateFin) AND (njTemp) >= day(nDate1) AND month(nDate) = month(dateFin) then
response.write "<a href="""&nURL&"?date="&DateSerial(nAnnee, nMois, njTemp)&"""><td align=""center"" valign=""middle"" class=""absence"" style=""border: 1 solid #000000"" width=""110"" height=""45"">"
else
response.write "<a href="""&nURL&"?date="&DateSerial(nAnnee, nMois, njTemp)&"""><td align=""center"" valign=""middle"" class=""calJour"" style=""border: 1 solid #000000"" width=""110"" height=""45"">"
end if
else
if (njTemp) >= day(dateDebut) AND (njTemp) <= day(dateFin) AND month(ndate) = month(dateDebut) then
response.write "<a href="""&nURL&"?date="&DateSerial(nAnnee, nMois, njTemp)&"""><td align=""center"" valign=""middle"" class=""absence"" style=""border: 1 solid #000000"" width=""110"" height=""45"">"
else
response.write "<a href="""&nURL&"?date="&DateSerial(nAnnee, nMois, njTemp)&"""><td align=""center"" valign=""middle"" class=""calJour"" style=""border: 1 solid #000000"" width=""110"" height=""45"">"
end if
end if
end if
if n < (nDateDebut) or n > (nJour2+nDateDebut-1) then
response.write " "
end if

response.write "</td>"
if nNomJour = 7 then
response.write "</tr>"

end if

if nNomJour = 7 then nNomJour = 1 else nNomJour = nNomJour + 1 end if

next
%>

merci de ton aide


Réponses

 sp spRe: Date samlon10/10/2002
 sp spRe: Date Oznog10/10/2002
 sp spRe: Date Oznog10/10/2002
 sp spRe: Date samlon11/10/2002
 sp spVa voir ICI samlon11/10/2002
 sp spRe: Va voir ICI Oznog11/10/2002
 sp spRe: Va voir ICI Oznog11/10/2002
Aucun médias sociaux
X

Trucsweb.com Connexion

Connexion

X

Trucsweb.com Mot de passe perdu

Connexion

X

Trucsweb.com Conditions générales

Conditions

Responsabilité

La responsabilité des Trucsweb.com ne pourra être engagée en cas de faits indépendants de sa volonté. Les informations mises à disposition sur ce site le sont uniquement à titre purement informatif et ne sauraient constituer en aucun cas un conseil ou une recommandation de quelque nature que ce soit.

Aucun contrôle n'est exercé sur les références et ressources externes, l'utilisateur reconnaît que les Trucsweb.com n'assume aucune responsabilité relative à la mise à disposition de ces ressources, et ne peut être tenue responsable quant à leur contenu.

Droit applicable et juridiction compétente

Les règles en matière de droit, applicables aux contenus et aux transmissions de données sur et autour du site, sont déterminées par la loi canadienne. En cas de litige, n'ayant pu faire l'objet d'un accord à l'amiable, seuls les tribunaux canadien sont compétents.

X

Trucsweb.com Trucsweb

X

Trucsweb.com Glossaire

X

Trucsweb.com Trucsweb

X

Trucsweb.com Trucsweb

Conditions

Aucun message!

Merci.

X
Aucun message!
X

Trucsweb.com Créer un compte

Créer un compte

.
@