Visualizzazione dei risultati da 1 a 5 su 5

Discussione: [vb.net] form con date

  1. #1

    vb7.0 form con date

    Ave ragazzi ho un problema con le date:data la funzione


    Private Sub TabPage3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TabPage3.Click
    indicev = 0

    Dim areader As OleDbDataReader
    Dim acommand As OleDbCommand
    Dim cic As Integer


    Dim objConn As New OleDbConnection _
    ("Provider=Microsoft.Jet.OLEDB.4.0;" & _
    "User ID=Admin;" & _
    "Data Source=C:\binostudio.mdb")

    objConn.Open()

    acommand = New OleDbCommand("select titolo,nome,cognome,residenza,domicilio,
    tel1,tel2,cf,datanascita from personale order by titolo,cognome ", objConn)

    areader = acommand.ExecuteReader()

    While (areader.Read())


    v1(indicev) = (areader.GetString(0))
    v2(indicev) = (areader.GetString(1))
    v3(indicev) = (areader.GetString(2))
    v4(indicev) = (areader.GetString(3))
    v5(indicev) = (areader.GetString(4))
    v6(indicev) = (areader.GetString(5))
    v7(indicev) = (areader.GetString(6))
    v8(indicev) = (areader.GetString(7))
    RIGA CON ERRORE v9(indicev) = (areader.GetString(8))

    indicev = indicev + 1
    End While

    objConn.Close()

    End Sub


    ricevo l'errore: An unhandled exception of type 'System.InvalidCastException' occurred in system.data.dll

    Additional information: The data value could not be converted for reasons other than sign mismatch or data overflow. For example, the data was corrupted in the data store but the row was still retrievable.
    riesco ad inserire le date in un database ma nn a prelevarle

  2. #2
    ps i vettori sono di tipo stringa

  3. #3
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,472
    A mio avviso, non riesci a reperire il dato poichè usi il metodo GetString della classe OleDbDataReader su un campo che invece è di tipo data/ora e quindi meriterebbe invece l'uso del metodo GetDateTime che ti restituisce un valore DateTime.

    Poi, siccome il valore deve essere memorizzato in un vettore di stringhe (senza addentrarmi nei meandri del "perchè" di tale soluzione), devi convertire esplicitamente il valore data/ora in stringa usando il metodo ToString.

    Un esempio per chiarire:
    codice:
    v9(indicev) = (areader.GetDateTime(8).ToString())
    Volendo, è possibile indicare parametri nel metodo ToString per scegliere un "formato" da applicare nella conversione del valore data/ora nella forma testuale.

    Consulta la Guida in linea per maggiori informazioni.

    Ciao!
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

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

  4. #4

    grazie mucio

    a mio avviso sono un i di ot a la cosa era ovvia(tranne che a me)

  5. #5
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,472

    Re: grazie mucio

    Originariamente inviato da binos1979
    a mio avviso sono un i di ot a la cosa era ovvia(tranne che a me)
    Ricorda che non c'è nulla di ovvio al mondo...

    Se risulta ovvio per me, è solo perchè ci sono già passato.
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

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

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.