Calculate X/Y Using VB or Python in a Model

GabeMarcello

This VBA script calculates x/y values from the Shape field to another field. It used to work for me in 9.3 but doesn't work anymore for 10 because of the switch to VB/Python. How would I rewrite this in VB or Python to work in 10? The 'Calculate Geometry' function is useless to me because I want to use it in a model and 'Add X/Y' creates new fields rather than calculating existing ones.

Pre-Logic Script Code:
dim dblx as double
dim dbly as double
dim pPoint as Ipoint
set pPoint = [Shape]
dblx = pPoint.x
dbly = pPoint.y


Field=
dbly

GabeMarcello

The Add XY coordinates tool pulls the XY coordinates from the shape field. This would be useful for models when you needed to add the fields and also find the X and Y values. It will save a few steps. This tool will also give the Z or M values from the shape field as well if they were enabled on the feature class when it was made. See this link for more information on the tool:
http://help.arcgis.com/en/arcgisdesktop/10.0/help/index.html#//001700000032000000.htm

To do a field calculation with the Python parser, see this sample script.
Pre-Logic Script Code:

def find(shape):
  point = shape.getPart(0)
  return point.X

NewX =

find(!Shape!)

This code is a sample modified from the Code samples -geometry section found on this link:
http://help.arcgis.com/en/arcgisdesktop/10.0/help/index.html#//005s0000002m000000.htm

Hrm... This works great, but only on blank fields. I tried overwriting and it errors.