Convertire funzione Now() in numero

[multijet]

Buonasera,qualcuno puo' darmi un suggerimento su come convertire il risultato della funzione Now() in numerico es
Now()=28/04/2006 21:44:00 in 28042006214400 o facsimile.
grazie

[oregon]

Assegna il valore ad una stringa ed elimina tutti i caratteri che non ti servono con la replace

[multijet]

Potresti farmi un esempino.Grazie

[oregon]

Beh ... la prossima volta dillo chiaramente ... se chiedi un suggerimento, avrai un suggerimento ...

Dim S As String
S = Now()
S = Replace(S, "/", "")
...

Il codice non e' completo ma potrai farlo tu facilmente ...

[multijet]

Grazie 1000.Ora lo provo

[Jupy64]

Ciao, puoi convertire in un numero di tipo Double, e successivamente, se ti serve, recuperarne il valore...

Dim dblDataOra As Double
Dim dataOra As Date
dataOra = Now
dblDataOra = CDbl(dataOra)

'data in formato double
MsgBox dblDataOra 

'recupero della data
MsgBox CDate(dblDataOra)

[yyzyyz]

tratto da Oregon inspiration, potresti fare anke un cosa di questo tipo:

Dim S As String
Dim nostring(1 To 3) As String
Dim i As Integer

nostring(1) = "/"
nostring(2) = "."
nostring(3) = " "

S = Now()
For i = 1 To 3
S = Replace(S, nostring(i), "")
Next i
MsgBox S

[multijet]

Grazie ragazzi per tutte le risposte .Fanno tutte al caso mio