Discussion :

[Ted37]

Bonjour,

Mon soucis est le suivant :
J'ai une image que je découpe en n image (ça c'est ok) ensuite je récupère dans n fichier texte (en fonction du nombre de découpe de l'image) les coordonnées des 4 angles de chacune de mes nouvelles images (ça c'est ok).

Ensuite je veux générer un fichier kml pour chacune de mes images (je sais générer un fichier kml) mais je souhaiterais que mes fichiers kml créés récupèrent le nom de chaque image et les coordo de chaque angle, sachant qu'il faut faire une modification des angles. En effet, mon fichier kml doit être en degré décimal sauf que moi je récupère mes infos en degré minute seconde (je connais la formule ;-)).

Quelqu'un peut-il me secourir?

En espérant avoir été clair??
D'avance merci,

[Ted37]

J'arrive à créer mon fichier kml

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Open Kml For Output As #1
Print #1, "<?xml version=""1.0""encoding=""UTF-8""?>"
Print #1, "<kml xmlns=""http://earth.google.com/kml/2.2"">"
Print #1, "<GroundOverlay>"
  Print #1, "<name>"; NomFic; "</name>"
 
   Print #1, "<visibility>"; 1; "</visibility>"
     Print #1, "<Icon>"
         Print #1, "<href>"; NomFic; "</href>"
        Print #1, "<viewBoundScale>0.75</viewBoundScale>"
    Print #1, "</Icon>"
     Print #1, "<LatLonBox>"
       Print #1, "<north>"; var1; "</north>"
       Print #1, "<south>"; var2; "</south>"
        Print #1, "<east>"; var3; "</east>"
         Print #1, "<west>"; var4; "</west>"
     Print #1, "</LatLonBox>"
Print #1, "</GroundOverlay>"
Print #1, "</kml>"
Close #1
 
Shell "cmd.exe /c" & Kml, vbNormalFocus

Malheureusement, je n'arrive à créer qu'un seul kml avec mes n fichiers et je n'arrive pas à prendre récupérer de manière automatique les var1, var2, var3 et var4 (je suis obligé de les écrire en dur, ce ne serait pas génant s'il n'y avait que 2 fichiers, mais je peux en avoir jusqu'à une quinzaine).

D'avance merci