NIM004383 for No Product Found

Numéro d’ID de bogue	NIM004383
Envoi	September 26, 2006
Dernière modification	June 5, 2024
S’applique à	No Product Found
Version trouvée	9.2
Statut	Will Not Be Addressed

Informations supplémentaires

We apologize that we were unable to address this issue within the current product support cycle. If the issue continues to affect your work in a supported release, please contact Technical Support.

Solution de contournement

Use the following VBA script to change the config keyword of the locator.Private Sub CopyLocator() CopyLocatorToSDEWorkspace "<a href="file:c:/MyLocators" target="_blank">c:\MyLocators</a>", "MyLocator1", "myconn.sde", "MyKeyword"End SubPrivate Sub CopyLocatorToSDEWorkspace(localWksDir As String, locatorName As String, sdeConnFile As String, configKeyword as String) Dim locMgr As ILocatorManager2 Set locMgr = New LocatorManager ' get the full name of the ArcSDE connection file Dim fullConnFileName As String fullConnFileName = Environ("USERPROFILE") + "\Application Data\ESRI\ArcCatalog\" + sdeConnFile ' open ArcSde connection Dim sdeLocWks As ILocatorWorkspace Set sdeLocWks = locMgr.GetLocatorWorkspaceFromPath(fullConnFileName) ' get locator from a local folder Dim localLocWks As ILocatorWorkspace Set localLocWks = locMgr.GetLocatorWorkspaceFromPath(localWksDir) Dim loc As ILocator Set loc = localLocWks.GetLocator(locatorName) ' copy the locator to ArcSDE workspace sdeLocWks.AddLocator locatorName, loc, configKeyword, NothingEnd Sub