Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionDc.Database = "C:\Users\KKP\Desktop\Topo500M"
Dc.Database = "C:\Users\KKP\Desktop\Topo500M"
Dim Dc As New MapObjects2.DataConnection Try Dc.Database = "C:\Users\KKP\Desktop\Topo500M" lyr.GeoDataset = Dc.FindGeoDataset("States") AxMap1.Layers.Add(lyr) Catch ex As Exception MsgBox("Connection failed: " & ex.Message) End Try
lyr.GeoDataset = Dc.FindGeoDataset("STATES.DBF")?