[VB6] conversione data, da GG/MM/AAAA a MM/GG/AAAA

[kuarl]

chi mi sa' aiutare?? in lettura quando leggo questi dati da access me li posta nel formato europeo... ma quando li vado a scrivere in un altro database ho bisogno che questi dati siano in formato americano!! Come effettuo la conversione?? io in java lo faccio con un'espressione regolare.... qui non saprei come fare

magari estraendo le singole coppie di numeri per poi ricomporle, ma sono piskello del VB

[macse]

per estrarle dalla data ora si usano:
year(date())
month(date())
Day(date())
Hour(Time())
Minute(Time())
Second(Time())

dove
Date() è una funz. che mi passa la data odierna
Time() mi passa l'ora minuti e secondi nel momento della chiamata
Now() mi restituisce la data e l'ora (es.: 16/05/2004 16.34.12)

per le date
presumo si possa utilizzare format.

MyDate=16/05/2004
MyStr = Format(MyDate, "mm/d/yyyy") 'restituisce 05/16/2004
MyStr = Format(MyDate, "mmm d yyyy") 'restituisce mag 16 2004

in particolare:
mm: mese in cifra
mmm: mese in tre caratteri (gen)
mmmm: mese completo
d: giorno in cifre
dddd: giorno in carattere (lunedì)
yy: anno in due cifre
yyyy: anno in 4 cifre

macse

[kuarl]

Originariamente inviato da macse
per estrarle dalla data ora si usano:
year(date())
month(date())
Day(date())
Hour(Time())
Minute(Time())
Second(Time())

dove
Date() è una funz. che mi passa la data odierna
Time() mi passa l'ora minuti e secondi nel momento della chiamata
Now() mi restituisce la data e l'ora (es.: 16/05/2004 16.34.12)

per le date
presumo si possa utilizzare format.

MyDate=16/05/2004
MyStr = Format(MyDate, "mm/d/yyyy") 'restituisce 05/16/2004
MyStr = Format(MyDate, "mmm d yyyy") 'restituisce mag 16 2004

in particolare:
mm: mese in cifra
mmm: mese in tre caratteri (gen)
mmmm: mese completo
d: giorno in cifre
dddd: giorno in carattere (lunedì)
yy: anno in due cifre
yyyy: anno in 4 cifre

macse

grazie mille!