Proposition de nouvelle organisation des donnÃ©es SIG et crÃ©ation d ...

More documents

Recommendations

Info

Proposition de nouvelle organisation des données SIG et création d’un outil de catalogage et de consultationdes métadonnées SIG pour le Parc Naturel régional Scarpe EscautAnnexe 9 : Fonction de visualisation des données shapefile (FileWrite)Function FileWrite(strFile As String, Var1 As String, Var2 As String)Dim fso As Scripting.FileSystemObjectDim fle As Scripting.FileDim stm As Scripting.TextStream' Créer une instance du FSOSet fso = New Scripting.FileSystemObject' Ouvrir le fichier en écritureSet stm = fso.CreateTextFile(strFile, True)' Ecrire quelques lignes dans le fichierWith stm' Ecrire la structure du projet ArcExplorer.WriteLine "[ARCEXPLORER]".WriteLine "VERSION=1.1.500".WriteLine "DISPLAYOVERVIEW=1".WriteLine "DISPLAYSCALEBAR=1".WriteLine "DISPLAYEXPLORER=1".WriteLine "[MAP]".WriteLine "EXTENT=544437,1875^735577,625^1389352,6752038^1241011,0747962".WriteLine "BACKCOLOR=16777215".WriteLine "BorderStyle = 0".WriteLine "CANCELACTION = 1".WriteLine "ScrollBars = Faux".WriteLine "3D=1".WriteLine "LAYERCOUNT = 3".WriteLine "MAPUNITS = 0".WriteLine "SCREENUNITS = 1".WriteLine "SCALEBARUNITS = 3".WriteLine "SELECTCOLOR = 65535"‘description de la couche qui sera visualisée en plus du contour du PNR Scarpe Escaut et du Sage Scarpe Aval.WriteLine "[MAPLAYER2]".Write "WORKSPACE="‘ Var 1 correspond au chemin informatique de la donnée.WriteLine Var1.Write "BASE = 0 ^ "‘ Var2 correspond au nom de la donnée.Write Var2.Write ".shp ^ ".WriteLine Var2.WriteLine "SYMBOL=38618521Ârial^8,25^2^0^0^2^1^53^0".WriteLine "RENDERERTYPE = 0".WriteLine "RENDERER=".WriteLine "REMOUTLINE = 0".WriteLine "Visible = 1".WriteLine "SCALEFACTORS = 0 ^ 0".WriteLine "MAPTIPFIELD="162
Proposition de nouvelle organisation des données SIG et création d’un outil de catalogage et de consultationdes métadonnées SIG pour le Parc Naturel régional Scarpe Escaut.WriteLine "ADDMATCH=^0^^^^^^^^^^^^^"‘description des deux couches qui apparaissent comme fond de visualisation : contour du PNRScarpe Escaut et du Sage Scarpe Aval.WriteLine "[MAPLAYER1]".WriteLine "WORKSPACE=O:\stage\sig\arborescence\Périm_institutionnels\SAGE\OK".WriteLine "BASE=0^SAGE.SHP^SAGE".WriteLine "SYMBOL=45236025Ârial^8,25^2^1^16711680^2^1^53^0".WriteLine "RENDERERTYPE = 0".WriteLine "RENDERER=".WriteLine "REMOUTLINE = 0".WriteLine "Visible = 1".WriteLine "SCALEFACTORS = 0 ^ 0".WriteLine "MAPTIPFIELD=".WriteLine "ADDMATCH=^0^^^^^^^^^^^^^".WriteLine "[MAPLAYER0]".WriteLine"WORKSPACE=O:\stage\sig\arborescence\Périm_institutionnels\PNRSE\OK\Contour_PNR_Comasso".WriteLine "BASE=0^Contour_PNR_Comasso.shp^Contour_PNR_Comasso".WriteLine "SYMBOL=37122706Ârial^8,25^2^1^32768^3^1^53^0".WriteLine "RENDERERTYPE = 0".WriteLine "RENDERER=".WriteLine "REMOUTLINE = 0".WriteLine "Visible = 1".WriteLine "SCALEFACTORS = 0 ^ 0".WriteLine "MAPTIPFIELD=".WriteLine "ADDMATCH=^0^^^^^^^^^^^^^".WriteLine "[OVERVIEW]".WriteLine"BASE=0^Contour_PNR_Comasso.shp^Contour_PNR_ComassoÔ:\stage\sig\arborescence\Périm_institutionnels\PNRSE\OK\Contour_PNR_Comasso^^Contour_PNR_Comasso^^".WriteLine"WORKSPACE=0^Contour_PNR_Comasso.shp^Contour_PNR_ComassoÔ:\stage\sig\arborescence\Périm_institutionnels\PNRSE\OK\Contour_PNR_Comasso^^Contour_PNR_Comasso^^".WriteLine "[SCALEBAR]".WriteLine "MAPUNITS = 0".WriteLine "SCREENUNITS = 1".WriteLine "SCALEUNITS = 3".WriteLine "[AEWEB]".WriteLine "AEWEBCOUNT = 0"' Fermer le flux.CloseEnd With' Libérer les objetsSet stm = NothingSet fso = NothingEnd Function163
Page 2 and 3:
Proposition de nouvelle organisatio
Page 4 and 5:
Page 6 and 7:
Page 9 and 10:
Page 11 and 12:
Page 13 and 14:
Page 16 and 17:
Page 18 and 19:
Page 20 and 21:
Page 22 and 23:
Page 24 and 25:
Page 26 and 27:
Page 28 and 29:
Page 30 and 31:
Page 32 and 33:
Page 34 and 35:
Page 36 and 37:
Page 38 and 39:
Page 40 and 41:
Page 42 and 43:
Page 44 and 45:
Page 46 and 47:
Page 48 and 49:
Page 50 and 51:
Page 52 and 53:
Page 54 and 55:
Page 56 and 57:
Page 58 and 59:
Page 60 and 61:
Page 62 and 63:
Page 64 and 65:
Page 66 and 67:
Page 68 and 69:
Page 70 and 71:
Page 72 and 73:
Page 74 and 75:
Page 76 and 77:
Page 78 and 79:
Page 80 and 81:
Page 82 and 83:
Page 84 and 85:
Page 86 and 87:
Page 88 and 89:
Page 90 and 91:
Page 92 and 93:
Page 94 and 95:
Page 96 and 97:
Page 98 and 99:
Page 100 and 101:
Page 102 and 103:
Page 104 and 105:
Initialisationde la « tablerequêt
Page 106 and 107:
Page 108 and 109:
Page 110 and 111:
Page 112 and 113: Proposition de nouvelle organisatio
show all

Proposition de nouvelle organisation des donnÃ©es SIG et crÃ©ation d ...

Create successful ePaper yourself

Delete template?

Save as template?