O.k.… Wat verkeerd hier doen van I ben. De volgende code veroorzaakt Runtime Fout 424.
strUser = NTDomainUserName Dim F als Form Set F = Vormen! frmMaster
f.txtNTID = strUser
strSAP = InputBox („ga uw Gebruiker van SAP in - identiteitskaart“, „identiteitskaart van SAP“) strQry = „UITGEZOCHTE tblOrgStructure.PersonID, tblOrgStructure.EmployeeName, tblOrgStructure.OrgUnitCode, tblOrgStructure.AffiliationCode, tblOrgStructure.EntityCode, tblOrgStructure.BusinessCategoryCode, tblOrgStructure.BusinessAreaCode, tblOrgStructure.OrgLevel, tblOrgStructure. [Belangrijkste Num], tblOrgStructure. [Belangrijkste Naam], tblOrgStructure. [Belangrijkste Titel], tblOrgStructure. [Voorgestelde Entiteit], tblOrgStructure. [Voorgestelde BEDELAARS], tblOrgStructure.UserID, tblOrgStructure.Modified, tblOrgStructure.VerDate VAN tblOrgStructure WAAR (((tblOrgStructure. [Belangrijkste Num]) = strSAP)); „
Dim sf als Form Set sf = Vormen! frmMaster! sfrmModifications. Form.RecordSource = strQry
|