date serial

[Striker]

How do I get today's date as a serial into a variable?

dim dDate as Date
dDate = serial NOW()

Of course the above does not work.

 

[Guest]

try:

Sub aa()
Dim serdate As Long
serdate = DateValue(Now)
End Sub

 

[Dave Peterson]

dim lDate as long
ldate = clng(date)

How do I get today's date as a serial into a variable?

dim dDate as Date
dDate = serial NOW()

Of course the above does not work.