[Access 2000]Record "meenemen" tussen formulieren

[Verwijderd]

Ik heb dus een klein probleempje met Access 2000. We hebben binnen onze groep een grote database die al onze studies bevat. Elke studie wordt geïdentificeerd met een uniek “IDNR”. Als een gebruiker de database opent, krijgt hij een leeg formulier, waar hij via een invoervak met keuzelijst een IDNR kan ingeven, en op de juiste record terechtkomt. De code hierachter is :

code:

Me.RecordSource = "select * from [tabelstudies] where idnr like '" & Me.Search_idnr & "*'"
Me.Requery
Me.Refresh

Nu zou ik met een knop een tweede formulier willen openen, naar een formulier dat bijkomende info voor bepaalde studies bevat. De volgende code steekt achter die knop :

code:

Private Sub Form2_Click()
On Error GoTo Err_Form2_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    DoCmd.Close
    stDocName = "Form2"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    DoCmd.Maximize

Exit_Form2_Click:
    Exit Sub

Err_Form2_Click:
    MsgBox Err.Description
    Resume Exit_Form2_Click
    
End Sub

Probleem is nu dat het tweede formulier opnieuw blanco is. Ik zoek dus een manier om het IDNR uit het eerste formulier over te nemen naar het tweede formulier, en de bijhorende record automatisch te openen.

[Boss]

Dat kan via OpenArgs: een parameter die je meegeeft in DoCmd.OpenFrom (de laatste geloof ik) en in het nieuw geopende form als variabele bechikbaar is.

Waarom gebruik je overigens select * .. where idnr like en niet gewoon een = ? Dat werkt iets sneller, like gebruik je als je via wildcards op gedeeltes van een variabele wilt zoeken.

[Pannenkoekkie]

Het werkt niet netjes (ID's zijn numeriek en openargs zijn string), maar als je op het form bij het klikken op die knop inderdaad stLinkCriteria vult, dan is deze variabele in het volgende form gelijk aan:
Me.OpenArgs

[Boss]

Ach, netjes omgaan met verschillende soorten variabelen is niet echt iets waar Access in uitblinkt
Maar dat heeft toch ook wel weer zijn voordelen.

[Lustucru]

Pannenkoekkie schreef op woensdag 05 april 2006 @ 13:14:
Het werkt niet netjes (ID's zijn numeriek en openargs zijn string), maar als je op het form bij het klikken op die knop inderdaad stLinkCriteria vult, dan is deze variabele in het volgende form gelijk aan:
Me.OpenArgs

dat is nieuw voor me

DoCmd.OpenForm formuliernaam[, weergave][, filternaam][, where-voorwaarde][, gegevensmodus][, venstermodus][, argumentenopening]

openargs is het zevende argument van .openform(), strLinkCriteria is hier het vierde.

Maar idd: strLinkCriteria is bedoeld voor dit soort grappen. Door iets op te nemen als

code:

strLinkCriteria = "studie=" & me.nrid

zal het formulier openen met het juiste record.

[Verwijderd]

Ik heb geprobeerd de bovenstaande suggesties toe te passen, maar nog steeds lukt het niet. Form 2 opent wel, maar niet op de studie met het IDNR. Moet ik enkel de DoCmd.openform regel in de code van de eerste form aanpassen, of moet ik in de tweede form ook nog iets aanpassen aan Me.Recordsource ?