Autore Topic: Date a partire da una stringa di testo  (Letto 304 volte)

Offline vuott

  • Moderatore globale
  • Senatore Gambero
  • *****
  • Post: 11.264
  • Ne mors quidem nos iunget
    • Mostra profilo
« Ultima modifica: 17 Settembre 2020, 16:19:33 da vuott »
« Chiunque, non ricorrendo lo stato di necessità, nel proprio progetto Gambas fa uso delle istruzioni Shell o Exec, è punito con la sanzione pecuniaria da euro 20,00 a euro 60,00. »

Offline Gianluigi

  • Moderatore globale
  • Senatore Gambero
  • *****
  • Post: 4.150
  • Tonno verde
    • Mostra profilo
Re:Date a partire da una stringa di testo
« Risposta #1 il: 27 Giugno 2018, 10:17:10 »
Si hai ragione, concordo con la tua risposta, non è un bug.
Dipende da dove riceve quella data, forse potrebbe risolvere cosi:

Codice: [Seleziona]
Public Sub Main()

  Dim strDat As String

  strDat = "1970-09-26T16:00:00+00:00"
  strDat = Scan(strDat, "*-*-*T*")[1] &/ Scan(strDat, "*-*-*T*")[2] &/ Scan(strDat, "*-*-*T*")[0]
  Print "Se la data deve essere localizzata: "; Date(strDat)
  Print "Se la data *non* deve essere localizzata: "; CDate(strDat)

End

 :ciao: :ciao:

PS: Ho cambiato la scritta che poteva essere ambigua...
« Ultima modifica: 27 Giugno 2018, 11:31:06 da Gianluigi »
nuoto in attesa del bacio di una principessa che mi trasformi in un gambero azzurro