|
POST
|
Bruce, I've found the whole AXF root personally a bit flakey and have in the past lost data with it corrupting itself and refusing to check data back in. One silver lining is that ArcPad studio can now export the contents to a shapefile. So if your checking in is bombing out for what ever reason you can potentially recover the data from the AXF file by exporting it to a Shapefile. This will presumably negate any useful checking in/out you did. To export to shapefile open the AXF database in ArcStudio, expand the FeatureLayers and right click on the Layer and choose export... I think this has been a very useful and life saving addition to ArcStudio. Duncan
... View more
09-15-2011
03:30 AM
|
0
|
0
|
535
|
|
POST
|
I've just been working on a project developing a custom data capture project on a Trimble YUMA. My only problem with it was the 32Gb solid state Hard drive was not enough space, after Windows 7 and all the other software (Arcpad etc.) I was left with "only" 20Gb of space. I needed to supply the field surveyor with a huge amount of raster imagery for much of the Scottish coastline. The solution was to put that all on a 400GB USB drive and the surveyor has to bite the bullet and deal with the faff of manually deleting and copying folders when they moved to their next survey block.
... View more
09-15-2011
03:19 AM
|
0
|
0
|
429
|
|
POST
|
Open Arctoolbox window, right click on the root ArcToolbox and select environments... Duncan
... View more
09-15-2011
03:05 AM
|
0
|
0
|
558
|
|
POST
|
Hi Steve, I've looked at your code and there appears to be some nutty situation where you are looping through every 5th vertex of each polygon and repeating the loop. I think this is where your code is going amiss. So I've cleaned up the code for you and have reposted it. You also create objects then never use them... I've removed them too! You placed code that only needs to called once inside the loop so these have been moved out. As I don't have your data I was unable to test this code. Duncan
... View more
09-14-2011
08:03 AM
|
0
|
0
|
359
|
|
POST
|
All, I had been thinking of a work around all weekend to this problem so I came into the office with a way of resolving this problem, fired up help and was just doing some casual searching when I spotted AddItemsFromTable. So during design time we have a property of the ComboBox called listtable but during runtime it's called AddItemsFromTable. So my apologies to all for asking this question as I'm not used to objects having different names for the same property... Code is below. Duncan
Sub PopulateCombobox
' Get file path of APM file then use this to create a path to dBase file
Dim fp
fp = MAP.FilePath
Dim i
i = instrrev(fp,"\")
fp = left(fp,i) & "SpeciesList.dbf"
' Get control and refresh
Dim p
Set p = ThisEvent.Object
Dim c
Set c = p.Controls
Dim sc
Set sc = c.Item("cmbxSpecies")
sc.Clear
sc.AddItemsFromTable fp,"Species","Species"
End Sub
... View more
09-12-2011
01:15 AM
|
0
|
0
|
404
|
|
POST
|
All, I'm having real problems with this one and was hoping someone out there could help. I have a form with 3 pages, page 2 has a combobox on it where I have set the listtable to be a dbf file at design time. Page 3 has the ability to append a new entry to the end of the dbf file (This bit of code works fine). I want to be able to see this new entry if I tab back to page 2. I cannot seem to find any method that refreshes the combobox, is it possible? I've tried setting the listtable property of the combobox but it keeps bombing out saying that it's not a property... below is the code that is called by an onclick button event on page 3. Any ideas, I'm using Arcpad 10? Duncan Sub NewSpecies
' Description: Appends a new species to dbf file
'
' Created: 9/9/11
' Get species name
dim b
Set b = ThisEvent.Object
dim p
set p = b.Parent
dim c
set c = p.Controls
dim t
set t = c.Item("ebxNew")
dim s
s = t.Text
If s = "" then
msgbox "You must set the species name first!", vbExclamation, "Invalid species name..."
Exit Sub
End If
' Get file path of APM file then use this to create a path to dBase file
dim fp
fp = MAP.FilePath
dim i
i = instrrev(fp,"\")
fp = left(fp,i) & "SpeciesList.dbf"
' Open dBase file
Dim rs
set rs = APPLICATION.CreateAppObject("RecordSet")
rs.Open fp,2
' Find out what is the last ID and increment by 1
rs.MoveLast
dim id
id = rs.Fields.Item("ID").Value
id = id + 1
' Add new species
rs.AddNew
rs.Fields.Item("ID").Value = id
rs.Fields.Item("Species").Value = s
rs.Update
' Refresh combobox
dim cb
set cb = p.Parent.Pages("PAGE2").Controls.Item("cmbxSpecies")
msgbox cb.Name
set cb.listtable = "SpeciesList.dbf" '<<<<<<<<<<<< This does not work
cb.listtable = "SpeciesList.dbf" '<<<<<<<<<<<<<< nor does this!
Msgbox "Species " & s & " successfully added to list!",vbInformation,"List updated!"
End Sub
... View more
09-09-2011
11:13 AM
|
0
|
2
|
2310
|
|
POST
|
Justin, As I understand it a Feature is nothing more than a row in a table where one of the fields just happens to hold a geometry rather than all fields being non-spatial data. So I don't see why you can't have a row (feature) where all values are set to NULL, this should still be a valid row in your table (featureclass). Anybody out there do correct me if I am wrong? So you dataset is a "simple" shapefile and when you issue a delete is sets everything to NULL but does does not remove the row from the table? Maybe you could post up your code for us to see? Duncan
... View more
09-08-2011
08:19 AM
|
0
|
0
|
581
|
|
POST
|
Mele, I've never used it but have a go at using the Interface IDatasetEdit? Duncan
... View more
09-08-2011
08:11 AM
|
0
|
0
|
400
|
|
POST
|
You could try to run the MXD through MXD Doctor? I suggest you back up the file before you do that just in case it blitzes it. It's a tool under the Desktop Tools group if you are using version 10. Duncan
... View more
09-08-2011
07:24 AM
|
0
|
0
|
612
|
|
POST
|
Justin, I'm surprised the pFeature.Delete did not work which suggests to me the source of your problem is something else, what format is your data store as? If it's ArcSDE then maybe some weird locking is going on? I would try you code on a small sample of say a shapefile? Duncan
... View more
09-08-2011
07:14 AM
|
0
|
0
|
581
|
|
POST
|
All, Just want to run this past the ArcObject Gurus\ESRI to make sure I'm not doing something dumb. I have created an instance of a GXDialog and set the ObjectFilter to Personal GeoDatabase. My code is below: Public Sub test()
Dim pGXDialog As IGxDialog
Set pGXDialog = New GxDialog
' Set properties
Dim pGXObjectFilter As IGxObjectFilter
Set pGXObjectFilter = New GxFilterPersonalGeodatabases
Set pGXDialog.ObjectFilter = pGXObjectFilter
pGXDialog.Title = "Locate Access Database"
pGXDialog.AllowMultiSelect = False
pGXDialog.ButtonCaption = "Open"
' Open dialog
Dim pEnumGXObject As IEnumGxObject
pGXDialog.DoModalOpen 0, pEnumGXObject
' Get Object
Dim pGXObject As IGxObject
Set pGXObject = pEnumGXObject.Next
End Sub The resulting Dialog has a file type of File and Personal GeoDatabases which means a user can potentially select a File GeoDatabase which would be a problem. See image below. Is this a bug in ArcObjects? Duncan
... View more
09-02-2011
07:03 AM
|
0
|
1
|
800
|