Nous utilisons des cookies pour vous garantir la meilleure expérience sur notre site. Si vous continuez à utiliser ce dernier, nous considèrerons que vous acceptez l'utilisation des cookies. J'ai compris ! ou En savoir plus !.
banniere

Le portail francophone de la géomatique


Toujours pas inscrit ? Mot de passe oublié ?
Nom d'utilisateur    Mot de passe              Toujours pas inscrit ?   Mot de passe oublié ?

Annonce

Rencontres QGIS 2025

L'appel à participation est ouvert jusqu'au 19 janvier 2025!

#1 Wed 17 June 2009 14:39

laure4024
Participant occasionnel
Date d'inscription: 16 Jun 2009
Messages: 20

ouvrir une table dans un répertoire donné avec map basic

bonjour,

Voici le code map basic que j'ai utilisé afin de pouvoir ouvrir une table dans un répertoire donné.

Dim ma_table As String
ma_table = FileOpenDlg("D:\EDIPLAN\CARTES\40","","tab","OUVRI
if ma_table <> "" then
open table ma_table
end if
Map From ma_table

il m'affiche un message d'erreur : le résultat de l'expression n'est pas un nom de table ou de colonne.
Je ne comprend pas ce qui ne va pas.

merci d'avance

Hors ligne

 

#2 Wed 17 June 2009 17:10

Maestro de la salsa
Participant actif
Date d'inscription: 7 Jun 2006
Messages: 133

Re: ouvrir une table dans un répertoire donné avec map basic

Bonjour,
C'est normal le message d'erreur au vu du copier-coller provenant de l'aide MI (tu ne spécifie pas de nom de fichier...)


Fonction FileOpenDlg( )
Objectif

Affiche une boîte de dialogue d'ouverture de fichier et renvoie le nom du fichier sélectionné par l'utilisateur.

Syntaxe
FileOpenDlg( chemin, nomfichier, typefichier, invite )

nomfichier est une valeur de chaîne, qui indique un nom de fichier par défaut que l'utilisateur doit sélectionner.

Valeur renvoyée
Valeur de chaîne, qui représente le nom du fichier sélectionné par l'utilisateur (ou une chaîne vide si l'utilisateur a annulé l'opération).


Alain

Hors ligne

 

#3 Wed 17 June 2009 18:00

Patrick PALMIER
Participant actif
Lieu: Lille
Date d'inscription: 18 Jan 2007
Messages: 97

Re: ouvrir une table dans un répertoire donné avec map basic

ma_table n'est pas un nom de table mais le chemin complet
Il faut par exemple extraire le nom de la table du chemin grace à la fonction pathtotablename$

dim nom_table as string
nom_table=pathtotablenames$(ma_table)
open table ma_table as nom_table
map from nom_table


Ca devrait marcher

Sinon, la parenthèse n'est pas fermée et le guillemet non plus mais je pense que c'est un pb de copier/coller

Hors ligne

 

#4 Wed 17 June 2009 18:05

Maurice
Membre
Lieu: Montpellier
Date d'inscription: 5 Sep 2005
Messages: 5331

Re: ouvrir une table dans un répertoire donné avec map basic

laure4024 a écrit:

ma_table = FileOpenDlg("D:\EDIPLAN\CARTES\40","","tab","OUVRI


Bonjour
A moins que ce ne soit une faute de frappe, je préfère:
ma_table = FileOpenDlg("D:\EDIPLAN\CARTES\40\","","*.tab","OUVRIR")

Hors ligne

 

#5 Thu 18 June 2009 08:59

laure4024
Participant occasionnel
Date d'inscription: 16 Jun 2009
Messages: 20

Re: ouvrir une table dans un répertoire donné avec map basic

merci pour vos conseils, tout fonctionne!!!!

Hors ligne

 

Pied de page des forums

Powered by FluxBB