Acquista i nostri libri consigliati su Amazon.it
+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 4 su 4

errore runtime

  1. #1
    marinels non è in linea Novello
    buonasera a tutti.
    ho scritto questo codice che passa dei valori da una maschera ad una tabella.

    Private Sub Comando26_Click()
    Dim Data_inizio, data_fine As Date
    Dim codice_attrezzatura As String
    Dim Seriale, Durata_Intervento As Integer
    Dim db As Database
    Dim rs As Recordset
    Data_inizio = Me.DTPicker0
    codice_attrezzatura = Forms![Xscheda_manutenzioneX]![CodiceAttrezzatura1]
    Seriale = Forms![Xscheda_manutenzioneX]![Seriale]
    Set db = CurrentDb
    Set rs = db.OpenRecordset("XRegistrazione_Piano_Interventi_ CreatorX")
    With rs
    .AddNew
    !codice_attrezzatura = codice_attrezzatura
    !Seriale = Seriale
    !Descrizione = Me.Descrizione_Intervento
    !Data_inizio = Data_inizio
    !data_fine = datascadenza(dateadd("g", Me.Durata_Intervento, Data_inizio)).

    Update
    End With
    rs.Close

    end sub



    mi da un errore "runtime 5" dicendo "chiamata di routine o argomento non validi"

    qualcuno sa cosa significa e come posso rimediare?

    grazie

  2. #2
    L'avatar di dragone bianco
    dragone bianco non è in linea Amanuense
    !data_fine = datascadenza(dateadd("g", Me.Durata_Intervento, Data_inizio)).
    
    Tu hai una funzione che si chiama "datascadenza"
    Così come l'hai scritta "dateadd("g", Me.Durata_Intervento, Data_inizio" passa il suo risultato alla funzione datascadenza

    Visto che ci sei controlla che quesrìta funzione sia compilata correttamente
    dateadd("g", Me.Durata_Intervento, Data_inizio)
    
    Sopratutto che il tipo di dati siano quelli giusti.

    Ciao
    ℹ️ Leggi di più su dragone bianco ...

  3. #3
    marinels non è in linea Novello
    ciao Dragone,

    la funzione "datascadenza" funziona. serve per restituire sempre un giorno che sia fra lunedì e venerdì.
    infatti mettendo datascadenza(data_inizio) mi restituisce nel caso di sabato o domenica sempre il lunedì.
    il problema sta nel "dateadd" che avevo tranquillamente utilizzato in una query.. ora invece mi dà questo benedetto errore.
    c'è un altro modo per aggiungere giorni o mesi o anni ad una data? io infatti dovrei calcolare la data_fine avendo il numero intero "durata_intervento".

    grazie

  4. #4
    marinels non è in linea Novello
    ok ho risolto..
    il problema era che nella dateadd al posto di "g" (giorno) bisogna inserire "d" (day)...
    viva l'inglese dico io...
    comunque grazie Dragone per l'interessamento

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. errore di runtime '94'
    Da maxpoz nel forum Microsoft Access
    Risposte: 20
    Ultimo Post: 17-02-2019, 22:19
  2. Errore RunTime 424
    Da mattew89 nel forum Microsoft Access
    Risposte: 3
    Ultimo Post: 02-04-2017, 18:51
  3. Errore runtime
    Da emilor66 nel forum Microsoft Word
    Risposte: 2
    Ultimo Post: 11-07-2011, 13:50
  4. Errore runtime 3043 - errore di rete o disco
    Da h0m3r nel forum Microsoft Word
    Risposte: 5
    Ultimo Post: 04-02-2011, 21:15
  5. Errore di Runtime 28
    Da Sonnyland nel forum Visual Basic 6
    Risposte: 4
    Ultimo Post: 21-06-2005, 17:36