VBScript

10 svar · 228 visningar · startad av Davida 3 juli 2001

DavidaMedlem sedan okt. 2000219 inlägg

Trådstart3 juli 2001 07:48#1

Hur gör jag en funktion dit jag skickar ett datum och därefter får tillbaka ett datum som är samma datum fast ett år senare?

Jag vill anropa funktionen vid ett onChange på ett textfält, blir det något i stil med:

<SCRIPT LANGUAGE="VBScript">
function addayear(dtmMyDate)
dtmNewDate=dateadd()
end function
</SCRIPT>

Vad ska stå i onChange? och hur ska man plocka datumet från inputboxen? Går det? eller blir det JavaScript? Jag vill att det nya datumet hamnar i en annan input-box;

Hoppas detta går...

DavidaMedlem sedan okt. 2000219 inlägg

3 juli 2001 07:49#2

Tillägg...

Datumet ska helst vara i följande format när det är klart:

07/11/2000 d.v.s DD/MM/ÅÅÅÅ

EclipseMedlem sedan juli 20003 825 inlägg

3 juli 2001 07:55#3

dateAdd("yyyy", 1, date() )

Ang. tillägget, det sköter du med session.LCID. Värdet i databasen kan vara 2001-01-01 men fortfarande skrivas ut 01/01/2001.

@ndersMedlem sedan juni 200032 967 inlägg

3 juli 2001 08:01#4

när vi pratar cs vb-script så har vi ingen möjlighet att använda lcid.

däremot kan man göra så här:

<form name="bar">
<select name="selecten" onchange="vbscript:flaa(bar.selecten.value)">
<option>
<option value="2001-01-04">flaa!
</select>

<input type="text" name="foo">
</form>

<script language="vbscript">
function flaa(dtmSelectedDate)
	dtmTempDate = dateadd("yyyy",1,cdate(dtmSelectedDate))
	dtmTempDate = right("0" & day(dtmTempDate),2) & "/" & right("0" & month(dtmTempDate), 2) & "/" & year(dtmTempDate)
	formen.foo.value=dtmTempDate
end function
</script>

DavidaMedlem sedan okt. 2000219 inlägg

3 juli 2001 08:19#5

KAnonbra @nders... Några korta frågor bara:

<script language="vbscript">
function flaa(dtmSelectedDate)
dtmTempDate = dateadd("yyyy",1,cdate(dtmSelectedDate))
dtmTempDate = right("0" & day(dtmTempDate),2) & "/" & right("0" & month(dtmTempDate), 2) & "/" & year(dtmTempDate)
formen.foo.value=dtmTempDate
end function
</script>

Vad gör formen i:formen.foo.value?
Och jag vill att det första fältet är en vanlig <INPUT TYPE="text"> och ingen select

@ndersMedlem sedan juni 200032 967 inlägg

3 juli 2001 08:28#6

formen är namnet på formuläret, inte säker på att det måste vara där. (har nämligen aldrig hållt på med cs vb-script)

det måste inte vara en select, det är bara att ändra till ett vanligt textfält.

ta dock höjd i funktionen för att man kan fylla i datum som inte är riktiga, och då får du ett felmeddelande.

DavidaMedlem sedan okt. 2000219 inlägg

3 juli 2001 08:31#7

Jag har redan den kollen genom att man väljer datum via en applet och det fylls automatiskt i en readonly ruta. Sen vill jag ha datumet i den andra rutan fast ett år senare, fast det löser ditt skript... tror jag

DavidaMedlem sedan okt. 2000219 inlägg

3 juli 2001 08:47#8

Har du någon bra kod för att göra om datumformatet till ÅÅÅÅ-MM-DD från DD/MM/ÅÅÅÅ på klienten?

@ndersMedlem sedan juni 200032 967 inlägg

3 juli 2001 08:53#9

titta på min funktion ovan. flytta runt lite där!

DavidaMedlem sedan okt. 2000219 inlägg

3 juli 2001 08:55#10

Hoppa det jag sa innan... Jag vill bara plusa på ÅÅÅÅ i DD/MM/ÅÅÅÅ med 1 istället...

Det blir fel i datumen annars...

07/02/2001 blir 2001-07-02, såå jag gör om datumen på serversidan istället, men jag vill lägga på ett år på klienten.

DavidaMedlem sedan okt. 2000219 inlägg

3 juli 2001 08:58#11

Löste det med:

<%session.LCID=1033%>
<form name="bar">
<INPUT TYPE="text" NAME="selecten" VALUE="01/01/2001" onchange="vbscript:flaa(bar.selecten.value)">
<input type="text" name="foo">
</form>

<script language="vbscript">
function flaa(dtmSelectedDate)
dtmTempDate = right(dtmSelectedDate,4)
dtmTempDate = dtmTempDate+1
dtmTempDate = left(dtmSelectedDate,6)&dtmTempDate
bar.foo.value=dtmTempDate
end function
</script>