Gruppo opzioni in access

lunedì 23 marzo 2009 - 17.43

marko80 Profilo | Junior Member

Ciao a tutti,
premetto che sto imparando access e sono alle prime armi con la pogrammazione.
Ho creato una semplice maschera con due pulsanti opzione/caselle di spunta (pippo,pluto) e un bottone (anteprima report).
Se scelgo pippo e premo il bottone mi dovrà aprire report_pippo, se scelgo pluto mi dovrà aprire report_pluto.
Ho fatto questo nell'evento click del bottone, ma restituisce errore:

Private Sub cmd_preview_Click()
If Me.optionpluto.OnMouseDown Then
DoCmd.OpenReport "rptpluto", acViewPreview
ElseIf Me.optionpippo.OnMouseDown Then
DoCmd.OpenReport "rptpippo", acViewPreview
End If
End Sub


Spero di essere stato chiaro.
Grazie

dinoxet Profilo | Senior Member

Analizziamo :
intano hai fatto una if nidificata non necessaria hai solo due opzioni,
e penzo che ti dia errore perchè c'è una sola end if mentre ci sono 2 if
non so se sono stato chiaro.
forse così e meglio :
Private Sub cmd_preview_Click()
If Me.optionpluto.OnMouseDown Then
DoCmd.OpenReport "rptpluto", acViewPreview
Else
DoCmd.OpenReport "rptpippo", acViewPreview
End If
End Sub

credo :-)
DINOXET

marko80 Profilo | Junior Member

Ciao dinoxet,
grazie per la risposta.
Ho provato a fare come mi hai suggerito, ma mi restituisce un errore di run-time 13 tipo non corrispondente.
Altre idee?
Grazie

dinoxet Profilo | Senior Member

di solito l'errore di run-time 13 fa riferimento ad un parametro passato al qwery di tipo non corrispondente ,
mi spiego passo un testo ad un campo numerico
se lanci il report direttamente ti da lo stesso errore?
DINOXET
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !
Copyright © dotNetHell.it 2002-2024
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5