[Acces] Probleem met knoppen?

[Verwijderd]

Ik heb een formulier gemaakt met wat standaard knoppen.
Normaal erg simpel maar heb nu op 1 of andere manier een foutmelding bij het gebruiken van het formulier:




Iemand die weet wat hier mis is met het script? (ken VB nl. niet)

[ Voor 8% gewijzigd door Verwijderd op 26-04-2004 14:39 ]

[pistole]

de achterliggende code heeft 2 functies met dezelfde naam (niet dat dat kan, maar de foutmelding lijkt erop...)

[Verwijderd]

zegt me weinig...

Ik ken de basis van VB niet echt vandaar.

[whoami]

Verwijderd schreef op 26 april 2004 @ 15:00:
Ik ken de basis van VB niet echt vandaar.

Dan kan je beter bloempjes geen planten of VB leren ipv je tijd te verdoen met ontwikkelen in een taal/omgeving die je niet kent.

[Verwijderd]

dat is nog eens een mooie reply...

euh? Ik wil eigenlijk niks met VB te maken heben.

In die zin, dat Acces dit normaal wel erin PLANT...
Maar nu treedt er een fout op.. en zal ik er toch ff in moeten duiken.

Voor de paar knopjes heb ik geen zin om heel VB te gaan studeren
merci

[whoami]

Waarom open je dit topic dan in P&W, als je blijkbaar zelf niets geprogrammeerd hebt, en het ook niet van plan bent om te doen?

Het antwoord op jouw probleem is trouwens al gegeven, dus wat belet je om daar eens verder op te zoeken?

[remcoaak]

Hallo,

probeer eens rechts te klikken op de desbtreffende knop
kies properties/eigenschappen
dan naar Tabblad Event
Hier staat waarschijnlijk naast On_Click: Event_procedure
Klik nu helemaal rechts op de puntjes en je bent in VB, zoek de hele module door op dubbele functies en delete er een.
Zou hierna moeten werken

Let wel op maak eerst een backup van je database en haal daarna pas wat weg (voor het geval je per ongeluk de verkeerde functie weghaalt.

Succes

Remco.


Edit:
Zoals anderen hier ook al melden is het misschien beter om even de code en functie van de knop te mailen, kan er ook een duidelijker antwoord worden gegeven.

[ Voor 16% gewijzigd door remcoaak op 26-04-2004 15:20 ]

[Verwijderd]

Post de gebeurtenissen van die knop dan even en eventueel de code die erachter hangt. Hier kunnen we denk ik weinig mee

Edit:
Roept de functie zichzelf misschien aan (dit kan soms wel, maar misschien hier niet, vandaar dat ik graag code zie )

[ Voor 35% gewijzigd door Verwijderd op 26-04-2004 15:16 ]

[Verwijderd]

ben er nog niet uit maar bedankt voor de replies.

Hier de code van 1 knop (aflsuiten)... Alle knoppen die ik heb geplaatst hebben dezelfde foutmelding

code:

Option Compare Database

Private Sub opslaan_Click()
On Error GoTo Err_opslaan_Click


    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

Exit_opslaan_Click:
    Exit Sub

Err_opslaan_Click:
    MsgBox Err.Description
    Resume Exit_opslaan_Click
    
End Sub
Private Sub opslaan_Click()
On Error GoTo Err_opslaan_Click


    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

Exit_opslaan_Click:
    Exit Sub

Err_opslaan_Click:
    MsgBox Err.Description
    Resume Exit_opslaan_Click
    
End Sub
Private Sub x_Click()
On Error GoTo Err_x_Click


    DoCmd.Close

Exit_x_Click:
    Exit Sub

Err_x_Click:
    MsgBox Err.Description
    Resume Exit_x_Click
    
End Sub
Private Sub laatste_Click()
On Error GoTo Err_laatste_Click


    DoCmd.GoToRecord , , acLast

Exit_laatste_Click:
    Exit Sub

Err_laatste_Click:
    MsgBox Err.Description
    Resume Exit_laatste_Click
    
End Sub

Private Sub opslaan_DblClick(Cancel As Integer)

End Sub

Private Sub volgende_Click()
On Error GoTo Err_volgende_Click


    DoCmd.GoToRecord , , acNext

Exit_volgende_Click:
    Exit Sub

Err_volgende_Click:
    MsgBox Err.Description
    Resume Exit_volgende_Click
    
End Sub
Private Sub vorige_Click()
On Error GoTo Err_vorige_Click


    DoCmd.GoToRecord , , acPrevious

Exit_vorige_Click:
    Exit Sub

Err_vorige_Click:
    MsgBox Err.Description
    Resume Exit_vorige_Click
    
End Sub
Private Sub eerste_Click()
On Error GoTo Err_eerste_Click


    DoCmd.GoToRecord , , acFirst

Exit_eerste_Click:
    Exit Sub

Err_eerste_Click:
    MsgBox Err.Description
    Resume Exit_eerste_Click
    
End Sub
Private Sub sluit_Click()
On Error GoTo Err_sluit_Click


    DoCmd.Close

Exit_sluit_Click:
    Exit Sub

Err_sluit_Click:
    MsgBox Err.Description
    Resume Exit_sluit_Click
    
End Sub
Private Sub Knop32_Click()
On Error GoTo Err_Knop32_Click


    DoCmd.Quit

Exit_Knop32_Click:
    Exit Sub

Err_Knop32_Click:
    MsgBox Err.Description
    Resume Exit_Knop32_Click
    
End Sub

hier word ik dus niet wijs uit

-edit-
toevallig ook nog iemand die weet hoe ik een daadwerkelijke applicatie van een formulier kan maken (*.exe oid)?

[ Voor 4% gewijzigd door Verwijderd op 26-04-2004 17:01 ]

[nescafe]

Vergelijk nu regel 3 en 17 met elkaar...


Als je regel 3 t/m 16 verwijdert ben je klaar

[Verwijderd]

perfect! Bedankt nescafe..
kzal ff zien of 't precies t zelfde is bij de andere knoppen

[Boss]

En .exe maken gaat je niet lukken, of je moet de MS Office Developer edition hebben. Dan nog wil je dat eigenlijk niet, want het kan een ramp zijn om een .exe die je op die manier krijgt op verschillende andere systemen te insalleren.

offtopic:
brrrrr..... al die ranzige code van die wizards!

[Verwijderd]

waarom ik een exe wil is eigenlijk omdat ik gewoon een snelkoppeling op mn desktop wil die alleen venstertje "formulier" opent.. en niet elke keer acces opstarten.

Of kan ik op 1 of andere manier ook gewoon een snelkopelling maken naar het normale Acces formulier (zonder dat acces opent, dus alleen het venstertje FORMULIER)

[ Voor 36% gewijzigd door Verwijderd op 26-04-2004 17:32 ]

[.oisyn]

Verwijderd schreef op 26 april 2004 @ 17:00:
hier word ik dus niet wijs uit

Het spijt me zeer, maar dan hoort je topic gewoon niet thuis op GoT. Programming & Webscripting is een programmeerforum, en op heel GoT streven we naar een bepaald niveau. Leren programmeren of programmacode uitleggen doen we hier dus niet, we verwachten van onze bezoekers dat ze al enige kennis hebben voor ze een vraag stellen. Probeer het bijvoorbeeld eens op een forum als dat van computertotaal.nl? Veel succes