Latest Contributions by GarethWalters

Hi Rosie it should all be fine, but with the older versions we obviously don't do as much certification. having said that ArcPad will run on Windows 7 fine. ... View more

If you customised the icons in the folder then you probably overwrote them when you installed ArcPad 10. You would need to put you custom icons back in to the icons folder. ... View more

Hi Richard, You could change the second line to Application.UserProperties("Test1Value") = "Test1" And then when you activate the page make the control = Application.UserProperties("Test1Value") And if you don't want to physically go to that page you can invoke it automatically using: application.map.editlayer.forms("EDITFORM").pages("TL").acvtivate ... controls("ob_l_tx").value = Application.UserProperties("Test1Value") ... application.map.editlayer.forms("EDITFORM").pages("g_si_tx").acvtivate Let me know how you go. Cheers, Gareth ... View more

Hi Suzanne, Great question. The layers can be in their own separate locations because once they are loaded in to the same map, ArcPad stores those details so you can stick with using Set objParcel = Map.Layers("Basemap"). If you have a quick look at the attachment you will see that I have data from two different locations and using the same line of code I can read the file path for both. So I believe you are on the right track. Let me know if you need anymore assistance [ATTACH=CONFIG]19771[/ATTACH] Cheers, Gareth ... View more

Hi Andreas, That is great news. Keep up the good work :cool: Cheers, Gareth ... View more

Hi Cam, Try changing it to txtAppl.Value. Let us know how you go. ... View more

Hi Andreas, There are two immediate methods you could try. If you have ArcGIS 10.1, the data interoperability extension can read AXF data as featureclasses and you could do some magic spatial joining or some other manipulation. If you don't have Data Interop. you could use this too - http://www.safe.com/solutions/for-applications/esri/esri-arcgis/arcpad/ If you have checked the data in from the AXF, you could change the AXF_STATUS column to represent the original state. This could be more tedious. Let me know which way you decide and we can work through it. Cheers, Gareth ... View more

Hi Ryan, Below I have written a quick test for you. This checks for the two scenarios you mentioned. Null should be allowed as a value in the shapefile. This routine is being called on the Pages onValidate event: Sub CheckNumber Dim objPage Set objPage = ThisEvent.Object Dim objChkBox Set objChkBox = objPage.Controls("Check1") Dim objTxtBox Set objTxtBox = objPage.Controls("Edit1") If (objChkBox.Value = False) And (objTxtBox.Value = "") Then     ThisEvent.Result = False     ThisEvent.MessageText = "Please add a value to the text box > 0" ElseIf (objChkBox.Value = True) And (objTxtBox.Value < 0) Then     ThisEvent.Result = False     ThisEvent.MessageText =    "Raise the alert!" End If End Sub Let me know how you go. Cheers, Gareth ... View more

Hi Cam, It sounds like you have some fun ahead of you. To begin with, when the form is open you can only access the related table items when those specific pages are initiated. You will have to store the values of the edit form page and then manually go to the table form and use something like the onLoad event on that. Option Explicit Sub getAllControls()     'get the Form object     Dim objForm     'ThisEvent access the object based on the event that was executed     Set objForm =  ThisEvent.Object 'or you could use something like this: Map.Layers("Poles").Forms("EDITFORM")     Dim objEditPage      Set objEditPage = objForm.Pages("General")     Dim objAllControls     Set objAllControls = objEditPage.Controls     Dim objControl     for each objControl in objAllControls         'Creates an application variable which can be used anywhere in ArcPad.         Application.UserProperties(objControl.Name) = objControl.Value         Console.print Application.UserProperties(objControl.Name)     next End Sub 'This would set on the tableform onload event Sub AccessTheUserProperties()     Dim objTableForm     Set objTableForm = ThisEvent.Object     Dim objTablePage = objTableForm.Pages("Lights")     Dim objtxtBox     Set objTxtBox.Text = Application.UserProperties("domMaterial") End Sub If you are after bulk updating of records in the table forms you will need to look at using the DataSource object and supplying a SQL expression that could do so. This tends to be more advanced (purely because you are not using the forms to edit). Let me know how you go. Cheers, Gareth ... View more

Hi Cam, To start with try the Quick Start Land Survey tutorial in the Customizing ArcPad help documentation. This shows the steps of where to start. If you could give a better description of the project at hand we might be able to give you a better chunk of script. Cheers, Gareth ... View more