Quelque commandes en ASP??
mryassine
-
mryassine -
mryassine -
bonjour tous le monde.
ben voila mon prob :
je suis entrain de faire menter un site en ASP et il me faut quelques commandes dont j'en ai besoin :
* une commande qui permet de calculer la differance entre deux dates (et notamment les heures inclus)
ex : je veux calculer la durée faites entre la date ou on a reçu un message et la date où on l'a lu.
* une commande qui me permet de garder le saut de ligne rempli par un internaute dans un formulaire tel que dans la cas present.
merci d'avance chere internaute et bonne navigation
ben voila mon prob :
je suis entrain de faire menter un site en ASP et il me faut quelques commandes dont j'en ai besoin :
* une commande qui permet de calculer la differance entre deux dates (et notamment les heures inclus)
ex : je veux calculer la durée faites entre la date ou on a reçu un message et la date où on l'a lu.
* une commande qui me permet de garder le saut de ligne rempli par un internaute dans un formulaire tel que dans la cas present.
merci d'avance chere internaute et bonne navigation
1 réponse
-
Voila un site ASP a visiter
http://www.aspsmart.com/
en plus d'un code qui peut t'aider:
<script language="vbscript" runat="server">
Function CountDownTo(CountDownDate, ReturnFormat)
'**
'** Description:
'** This function countdown to a specific event/datetime from current datetime(now)
'**
'** Input Parameter:
'** CountDownDate: A value represents datetime to be countdown
'** ReturnFormat: "long" (more specific) or none (no input)
'**
'** Return Value:
'** if current datetime >= CountDownDate then return some message (you can change it!) and no countdown occurs
'**
'** if ReturnFormat input with string "long" then the return value will be displayed like this:
'** xx days xx hours xx minutes xx seconds
'**
'** if no input for ReturnFormat, the return value depends on this conditon:
'** if days > 0 : xx days xx hours
'** if days = 0 and hours > 0 : xx hours xx minutes
'** if days = 0 and hours = 0 : xx minutes xx seconds
'**
dim theDate, MyMessage, Count, DaysLeft, HoursLeft, MinutesLeft, SecondsLeft
CountdownDate = CDate(CountDownDate)
theDate = Now() 'You may also want to change it to a specific date/time
'Message displayed when current datetime over CountDownDate
MyMessage = "The game is over !!! :)" 'Change this text to your need.
If (theDate >= CountdownDate) then 'It's over
CountDownTo = MyMessage
else
Count = DateDiff("s",theDate,CountdownDate) 'Get the number of seconds elapsed
SecondsLeft = Count mod 60
Count = Count \60
MinutesLeft = Count mod 60
Count = Count \60
HoursLeft = Count mod 24
DaysLeft = Count \24
If (LCase(ReturnFormat) = "long") then
CountDownTo = DaysLeft & " days " & HoursLeft & " hours " & MinutesLeft & " minutes " & SecondsLeft & " seconds "
else
If (DaysLeft = 0) then
If (HoursLeft = 0) then
CountDownTo = MinutesLeft & " minutes " & SecondsLeft & " seconds"
Else
CountDownTo = HoursLeft & " hours " & MinutesLeft & " minutes"
end if
Else
CountDownTo = DaysLeft & " days " & HoursLeft & " hours "
end if
end if
end if
end Function
</script>
Bon courage.
Oorma
