[WIP]La transformation de systeme de projection Sans Plug-in autocad

[Fraid]

Bonjour,

 

Dans la console si tu tape path

vois tu le chemin qui mène à Circebatch?

 

tu peux rajouté un path directement dans la console

 

IF EXIST "c:\mon chemin\" SET PATH=%PATH%;"c:\mon chemin\"

mais cela fait la même chose que la vidéo

comme tu vois j'ai mis des guillemet autour des chemins car si il y a un blanc cela interrompt le chemin

regarde si ton erreur ne vient pas de la

[Curlygoth]

Yes, c'est bon

 

J'ai vu la vidéo et je l'ai fait

J'ai vérifier il n'y a pas d'espace ni au début ni à la fin ! ;-)

 

[Fraid]

Comment lis tu le retour?

je l'envois dans un texte en plaçant à la fin

 > "C:\mon dossier\monfichier.txt"

puis je le lis pour récupérer les valeurs

[Curlygoth]

Yes, c'est bon

 

J'ai vu la vidéo et je l'ai fait

J'ai vérifier il n'y a pas d'espace ni au début ni à la fin ! ;-)

 

 

 

Alors j'ai fait un truc "D*G*E*A*S*E" mais ça marche...

 

j'ai mis Circé dans le C/Users/PC-ACAD pour moi XD et ça marche via la ligne de commande mais pas dans l'interpréteur VBA XD

[Fraid]

je ne sais pas si tu a vu mon message précédant???

le retour?

[Curlygoth]

A oui pardon !

 

j'écris :

 

cmd = "CirceBatch.exe -init Circe.ini -mode 0 -type 2 -sys1 2 -sys2 24 -typcoor1 3 101 -typcoor2 3 140 -E 568270.665 -N 361027.632"
retval = Shell(cmd)

 

remarque attend le cmd est un string donc avec des guillements !

[Fraid]

c'est la l'erreur

la console ne renvois pas le retour des commandes.

d'ou écriture puis lecture

[Curlygoth]

donc j'ai essayer ça :

 

dans la fenetre commande ça passe j'ai le résultat mais pas de txt créer...

 

et dans vba pas de txt créer

 

CirceBatch.exe -init Circe.ini -mode 0 -type 2 -sys1 2 -sys2 24 -typcoor1 3 101 -typcoor2 3 140 -E 568270.665 -N 361027.632 -f2 C:\K2M\Return9TDD.txt

et ca:

CirceBatch.exe -init Circe.ini -mode 0 -type 2 -sys1 2 -sys2 24 -typcoor1 3 101 -typcoor2 3 140 -E 568270.665 -N 361027.632 > C:\K2M\Return9TDD.txt

 

ca ne me génére pas le fichier txt et le dossier existe ^^

[Fraid]

maintenant que ton .bat est bon, cela vient du VBA

la fonction Shell demande à exécuter un fichier

il faut que tu ecrive ton .bat

et que tu le lance avec shell

on va y arrivé :(rires forts):

[Curlygoth]

c'est fait mais le txt ne se génère pas (même en entrant la commande dans le cmd)

j'ai créer le fichier de retour il n'écrit rien dedans...

[Fraid]

tu l'ecrit comment ton .bat?

 

Sub writeTxt()
Dim FSO As New FileSystemObject
Dim Fichier As TextStream
Set Fichier = FSO.CreateTextFile("C:\K2M\test.bat")
Fichier.WriteLine ("CirceBatch.exe -init Circe.ini -mode 0 -type 2 -sys1 2 -sys2 24 -typcoor1 3 101 -typcoor2 3 140 -E 568270.665 -N 361027.632 > "C:\K2M\Return9TDD.txt"")
Fichier.Close 
End Sub

 

puis tu le lance comme cela?

 

Shell("C:\K2M\test.bat")

[Curlygoth]

exactement j'aime pas passer par des références (meme si disons la c'est mieux) mais le résultat l'encodage etc est le meme

 

et j'ai essayer avec > et -f2

[Fraid]

si tu écrit à la main le .bat est ce qu'il s’exécute en double cliquant dessus?

[Curlygoth]

malheureusement non c'est le premier test que j'ai fait d'ailleurs XD

 

et cette histoire que j'ai mis dans le path mais qu'il va chercher dans c\users\pc-acad ? au lieu du path justement ? (c'est un autre probleme mais bon c'est pas propre XD

[Fraid]

si le .bat ne fonctionne pas, :o

et directement dans la console

"C:\Program Files (x86)\IGN\Circé France Batch 4.3\CirceBatch.exe"

[Curlygoth]

le chemin complet ne fonctionne pas par contre Circebatch.exe marche il m'ouvre le doc.txt

 

dans la console avec le pourcentage de lecture en bas

 

dans la console tout marche ! il donne le résultat mais il ne me génére pas le txt

[Fraid]

cela ressemble à un problème de droit d'écriture

peut être exécuter circebatch en tant qu'administrateur...

[Curlygoth]

mmmmmmm...

 

Alors ok mais j'ai essayer avec la comptabilisé avec la coche et sans la coche sur l'execution en admin...

[Curlygoth]

et sinon si je dois ecrire un -f1 je mets juste les coordonnées dedans ?

 

pour le fichier Circi.ini je peux le rempliur s'il faut :

[Olivier Eckmann]

Bonjour,

 

Sinon, il y a ce projet qui peut servir : PROJ

 

Olivier

[Curlygoth]

allez pourquoi pas essayer toutes les possibilités il y en a bien une qui marchera ! (J'espère)

 

Mais je suis sur que j'ai du zapper une manip ou qu'il y a un truc qui bloque c'est pas normal que la commande fonctionne (aleluia)

mais que j'arrive pas a voir la valeur de retour ou le fichier...

 

je vais regarder merci !

[Olivier Eckmann]

Bonjour,

 

En fait je proposais ça pour éviter de passer par la ligne de commande puisque tu disposes des API pour faire le boulot.

Mais les API de PROJ sont en C++ uniquement, cependant il y a 2 portages existants sous DotNet :

DotSpatial

et

ProjNet4GeoAPI

 

Olivier

[Curlygoth]

ok sympa merci

 

Je vais étudier tout ça !

 

je suis débutant voir néophite en C++

 

par contre le vb.net ^^ je vais checker merci