<%Next%>

2005	Collecteur Pernessy	Commune du Mont-sur-Lausanne

2005	Paroi antibruit de la Bourdonnette à Lausanne	Etat de Vaud génie civil

2004	Contrôle des ouvrages d'art	Canton de Vaud - DFIN - Service des routes génie civil

2002 - 03	Mise en séparatif du voûtage du Rionzi (800m)	Commune du Mont-sur-Lausanne

1999 - 00	Aménagements routiers et collecteurs	Commune du Mont-sur-Lausanne

1997 - 00	Evitement de Cheseaux, murs de soutènement et passerelle	Canton de Vaud

1997 - 98	Paroi antibruit Le Miroir à Grandvaux	Canton de Vaud, Service des routes

1993	Routes et chemins de dévestiture au Mont-sur-Lausanne.		Commune du Mont-sur-Lausanne

1993	Canalisations multitubulaires pour les téléphones	Direction d'arrondissement des Téléphones

	Divers collecteurs	Commune du Mont-sur-Lausanne

<% Function affaire(categorie, page) dim aff() dim ligne dim ligneSplit Set FSO = _ Server.CreateObject("Scripting.FileSystemObject") dir = Server.MapPath("data/") Fnm = dir & "\affaires.txt" if FSO.FileExists(Fnm) then set inF = FSO.OpenTextFile(Fnm,1,false) end if While not inF.atEndOfStream ligne = inF.readLine ligneSplit = Split(ligne,vbtab) if len (ligne)>2 then if ligneSplit(3)= categorie then for j=0 to UBound(ligneSplit) Redim preserve aff(5,i+1) aff(j,i) = ligneSplit(j) next i=i+1 end if end if Wend inF.close affaire = aff end function %>