Annonce
Pour sa 21ème année, l’association GeoRezo a toujours besoin de vous !
10€ = 1 mois de frais bancaires ; 15€ = 12 mois de nom de domaine ; 30€ = 1 semaine de location des serveurs …
Retrouver nos membres bienfaiteurs
Pages: 1
- Sujet précédent - [ArcGIS 9.x] Définir un emplacement de sauvegarde automatiquement - Sujet suivant
#1 Wed 18 January 2006 11:34
- kikoo
- Juste Inscrit !
- Date d'inscription: 18 Jan 2006
- Messages: 2
[ArcGIS 9.x] Définir un emplacement de sauvegarde automatiquement
--------------------------------------------------------------------------------
Bonjour,
J'ai un script VB pour me permettre d'automatiser certaines tâches sous ArcMap.
Par exemple j'appele la fonction ExecuteSaveAs
Code:
Public Sub ExecuteSaveAs() Dim pCBs As ICommandBars Set pCBs = ThisDocument.CommandBars pCBs.Find(ArcID.File_SaveAs).Execute End Sub
Cependant en utilisant cette fonction, je suis forcée de sélectionner manuellement l'emplacement où va se faire la sauvegarde.
J'aimerais ne faire aucun clic manuellement afin que tout soit complètement automatisé.
Quelqu'un aurait il une idée ?
merci,
Hors ligne
#2 Wed 18 January 2006 15:01
- Ludovic L
- Membre
- Lieu: Tours
- Date d'inscription: 23 Jun 2005
- Messages: 333
Re: [ArcGIS 9.x] Définir un emplacement de sauvegarde automatiquement
Bonjour,
Completement intuitivement sans verifier que ca existe peut-etre en remplacant
pCBs.Find(ArcID.File_SaveAs).Execute
par
pCBs.Find(ArcID.File_Save).Execute
Vous avez essayé ?
Cordialement
Ludovic
Conservatoire d'espaces naturels Centre-Val de Loire
Responsable SIG et informatique
Hors ligne
#3 Wed 18 January 2006 15:36
- kikoo
- Juste Inscrit !
- Date d'inscription: 18 Jan 2006
- Messages: 2
Re: [ArcGIS 9.x] Définir un emplacement de sauvegarde automatiquement
en fait je veux enregistrer les fichiers à des endroits différents à chaque fois
je viens de trouver la solution :
Code:
Public Sub TestSauvegardeMXD() Dim pApp As IApplication Set pApp = Application pApp.SaveAsDocument ("c:\temp\MaSauvegarde.mxd") MsgBox "Le fichier a été sauvegardé.", vbInformation End Sub
Hors ligne
Pages: 1
- Sujet précédent - [ArcGIS 9.x] Définir un emplacement de sauvegarde automatiquement - Sujet suivant