[ASP] Arrays en Variables

[didio]

Ik heb een variable met een tekst, in die tekst staat een maand, dan maak ik een array met de huidige maand en de maand daarna, tot hier gaat alles goed.

Dan loop ik door de array en kijk ik of de maand uit de array voorkomt in de variable. Dit gaat goed als ik hardcoded in de array de maanden intik, maar gaat fout op de manier hoe ik het hieronder doe, maar dit moet toch kunnen. Iemand een idee?

strResponseText = "Helaas pas in oktober."
strMonth1 = LCase(MonthName(Month(Date), False))
strMonth2 = LCase(MonthName(Month(Date) + 1, False))
arrMonths = Array(strMonth1, strMonth2)

For a = 0 to Ubound(arrMonths)
If Not Instr(1, strResponseText, arrMonths(a)) = 0 Then
Response.Write "ja"
Else
Response.Write "nee"
End If
Next

[Greyfox]

Je kunt beter for..each gebruiken.
Overigens gebruik ik InStr altijd zonder eerste parameter.

[elnino]

Op woensdag 12 september 2001 15:00 schreef didio het volgende:
strResponseText = "Helaas pas in oktober."
strMonth1 = LCase(MonthName(Month(Date), False))
strMonth2 = LCase(MonthName(Month(Date) + 1, False))
arrMonths = Array(strMonth1, strMonth2)

For a = 0 to Ubound(arrMonths)
If Not Instr(1, strResponseText, arrMonths(a)) = 0 Then
Response.Write "ja"
Else
Response.Write "nee"
End If
Next

Bij mij werkt het wel op PWS (Personal WebServer)... Er komt als output:

code:

neeja

[didio]

Op woensdag 12 september 2001 15:13 schreef elnino het volgende:

[..]

Bij mij werkt het wel op PWS (Personal WebServer)... Er komt als output:

code:

neeja

Echt waar? bij mij dus niet, ik krijg neenee

Ook nog even op iemand anders zijn computer geprobeerd, ook neenee.

[didio]

Ik zie al een beetje wat er fout gaaat, heel raar.
Het werkt niet op Windows XP en Windows 2000 en wel op Windows 98

Heeft iemand hier misschien toch nog een oplossing voor?

[elnino]

Op woensdag 12 september 2001 15:29 schreef didio het volgende:
Heeft iemand hier misschien toch nog een oplossing voor?

Het kan te maken hebben met verschillende taalversies. In het Engels is oktober "October"... Daarnaast let InStr ook nog op hoofd/kleineletters (dacht ik). Let daar ook nog op (maanden in het Engels met hoofdletter).

[didio]

Op woensdag 12 september 2001 15:44 schreef elnino het volgende:

[..]

Het kan te maken hebben met verschillende taalversies. In het Engels is oktober "October"... Daarnaast let InStr ook nog op hoofd/kleineletters (dacht ik). Let daar ook nog op (maanden in het Engels met hoofdletter).

Damn, je hebt gelijk dat is het, de taal. Met de hoofdletters en klein letters heb ik al een oplossing voor.

Thanks..

[elnino]

Maak bijvoorbeeld een Array met daarin Nederlandse maandnamen:

code:

maand = Array("januari", "februari", "maart",
"april", "mei", "juni", "juli", "augustus",
"september", "oktober", "november", "december")

Vervolgens roep je de maandnaam aan met:

code:

maand(maandnummer - 1)

Je kan er ook nog een functie oid van maken...