Option Explicit Dim varUniqueID Sub UniqueID ' CREATE THE VARAIBLE AND ASSIGN IT THE CREATED GUID ' Dim createUniqueID ' I commented this varaible out because I delclared it global above in the option explicit...you can delete the global varaible and declare it here if you want... ' globally you can do other stuff with it... varUniqueID= System.CreateGuid ' NEXT YOU HAVE TO GRAB THE FORM PAGE AND ASSIGN THE VARAIBLE TO THE TEXTBOX Dim objRS, objSelLayer, objEFPageOneControls3, objEditForm3 Set objSelLayer = Map.SelectionLayer Set objRS = objSelLayer.Records objRS.Bookmark = Map.SelectionBookmark Set objEditForm3 = application.map.layers("Outfalls").forms("EDITFORM") Set objEFPageOneControls3 = objEditForm3.Pages("page1").Controls objEFPageOneControls3("Edit1").Value = varUniqueID End Sub
We simply created a field for out unique ID and enter it manually. So if I was entering the unique ID at the time of this writing, I would simply enter 1107271120 for 11-year, 07-Month, 27-day, 1120- hour. It requires typing with each feature created, but it is simple.
Rolf, I'm a bit of a novice with ArcPad. Would I do this script in ArcStudio in the axf file on the desk top, create a new field for the unique ID and then load it into the Trimble unit? Thanks for any additional guidance on how to do this.
Signed in members can post, follow updates, and more. New here? Register a free account.
Find useful guides, FAQs, and documents to help you navigate and make the most of Esri Community.