Dim oProject, oActiveView, oViewConfigs, oViewConfig, oCurrentRecordSet, oCurrentRecord
Set oProject = cRM.CurrentProject
Set oActiveView = oProject.ActiveViews.ActiveView
Set oViewConfigs = oProject.ViewConfigs
Set oViewConfig = oViewConfigs.ItemByName(oActiveView.Name)
Set oCurrentRecordSet = oViewConfig.CreateRecordSet
Set oCurrentRecord = oCurrentRecordset.DialogSelectRecord("anm")
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.
You may choose not to have a unique web analytics cookie identification number assigned to your computer to avoid the aggregation and analysis of data collected on this website.