[AccessD] update qry to deconstructe place

Then put this in a module:

Function SplitDeathPlace(strPlace As String, intPos As Long) AS String
Dim strArray() As String
strArray=Split(strPlace,", ")
SplitDeathPlace=strArray(intPos)
End Function

And in your query, put the following for DeathCity:

SplitDeathPlace([DeathPlace],0)

Replace the 0 with 1 for deathcounty, and 2 for deathstate

Drew

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Kathryn
Bassett
Sent: Monday, August 16, 2004 7:57 PM
To: 'Access Developers discussion and problem solving'
Subject: RE: [AccessD] update qry to deconstructe place


Yes 

--
Kathryn Rhinehart Bassett (Pasadena CA)
"Genealogy is my bag" "GH is my soap"
kathryn at bassett.net
http://bassett.net   

> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com 
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of 
> DWUTKA at marlow.com
> Sent: 16 Aug 2004 1:32 pm
> To: accessd at databaseadvisors.com
> Subject: RE: [AccessD] update qry to deconstructe place
> 
> I forgot, are you using Access 2000?
> 
> Drew

-- 
_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com