Formattazione data/ora per inserimento in Access

[realbenny]

If Month((arData.Item(y))) = meseda Or Month((arData.Item(y))) = mesea Then

                anno = Year(Now)
                mese = Month(arData.Item(y))
                giorno = Microsoft.VisualBasic.DateAndTime.Day(arData.Item(y))
                newdata = giorno & "/" & mese & "/" & anno
                newdata = Format(newdata, "dd/MM/yyyy")
                cn = New OleDb.OleDbConnection(ConnString)
                cmd = New OleDb.OleDbCommand
                cmd.Connection = cn
                cn.Open()
                sql = "update Clienti"
                sql = sql & " set DataNascitaAnno = #" & newdata & "#"
                sql = sql & " where ID = " & arID.Item(y)
                cmd.CommandText = sql
                cmd.ExecuteNonQuery()
                cn.Close()
            End If

ho un problema di conversone del formato delle date.
newdata = "04/06/2006" --> quindi formato data dd/MM/yyyy
la riga seguente già mi trasforma la data nel formato americano (MM/dd/yyy) anche se ho messo (dd/MM/yyyy) quindi poi mi scrive nel db (Access) la data in americano e non mi va bene. potete aiutarmi x favore, grazie

[alka]

Usa i parametri, non specificare le date direttamente nello statement SQL.

Nel tuo caso, accedendo ai dati tramite la gerarchia di classi ADO.NET del namespace System.Data.OleDb, usa la classe OleDbParameter.

Leggi la documentazione per informazioni ed esempi a riguardo.

Ciao!

[realbenny]

ok tra un po' provo e ti faccio sapere grazie

[realbenny]

mi sa che il problema è quando la data viene inserita nel db, ovvero x' adesso ho provato a mettere il campo dell'array dato che rimane giusta al posto della variabile, ma nel campo del db invece la mette nel formato americano. io nel db al campo della data ho messo tipo date/time e formato data in cifre

If Month((arData.Item(y))) = meseda Or Month((arData.Item(y))) = mesea Then

                anno = Year(Now)
                mese = Month(arData.Item(y))
                giorno = Microsoft.VisualBasic.DateAndTime.Day(arData.Item(y))
                newdata = giorno & "/" & mese & "/" & anno
                newdata = Format(newdata, "dd/MM/yyyy")
                cn = New OleDb.OleDbConnection(ConnString)
                cmd = New OleDb.OleDbCommand
                cmd.Connection = cn
                cn.Open()
                sql = "update Clienti"
                sql = sql & " set DataNascitaAnno = #" & arData.Item(y) & "#"
                sql = sql & " where ID = " & arID.Item(y)
                cmd.CommandText = sql
                cmd.ExecuteNonQuery()
                cn.Close()
            End If

[alka]

Non hai usato i parametri come ti avevo suggerito. :master:

Mi sa che il problema sta nel fatto che se chiedi aiuto e fai di testa tua, mi sorge qualche dubbio sui motivi per cui scrivi in un forum.

[realbenny]

adesso sto guardando il suggerimento che mi avevi dato, stavo provando un'altra strada che avevo intrapreso prima che mi rispondevi

[realbenny]

non ho capito bene come funziona ed anche il dataadapter. non avresti una porzione di codice x capire bene? ma x' usare un dataset, dataadapter e i parametri? ho un array che mi contiene le date, non è la stessa cosa?

[Jupy64]

Ciao, ecco un esempio..

...
cmd.CommandText = "UPDATE Clienti SET DataNascitaAnno = ? WHERE ID = ?;"
cmd.Parameters.Add("DataNascitaAnno", OleDb.OleDbType.Date)
cmd.Parameters.Add("ID", OleDb.OleDbType.Integer)

cmd.Parameters("DataNascitaAnno").Value = arData.Item(y)
cmd.Parameters("ID").Value = arID.Item(y)

cmd.ExecuteNonQuery()
...

[realbenny]

ok grazie sono riuscito a risolvere