so here datasheet form

in combo box set value based on employee id

as of looked @ .currentrecord returns row number not id. can succesfully pass .currentrecord value form , set combobox problem number of row not equal employee id
what want user able select record on sheet employee , when user presses trainings button shows second form combo box set employees id.
recording value it's not lost when button clicked timer event, timing set 500
private sub form_timer() value = me.eid.value end sub i passed value using docmd.openform last argument.
private sub trainings_click() on error goto trainings_click_err ' _axl:<?xml version="1.0" encoding="utf-16" standalone="no"?> ' <userinterfacemacro for="show_trainings" xmlns="http://schemas.microsoft.com/office/accessservices/2009/11/application"><statements><action name="openform"><argument name="formname">employee ' _axl:trainings</argument><argument name="wherecondition">="[attuid]=" &"'" &[attuid] & "'"</argument></action></statements></userinterfacemacro> docmd.openform "add training", acnormal, "", "", , acnormal, value trainings_click_exit: exit sub trainings_click_err: msgbox error$ resume trainings_click_exit end sub and @ last read argument , set combo box value , dependent listboxes called requery
private sub form_open(cancel integer) if not isnull(me.openargs) me.cboemp = me.openargs me.list14.requery me.list18.requery end if end sub
Comments
Post a Comment