Hvordan lægger jeg 6 timer til en date?

dim dat
dat = date()

Jeg vil ikke have et tidspunkt jeg vil bare have datoen til at skifte 6 timer før den egentlig skal hvis i forstår?
Mit webhotel står i USA så derfor er uret bagefter jeg skal bruge Danmarks dato jeg er ligeglad med tiden men jep i forstår... Hilfe den skulle ikke være så svær =)