Le portail francophone de la géomatique

Bonjour,

Voici la methode que j’utilise pour convertir une couche au format shape
d’Esri vers Flash ou Svg,
Elle suppose de disposer de PHP (gratuit) et d’Arcgis (pas encore
gratuit) :

1)   Avec ArcCatalog (utilitaire livre avec Arcgis), creer une
geodatabase (au format Access) et y placer ses fonds ;
2)   Lancer l’un des deux scripts PHP suivants. Le premier utilise la
librairie Ming (www.opaque.net/ming) pour generer du swf.
Les fonctions Ming sont decrites dans la doc PHP classique (www.php.net
). Le second cree un fichier svg.

Le premier script affiche et cree une carte au format Flash/swf. Tous
les objets sont geres en tant que clips nommes,
donc pilotables dans Flash apres chargement via loadMovie pour
deplacements, mises a l’echelle, coloration thematique, etc.
lancement du script : genswf.php?nomtable=macouche.
Open( DRIVER={Microsoft Access Driver (*.mdb)};
DBQ=C:tmpgeo_db.mdb );

=[ nomtable ];
= 900; //largeur de la carte en pixels dans Flash
= 800; //hauteur de la carte en pixels dans Flash
= pop ; //nom de la variable « population »
= nom ; //nom de la variable « nom »

= ->Execute( SELECT * from GDB_GeomColumns where
tablename=' .. '; );
=->Fields( ExtentLeft ); =->value;
=->Fields( ExtentRight ); =->value;
=->Fields( ExtentBottom ); =->value;
=->Fields( ExtentTop ); =->value;

= ( + ) / 2;
= ( + ) / 2;
= - ;
= - ;
If ( > * ( / )) = ;
If ( Execute();
while (!->EOF) {
= new SWFShape();
->setRightFill(->addFill(0xff, 0xff, 0xcc));
->setLine(0, , , );
=->Fields();
=->value;
=->Fields();
=->value;
=->Fields( shape );
=->value;
=unpack( Vlong , substr_arr(,36,4));
=[ long ];
=unpack( Vlong , substr_arr(,40,4));
=[ long ];
=44;
For ( =0; movePenTo( ,);

} Else {
= * ( - ) ;
= -1 * * ( - ) ;
->drawLine( ,);
}
= ;
= ;
}
->drawLineto(,);
}
= new SWFSprite();
= ->add();
->nextFrame();
= ->add();
->setName();
++;
->MoveNext();
}

= new SWFAction(array_num_to_swf(, p ));
->add();
= new SWFAction(array_str_to_swf(, n ));
->add();
= new SWFAction( _parent.apresData(); );
->add();
->setBackground(0x66, 0xcc, 0xff);
->setDimension(1000,1000);

header('Content-type: application/x-shockwave-flash');
->output();
= ob_get_contents();
=strlen();
=gzcompress(substr(,8));
='CWS'.chr(0x06).pack( V ,).;
= C:tmp.swf ;
= fopen(, wb );
fwrite(, );
ob_end_clean();
print ;

->Close;
->Close;

function substr_arr(,,) {
=+;
= ;
for (=;

Et pour ceux qui aiment contempler leur sablier sur fond d’Internet
Explorer oblige en attendant l’arrivee des donnees,
voici la version Svg (je plaisante ::-) ) :
lancement du script : gensvg.php?nomtable=macouche.
Open( DRIVER={Microsoft Access Driver (*.mdb)};
DBQ=C:tmpgeo_db.mdb );

=[ nomtable ];
= 900; //largeur de la carte en pixels
= 800; //hauteur de la carte en pixels
= nom ;

= ->Execute( SELECT * from GDB_GeomColumns where
tablename=' .. '; );
=->Fields( ExtentLeft ); =->value;
=->Fields( ExtentRight ); =->value;
=->Fields( ExtentBottom ); =->value;
=->Fields( ExtentTop ); =->value;

= ( + ) / 2;
= ( + ) / 2;
= - ;
= - ;
If ( > * ( / )) = ;
If ( Execute();
=array();
=0;
while (!->EOF) {
/usr/local/sbin:/usr/local/bin:/sbin:/bin:/usr/sbin:/usr/bin:/usr/X11R6/bin:/root/bin= ;
=->Fields();
=->value;
=->Fields( shape );
=->value;
=unpack( Vlong , substr_arr(,36,4));
=[ long ];
=unpack( Vlong , substr_arr(,40,4));
=[ long ];
=44;
For ( =0; 0) /usr/local/sbin:/usr/local/bin:/sbin:/bin:/usr/sbin:/usr/bin:/usr/X11R6/bin:/root/bin.= zM ;
If ( != - 1) = [ + 1] - 1 -
;
Else = - 1 - ;
= ;
= ;
For ( = 0; MoveNext();
}

header( Content-type: image/svg+xml );
.='';
.='';
.= n .'';

.= n .'';
.= n .'';
.= n .'';

.= n .  ;

For ( = 0; ;n ;
}
.= n .'';
.= n .'';
=gzencode();
= C:tmp .. .svgz ;
= fopen(, wb );
fwrite(, );
fclose();
echo ;

->Close;
->Close;

function substr_arr(,,) {
=+;
= ;
for (=;

Eric Mauviere
Emc3
www.geoclip.net

Bonjour,

Je suis bien content que des elements plus pratiques apparaissent sur cette liste a propos de flash et de ses utilisations.

J'ai tout de meme quelques questions a propos de votre script php et de l'utilisation de la librairie Ming :

1- la connection a une base Access est-elle plus facile a gerer qu'une base MySQL ? Avez-vous fait ce choix pour la facilite qu'il apporte pour convertir les donnees depuis ArcCatalog vers un fichier .mdb ? Ou bien les connections avec une base Access est meilleure ?

2- la librairie Ming semble avoir son interet mais encore faut-il qu'elle soit integree comme module dans le serveur php. Quelle version de cette librairie est necessaire pour executer votre script ? Connaissez-vous un hebergeur gratuit qui fournisse php avec Ming ? A ma connaissance, la version incluse dans Easyphp (pour developper et tester en local sur une seule machine) n'est pas une version recente et donc peu utilisable.

3- pourquoi avez vous prefere la librairie Ming a la librairie FreeMovie dont les objectifs sont les memes ?

Merci pour vos reponses .

Pierre GIRAUD

Bonjour,

Je pensais que dans une geodatabase le codage binaire
de la geometrie dans le champ shape n'etait pas
public et que la seule aternative pour programmer
autour d'une geodatabase etait les ArcObjects.

Au vu du script php de M. Mauviere, j'avais tort.

M. Mauviere, pourriez-vous nous dire ou l'on peut
trouver des information concernant le decodage de ce
champ ?
Est-il possible a votre connaissance de decoder le
champ Xml de la table GDB_UserMetadata, champ binaire
qui decrit toutes les metadonnees d'une couche en xml
?

M. VASQUEZ
IFREMER
mkvasquez@texte-a-enlever.yahoo.com

___________________________________________________________