Frågan#1
Jag har en sida där jag ska ha gårdagens/förrgårs och förr-förrgårs datum i aaaa-mm-dd format.
jag skrivit en kod som jag anar är väldigt mycket för lång än vad som eg. behövs.
Eftersom DateAdd funktionen använder "date" så får jag ju formatet helt fel. Jag får då formatet på följande sätt: (m)m/(d)d/aa.
Jag har skrivit följande kod:
dim d, igar, temp
d=Day(now)
igar = DateAdd("d", -1, date)
temp=igar
temp="" &right(igar, 2)
if mid(igar, 2, 1)="/" then
temp=temp &"0" &mid(igar, 1, 1)
else
temp=temp &mid(igar,1, 2)
end if
if mid(igar, 4, 1)="/" then
temp=temp &"0" &mid(igar, 3, 1)
else
temp=temp &mid(igar,3, 2)
end if
igar=temp
igar="20" &igar
Detta funkar fint och så....men jag använder precis samma sak på 3 andra ställen, förutom att DateAdd är satt till, -2, -3 osv.
Vad jag är ute efter är alltså att göra detta till en funktion där man i anropet skickar med ett värde (typ -1). Är detta möjligt i VBScript och i så fall hur?
------------------
Fredrik Klarqvist
fredrik.klarqvist@swipnet.se
streetwise.se
