Gambas-it

Archivi (sola lettura) => Programmazione (Gambas 2) => Topic aperto da: tornu - 07 Maggio 2009, 00:01:22

Titolo: Estrazione caratteri da una data
Inserito da: tornu - 07 Maggio 2009, 00:01:22

Buonasera a tutti,

Dovrei estrarre da una variabile che contiene una data i caratteri che corrispondono al giorno e al mese da associare a due variabili, ho provato in questo modo:

Codice: [Seleziona]

DIM data AS Date
DIM giorno AS Integer
DIM mese AS Integer

data = (Date(Now))
giorno = Left(data, 2)
mese = Mid(data, 4, 2)

ma mi viene restituito questo errore:
" Type mismatch: wanted String, got Date instead "

premetto che la data deve essere (per l'utilizzo che ne devo fare io) obbligatoriamente contenuta da una variabile, ho fatto varie prove ma non ne sono venuto a capo.

Titolo: Re: Estrazione caratteri da una data
Inserito da: claudio - 07 Maggio 2009, 00:15:30

Prova in questo modo:

DIM data AS Date
DIM giorno AS Integer
DIM mese AS Integer
DIM d AS String

data = (Date(Now))
d = Format(Data, "dd/mm/yyyy")
giorno = CInt(Left(d, 2))
mese = CInt(Mid(d, 4, 2))

Titolo: Re: Estrazione caratteri da una data
Inserito da: tornu - 07 Maggio 2009, 00:27:34

:si:  grazie cbsoft

Titolo: Re: Estrazione caratteri da una data
Inserito da: md9327 - 07 Maggio 2009, 01:24:10

Esitono anche funzioni del tipo:

YEAR, MONTH e DAY

che estraggono da una Date le informazioni volute...

Titolo: Re: Estrazione caratteri da una data
Inserito da: claudio - 07 Maggio 2009, 01:37:10

@ MD9327
Hai ragione, YEAR, MONTH e DAY sono le funzioni corrette, io gli ho convertito la data in formato stringa, per fargli capire l'errore.

Titolo: Re: Estrazione caratteri da una data
Inserito da: tornu - 07 Maggio 2009, 21:02:02

Un esempio?

Titolo: Re: Estrazione caratteri da una data
Inserito da: tornu - 07 Maggio 2009, 21:59:35

Grazie alle vostre indicazioni ho letto più attentamente la documentazione

Codice: [Seleziona]

DIM giorno AS Integer
DIM mese AS Integer

giorno = Day(Now)
mese = Month(Now)

Titolo: Re: Estrazione caratteri da una data
Inserito da: md9327 - 08 Maggio 2009, 00:52:24

Vedi, a volte un'altro paio di occhiali possono servire... :-P