webForumDet fria alternativet

Replace datum

4 svar · 157 visningar · startad av jboy_87

jboy_87Medlem sedan aug. 20011 105 inlägg
#1

hur gör jag om det här koden?:
ser ut så här: 00-00-00 00:00:00
vill lägga in idag eller igår!!
så här idag 00:00:00 < > igår 00:00:00

Function DateFormat(dt)
DateFormat = Right(Year(dt), 2) & "-" & Right(0 & Month(dt), 2) & "-" & Right(0 & Day(dt), 2) & " " & Right(0 & Hour(dt), 2) & ":" & Right(0 & Minute(dt), 2)
End Function

------------------
ASP är bäst fuck the rest!!!

jboy_87Medlem sedan aug. 20011 105 inlägg
#2

nån som kan hjälpa mig :(

------------------
ASP är bäst fuck the rest!!!

tohaMedlem sedan dec. 1999698 inlägg
#3

Inte helt lätt att tolka din fråga men jag tror jag förstår vad du menar.

Tror du med enkelhet kan göra följande jämförelse:

Function DateFormat(ByVal dt)

If dt = Date() then
    DateFormat = "Idag, " & FormatDateTime(dt, vbShortTime)
ElseIf dt = Date()-1 then
    DateFormat = "Igår, " & FormatDateTime(dt, vbShortTime)
Else
    DateFormat = FormatDateTime(dt, vbShortDate) & ", " & FormatDateTime(dt, vbShortTime)
End if

End Function

------------------
/ Torbjörn Hansson, http://www.endero.se/

jboy_87Medlem sedan aug. 20011 105 inlägg
#4

hur blandar jag ihop det med den ena koden????

------------------
ASP är bäst fuck the rest!!!

jboy_87Medlem sedan aug. 20011 105 inlägg
#5

fixat :)

------------------
ASP är bäst fuck the rest!!!

Genererad på 372 ms · cache AV · v20260730165559-full.f96bc7eb