{"id":1019,"date":"2009-07-17T13:00:21","date_gmt":"2009-07-17T11:00:21","guid":{"rendered":"https:\/\/blog.georezo.net\/infobulle\/?p=1019"},"modified":"2009-07-15T20:55:45","modified_gmt":"2009-07-15T18:55:45","slug":"facile-mais-ne-le-dites-a-personne","status":"publish","type":"post","link":"https:\/\/blog.georezo.net\/infobulle\/2009\/07\/17\/facile-mais-ne-le-dites-a-personne\/","title":{"rendered":"Facile, mais ne le dites \u00e0 personne&#8230;"},"content":{"rendered":"<p>A la question :<\/p>\n<blockquote><p>transformer du wkt en shp dans une appli en vb pour arcview3.2<\/p><\/blockquote>\n<p>Voil\u00e0 la r\u00e9ponse &#8230;secr\u00e8te !<\/p>\n<blockquote><p><em>Le \u00ab\u00a0secret\u00a0\u00bb pour transformer du WKT en entit\u00e9s (dans notre cas en objets ESRI.MapObjects) passe par les expressions r\u00e9guli\u00e8res disponibles avec la r\u00e9f\u00e9rence \u00ab\u00a0Microsoft VBScript Regular Expression<br \/>\n5.5\u00a0\u00bb (\u00ab\u00a0C:WINDOWSsystem32vbscript.dll\u00a0\u00bb) normalement pr\u00e9sente surwindows XP.<\/em><\/p>\n<p><em>Public Const CoordPattern =<br \/>\n\u00ab\u00a0(([0-9]+.[0-9]*)|([0-9]*.[0-9]+)|([0-9]+))\u00a0\u00bb<br \/>\nPublic Const PointPattern = \u00ab\u00a0(\u00a0\u00bb &amp; CoordPattern &amp; \u00ab\u00a0( +\u00a0\u00bb &amp;<br \/>\nCoordPattern &amp; \u00ab\u00a0){1,2})\u00a0\u00bb<\/em><\/p>\n<p><em>&lsquo;&#8212;&#8212;&#8212;<br \/>\n&lsquo; Methode\u00a0 \u00a0 \u00a0:\u00a0 \u00a0 \u00a0 GetPoints<br \/>\n&lsquo; Entr\u00e9e\u00a0 \u00a0 \u00a0 :\u00a0 \u00a0 \u00a0 Une chaine WKT de Points<br \/>\n&lsquo; Sortie\u00a0 \u00a0 \u00a0 :\u00a0 \u00a0 \u00a0 Une MatchCollection de points de type string<br \/>\n&lsquo; Description :\u00a0 \u00a0 \u00a0 Extrait les points d&rsquo;une chaine. Les points<br \/>\npeuvent<br \/>\n&lsquo;\u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00eatre de type 2D ou 3D et les coordonn\u00e9es sont<br \/>\ns\u00e9par\u00e9s<br \/>\n&lsquo;\u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 par des espaces.<br \/>\n&lsquo;\u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 Un Point 3D pourrait avoir cette forme : (10.0 15<br \/>\n0)<br \/>\n&lsquo;<br \/>\nPrivate Function GetPoints(ByVal Str As String) As MatchCollection<br \/>\nDim Matches As MatchCollection<br \/>\nDim Reg As New RegExp<br \/>\nReg.Global = True<\/em><\/p>\n<p><em>Reg.Pattern = PointPattern<br \/>\nSet Matches = Reg.Execute(Str)<br \/>\nSet GetPoints= Matches<\/em><\/p>\n<p><em>&lsquo;&#8211; On affiche les points<br \/>\nDim Mtch As Match<br \/>\nFor Each Mtch In Matches<br \/>\nDebug.Print \u00ab\u00a0Point =\u00a0\u00bb &amp; Mtch.Value<br \/>\nNext<br \/>\nEnd Function<\/em><\/p>\n<p><em>A partir de cette collection de points il est facile de \u00ab\u00a0reconstruire\u00a0\u00bb une collection de Points MapObject, donc des lignes et des polygones.<\/em><\/p><\/blockquote>\n","protected":false},"excerpt":{"rendered":"<p>A la question : transformer du wkt en shp dans une appli en vb pour arcview3.2 Voil\u00e0 la r\u00e9ponse &#8230;secr\u00e8te ! Le \u00ab\u00a0secret\u00a0\u00bb pour transformer du WKT en entit\u00e9s (dans &#8230;<\/p>\n","protected":false},"author":35,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[413],"tags":[414],"class_list":["post-1019","post","type-post","status-publish","format-standard","hentry","category-les-perles-de-georezo","tag-betisier"],"_links":{"self":[{"href":"https:\/\/blog.georezo.net\/infobulle\/wp-json\/wp\/v2\/posts\/1019","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/blog.georezo.net\/infobulle\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/blog.georezo.net\/infobulle\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/blog.georezo.net\/infobulle\/wp-json\/wp\/v2\/users\/35"}],"replies":[{"embeddable":true,"href":"https:\/\/blog.georezo.net\/infobulle\/wp-json\/wp\/v2\/comments?post=1019"}],"version-history":[{"count":11,"href":"https:\/\/blog.georezo.net\/infobulle\/wp-json\/wp\/v2\/posts\/1019\/revisions"}],"predecessor-version":[{"id":1105,"href":"https:\/\/blog.georezo.net\/infobulle\/wp-json\/wp\/v2\/posts\/1019\/revisions\/1105"}],"wp:attachment":[{"href":"https:\/\/blog.georezo.net\/infobulle\/wp-json\/wp\/v2\/media?parent=1019"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/blog.georezo.net\/infobulle\/wp-json\/wp\/v2\/categories?post=1019"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/blog.georezo.net\/infobulle\/wp-json\/wp\/v2\/tags?post=1019"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}