Pagina 1 di 2 1 2 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 18
  1. #1

    DateTime Insert Sybase DB

    Ciao a tutti ho un piccolo problema con un insert DATE.
    La data la prendo dal componente DateTimePicker e gli imposto la prop .value = 26/09/2006

    quindi vado ad elaborare una classe esterna al form, chiamata ClasseContatori
    imposto la var, le prop e i metodi così :

    variabile in classe
    dim mDataReset as Date

    Proprietà
    Property DataReset() As Date
    Get
    Return CDate(mDataReset.ToString)
    End Get

    Set(ByVal value As Date)
    mDataReset = CDate(value.ToString)
    End Set
    End Property


    mentre inserisco così la data nella tbl
    ql.Append("INSERT INTO MFI_Doc_Count")
    sql.Append("(C_Fatt,C_Ric,Data_reset,Note)")
    sql.Append("VALUES (' ")
    sql.Append(Me.ContFatture & "','" & Me.ContRicevute & "','" & Me.DataReset & "','" & Me.NoteC)
    sql.Append(" ') ")

    Nel form applico dove c'è il TimeDatePicker applico :

    Dim Count As New ClasseContatori
    Count.DataReset = dteReset.Value
    e poi richiamo la query che sta nella classe sopracitata

    ------------------------------------------------------------------------------------
    QUANDO TESTO TUTTO... MI FA TUTTO PER BENINO TRANNE APPUNTO L'INSERT DELLA DATE

    ERROR DEBUG :
    Dim ret As Integer = command.ExecuteNonQuery()
    ERROR [07006] [Sybase][ODBC Driver][Adaptive Server Anywhere]Impossibile convertire 28/09/2006 15.08.30 in timestamp

  2. #2
    Utente di HTML.it L'avatar di EngLab
    Registrato dal
    Jan 2006
    Messaggi
    496
    Il formato timestamp che hai impostato nella tabella ti permette di inserire solo ore, non date complete.. metti datetime, se c'è

  3. #3
    no nella tbl ho impostato datetime...

  4. #4
    il database nn l'ho fatto io però ho visto che :
    Data_reset tbl ha come formato
    2006-02-27 23:12:26 type = datetime

    è possibile che magari io gli invio un formato sbagliato?
    ma secondo me dovrebbe dare un altro errore e non un errore di conversione
    ma di formato...

    cmq per ovviare a questo.. sul form load dove c'è l'elemento datatimepicker
    potrei impostare la proprietà così

    dteReset.CustomFormat = "yyyy-mm-dd HH:mm:ss"

    giusto??

  5. #5
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,472
    Usa i parametri (OdbcParameters, probabilmente, considerando il tuo caso) per specificare valori parametrici, appunto, nella query di inserimento.
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Home | Blog | Delphi Podcast | Twitch | Altro...

  6. #6
    non so perchè ma una risposta del genere me l'aspettavo


    non credo che parametrizzando la query possa risolvere qualcosa...in questo caso

  7. #7
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,472
    Originariamente inviato da ferrate
    non so perchè ma una risposta del genere me l'aspettavo
    Immagino sia perché si tratta della risposta più ovvia.

    Originariamente inviato da ferrate
    non credo che parametrizzando la query possa risolvere qualcosa...in questo caso
    Se non credi, allora, fai come vuoi tu. :rollo:
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Home | Blog | Delphi Podcast | Twitch | Altro...

  8. #8
    Utente di HTML.it L'avatar di cassano
    Registrato dal
    Aug 2004
    Messaggi
    3,002
    io credo di si,o perlomeno farai + chiarezza.

  9. #9
    no non mi sono spiegato bene...
    anche volendo parametrizzare la query...

    credo che quando io vado a selezionare la data da questo componente DATETIMEPICKER
    ( è il classico calendarietto di windows )...nn mi inserisca la data...

    tu come pensavi di impostare un'eventuale parametrizzazione??

  10. #10
    datemi qualche dritta...
    questa è la query nuda e cruda alla tbl :

    ublic Function AddContatori(ByVal Idcontatore As String) As Boolean
    Dim sql As New System.Text.StringBuilder
    Dim command As New OdbcCommand

    connessione.Open()
    command.Connection = connessione

    command.CommandType = CommandType.Text
    command.CommandText = "SELECT Id_Counter from MFI_Doc_Count where Id_Counter = ' " & Idcontatore & "' "

    Dim s As Object = command.ExecuteScalar()

    If Not s Is Nothing Then
    sql.Append("UPDATE MFI_Doc_Count set C_Fatt = '" & Me.ContFatture & "' ,")
    sql.Append("C_Ric = '" & Me.ContRicevute & "' ,")
    sql.Append("Data_reset = '" & Me.DataReset & "' ,")
    sql.Append("Note = '" & Me.NoteC & "'")
    sql.Append("where id_Counter = ' " & Idcontatore & "'")
    Else
    sql.Append("INSERT INTO MFI_Doc_Count")
    sql.Append("(C_Fatt,C_Ric,Data_reset,Note)")
    sql.Append("VALUES (' ")
    sql.Append(Me.ContFatture & "','" & Me.ContRicevute & "','" & Me.DataReset & "','" & Me.NoteC)
    sql.Append(" ') ")
    End If

    command.CommandText = sql.ToString
    Dim ret As Integer = command.ExecuteNonQuery()
    connessione.Close()
    command.Dispose()
    If ret = 0 Then Return False

    Return True

    End Function

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.