Visualizzazione del mese

[matrics21]

tramite questa istruzione:

Month(now)

è possibile visualizzare i mesi.
Solo che li visualizza in formato numerico e io vorrei vederli in formato testuale, non importa se in inglese o in italiano, se si vedono le prime 3 lettere o tutte, ma basta che non sia formato numerico.
Esiste qualche metodo o devo ricorrere ad una serie di IF ELSEIF?

[KataKlism2002]

ArrMesi = Array("Gen","Feb","Mar","Apr","Mag","Giu","Lug","Ago","Set","Ott","Nov","Dic")
mese = ArrMesi(cint(Month(now)))

[Gio&Ste]

io ho risolto così:

mese1 = Month(tuadata)
mese= MonthName(mese1)

[KataKlism2002]

anzi scusa, dovrebbe essere

mese = ArrMesi(cint(Month(now))-1)

perchè l'array va da 0 a 11 non da 1 a 12

[matrics21]

Originariamente inviato da KataKlism2002

ArrMesi = Array("Gen","Feb","Mar","Apr","Mag","Giu","Lug","Ago","Set","Ott","Nov","Dic")
mese = ArrMesi(cint(Month(now)))

2 domande:

Per dichiarare ArrMesi devo scrivere prima Dim?
cosa fa quel cint?

[Shagrat]

io direi proprio che è meglio fare:

monthname(month(now()))

senza dichiarare array etc etc

[KataKlism2002]

d: Per dichiarare ArrMesi devo scrivere prima Dim?
r: Se usi <% option Explicit %> SI! Altrimenti non è necessario

d: cosa fa quel cint?
r: Cint trasforma in intero una stringa che contiene caratteri

cint("15") = 15
cint (44.6) = 45
cint(true) = -1
cint("13fgdfg45") = "INTERNAL SERVER ERROR" (eseguire controllo isnumeric("113defgdfg15") per evitare questo problema)

[KataKlism2002]

Originariamente inviato da Shagrat
io direi proprio che è meglio fare:

monthname(month(now()))

senza dichiarare array etc etc

ti restituisce il nome del mese in inglese

[matrics21]

Originariamente inviato da Shagrat
io direi proprio che è meglio fare:

monthname(month(now()))

senza dichiarare array etc etc

Ho fatto così:

Dim mese
mese=monthname(month(now()))

esce sempre un valore numerico

[Corwin]

Originariamente inviato da KataKlism2002
ti restituisce il nome del mese in inglese

Se usi Session.LCID = 1040 te lo da in italiano.