Errore di run-time 13

di il
2 risposte

Errore di run-time 13

Ciao a tutti
spero ke mi possiate aiutare.
Qnd avvio il programma, mi da errore alla terza riga
dicendo "Errore di run-time 13, tipo nn corrispondente"

    frmLab.Show
    strSQL = "SELECT * FROM Calendario ORDER BY Anno"
    Set RS = DB.OpenRecordset(strSQL, dbOpenDynaset)
    RS.MoveFirst
    Anno_Begin = RS.Fields("Anno")
    RS.MoveLast
    Anno_End = RS.Fields("Anno")
    For I = Anno_Begin To Anno_End
        frmLab.cmbAnno.AddItem I
    Next I

Grazie a tutti
Ciao

2 Risposte

  • Re: Errore di run-time 13

    Ciao

    innanzitutto per la prossima volta quando posti del codice sorgente racchiudilo tra i tag code, in questo modo diventa più leggibile. Per stavolta te lo faccio io

    Per quanto riguarda il tuo problema, se la terza riga è questa
    Set RS = DB.OpenRecordset(strSQL, dbOpenDynaset)
    hai qualche variabile inizializzata col tipo errato, quindi prova a postare la dichiarazione delle variabili, così vediamo di risolvere
  • Re: Errore di run-time 13

    Scusa per nn aver utilizzato i tag code ,
    grazie del consiglio.
    L'intoppo però era causato da un errore del cavolo.
    Come un'idiota mi sono dimenticato di attivare una libreria
    grazie cmq del consiglio
    alla prossima
Devi accedere o registrarti per scrivere nel forum
2 risposte