Newsgroup: it.comp.appl.access
Titolo: Formato data per Query di inserimento

Ho la necessità di scrivere una query di inserimento con una data espressa
per esteso:
INSERT INTO ... (Campo Data)
VALUES (#...#)
Il mio quesito è come esprimere la data all'interno dei # #:
mm/gg/aaaa hh:mm oppure in un altro modo?
Grazie per le risposte.
Saluti, Antonio.

Antonio Ganci wrote:
[CUT]
Dimenticavo Utilizzo A2000 e ADO.

 ha scritto nel messaggio
news:apbd1t$2mec$1...@ID-162989.news.dfncis.de...

Se la data è 29 marzo 2002:
INSERT INTO NomeTabella1 ( Pippo, Data1 )
SELECT NomeTabella2.Nome, #3/29/2002# AS Espr1
FROM NomeTabella2;
Nel linguaggio SQL le date vanno sembre gestite nel formato anglosassone,
ovvero mm/dd/yyyy.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 anglosassone, ovvero mm/dd/yyyy.
Lo pensavo anch'io, ma non ne ero sicuro al 100%.
Grazie.
Antonio.

 mm/gg/aaaa hh:mm oppure in un altro modo?
Public Function Test()
  On Error GoTo erh
  Dim myDblQ  As String
  Dim sql     As String
  Dim sQuery  As String
  Dim tDate   As Date
  myDblQ = Chr$(34)
  tDate = Now
  sql = "INSERT INTO"
  sql = sql & " Test"
  sql = sql & " ("
  sql = sql & " ID, Nome, Data, Importo"
  sql = sql & " )"
  sql = sql & " VALUES"
  sql = sql & " ("
  sql = sql & " <ID>, <Nome>, <Data>, <Importo>"
  sql = sql & " )"
  sQuery = "DELETE * FROM Test"
  CurrentDb.Execute sQuery, DAO.dbFailOnError
  sQuery = sql
  sQuery = Replace(sQuery _
                 , "<ID>" _
                 , str(1))
  sQuery = Replace(sQuery _
                 , "<Nome>" _
                 , myDblQ & "Pippo de' Pippis" & myDblQ)
  sQuery = Replace(sQuery _
                 , "<Data>" _
                 , Format$(tDate, "\#m/d/yyyy h.nn.ss\#"))
  sQuery = Replace(sQuery _
                 , "<Importo>" _
                 , str(0))
  Debug.Print sQuery
  CurrentDb.Execute sQuery, DAO.dbFailOnError
  sQuery = sql
  sQuery = Replace(sQuery _
                 , "<ID>" _
                 , str(2))
  sQuery = Replace(sQuery _
                 , "<Nome>" _
                 , myDblQ & "Paperon De' Paperoni" & myDblQ)
  sQuery = Replace(sQuery _
                 , "<Data>" _
                 , Format$(tDate, "\#yyyy/mm/dd hh:nn:ss\#"))
  sQuery = Replace(sQuery _
                 , "<Importo>" _
                 , str(0))
  Debug.Print sQuery
  CurrentDb.Execute sQuery, DAO.dbFailOnError
  sQuery = sql
  sQuery = Replace(sQuery _
                 , "<ID>" _
                 , str(3))
  sQuery = Replace(sQuery _
                 , "<Nome>" _
                 , myDblQ & "Pluto" & myDblQ)
  sQuery = Replace(sQuery _
                 , "<Data>" _
                 , str(CDbl(tDate)))
  sQuery = Replace(sQuery _
                 , "<Importo>" _
                 , str(0))
  Debug.Print sQuery
  CurrentDb.Execute sQuery, DAO.dbFailOnError
  Debug.Print "Fatto."
ext:
  On Error Resume Next
  Debug.Print
  Exit Function
erh:
  With err
    Debug.Print _
        "ERL#"; Format$(Erl, "0000"); ";" _
      ; "ERR#"; CStr(.Number); ":" _
      ; .Description; "."
  End With
  Resume Next
End Function
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------

                  , Format$(tDate, "\#m/d/yyyy h.nn.ss\#"))
[CUT]
Grazie per l'esempio, anche tu mi confermi la sinstassi mese/giorno/anno.
Ciao, Antonio.