Newsgroup: it.comp.appl.access
Titolo: Impossibile passare record specificato

In una maschera ho inserito un pulsante che sull'evento ONCLICK esegue il
comando   DoCmd.GoToRecord , , acNext
Quando però ci clicco mi da l'errore:impossibile passare al record
specificato.
COme posso risolvere??
Quello che vorrei fare è salvare il record corrente e passare ad inserire
i dati di un nuovo record.
Grazie Francesco
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Grazie Francesco
Aggiungo che se dopo aver dato il messaggio di errore, clicco nuovamente
sul pulsante il codice viene eseguito correttamente.


 Grazie Francesco
Per un nuovo record devi usare acNewRec anzichè acNext
--
Ciao
Galliano

 Galliano
HO provato si comporta esattamente allo stesso modo.Da errore ma poi se
riclicco funziona..


 -- 
L'errore viene generato dal fatto che no esiste un Next dopo l'ultimo
pertanto genera errore, se Cliccki ovviamente ora si sposta su un Nuovo
record, č tutto normale.
Per risolvere usa la gestione degli errori.
Se il tuo comando fa solo quello puoi usare:
On error resume Next
Altrimenti gestisci l'errore, se non ricordo male č 2105 o giů di li...!
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

 Ciao
Quindi potrei usare il seguente codice per gestire l'errore e fare in modo
che venga simulato un secondo click,dico bene?
Private Sub Comando8_Click()
On Error GoTo Err_Comando8_Click
Me.commessa = Forms!InserimentoCommesse!numerocommessa
Forms!InserimentoCommesse!composta = -1
DoCmd.GoToRecord , , acNewRec
Exit_Comando8_Click:
    Exit Sub
Err_Comando8_Click:
    DoCmd.GoToRecord , , acNewRec
    Resume Exit_Comando8_Click
 
End Sub
CIao Grazie


 CIao Grazie
NO francesco non è così:
L'errore deve distinguere cosa l'ha causato e solo se
generato dal Next non fattibile non deve dare segnalazione
 Private Sub Comando8_Click()
 On Error GoTo Err_Comando8_Click
 Me.commessa = Forms!InserimentoCommesse!numerocommessa
 Forms!InserimentoCommesse!composta = -1
 DoCmd.GoToRecord , , acNewRec
 Exit_Comando8_Click:
     Exit Sub
 Err_Comando8_Click:
    Select case err.number
        case 2105
           'In questo caso non deve generare il messaggio
           'Si sposta già sul nuovo senza doverlo rifare.
        Case else
            msgbox err.number & " " & err.description
    End select
     Resume Exit_Comando8_Click
 End Sub


  Ciao
Ho provato come mi hai detto ed ovviamente il mesaggio di errore non mi
appare,però non mi passa al record successivo.Se invece inserisco un nuovo
DoCmd.GoToRecord , , acNewRec nel caso in cui l'errore sia quello "in
questione" tutto funziona correttamente.
Cioè:
Private Sub Comando8_Click()
On Error GoTo Err_Comando8_Click
Me.commessa = Forms!InserimentoCommesse!numerocommessa
Forms!InserimentoCommesse!composta = -1
DoCmd.GoToRecord , , acNewRec
 
Exit_Comando8_Click:
Exit Sub
Err_Comando8_Click:
Select Case Err.Number
Case 2105
'In questo caso non deve generare il messaggio
'Si sposta già sul nuovo senza doverlo rifare.
DoCmd.GoToRecord , , acNewRec
Case Else
MsgBox Err.Number & " " & Err.Description
End Select
Resume Exit_Comando8_Click
End Sub
Magari poco corretto "teoricamente" ma a quanto pare..fa quello che mi
serve.
Grazie mille.Fra
