Infobulle

Un blog utilisant les GéoBlogs de GeoRezo.net
  • rss
  • Accueil

Facile, mais ne le dites à personne…

10ans | 17 juillet 2009

A la question :

transformer du wkt en shp dans une appli en vb pour arcview3.2

Voilà la réponse …secrète !

Le « secret » pour transformer du WKT en entités (dans notre cas en objets ESRI.MapObjects) passe par les expressions régulières disponibles avec la référence « Microsoft VBScript Regular Expression
5.5 » (« C:WINDOWSsystem32vbscript.dll ») normalement présente surwindows XP.

Public Const CoordPattern =
« (([0-9]+.[0-9]*)|([0-9]*.[0-9]+)|([0-9]+)) »
Public Const PointPattern = « ( » & CoordPattern & « ( + » &
CoordPattern & « ){1,2}) »

‘———
‘ Methode     :      GetPoints
‘ Entrée      :      Une chaine WKT de Points
‘ Sortie      :      Une MatchCollection de points de type string
‘ Description :      Extrait les points d’une chaine. Les points
peuvent
‘                    être de type 2D ou 3D et les coordonnées sont
séparés
‘                    par des espaces.
‘                    Un Point 3D pourrait avoir cette forme : (10.0 15
0)
‘
Private Function GetPoints(ByVal Str As String) As MatchCollection
Dim Matches As MatchCollection
Dim Reg As New RegExp
Reg.Global = True

Reg.Pattern = PointPattern
Set Matches = Reg.Execute(Str)
Set GetPoints= Matches

‘– On affiche les points
Dim Mtch As Match
For Each Mtch In Matches
Debug.Print « Point = » & Mtch.Value
Next
End Function

A partir de cette collection de points il est facile de « reconstruire » une collection de Points MapObject, donc des lignes et des polygones.

Catégories
Les perles de GeoRezo
Tags
betisier

« La signature la plus longue Quand GeoRezo rapproche les hommes… »

Aider GeoRezo

Faire un don

GeoRezo

Calendrier

juillet 2009
L M M J V S D
« Juin   Août »
 12345
6789101112
13141516171819
20212223242526
2728293031  

Mots-clés

10 ans agenda Aline Altern annuaire betisier biblio-SIG blog cartographie Charles Claire Collectivité territoriale CV Erika forums francophonie Françoise geo212 GeoInWeb GeoRezo GPS Géomarketing Géomatique géospatial IGN internet Interviews Job LBS Maurice modération observation de la terre Olivier photogrammétrie québécois RadioPhare SIG SIGLL SPIP statistiques Thierry Urbanisme Vincent webmapping wiki

Les blogs de GeoRezo

  • INSPIRE by clouds
  • La Minute GeoRezo
  • Le coin de l’open-source géospatial
  • Parcell’air

Récemment

  • Bloub !
  • Travailleur bénévole…voire plus !
  • Pixel intolérant…
  • Q/R
  • Révisions sous la couette

Commentaires récents

  • Bruno dans « Zablo », inventeur du nom de domaine GeoRezo
  • Henrot dans « Zablo », inventeur du nom de domaine GeoRezo
  • salah dans Frédéric, par Fred bien sûr !
  • La Minute GeoRezo » Flashback sur l’an Neuf dans Champagne pour tout le monde !
  • Cuinet Jérôme dans La signature la plus longue

Méta

  • Connexion
  • Flux RSS des articles
  • RSS des commentaires
  • Site de WordPress-FR
rss Flux rss des commentaires valid xhtml 1.1 design by jide powered by Wordpress get firefox

- Faire un don - Contact - Mentions légales -