Bonsoir Amiiinee77
Voici une idée :
MaReq est une Source de données
sSQL est une chaîne = "SELECT * FROM Caisse"
SI HExécuteRequêteSQL(MaReq, hRequêteDéfaut, sSQL) ALORS
data est un Tableau de 2 dimensions de chaîne
// --- Étape 1 : noms des colonnes ---
nNbColonnes est un entier = HListeRubrique(MaReq)
tabColonnes est un Tableau dynamique de chaîne
POUR i = 1 À nNbColonnes
tabColonnes..Ajoute(HListeRubrique(MaReq, i))
FIN
// On ajoute la ligne d’en-tête au tableau final
data..Ajoute(tabColonnes)
// --- Étape 2 : valeurs ligne par ligne ---
TANTQUE HLit(MaReq)
ligne est un Tableau dynamique de chaîne
POUR i = 1 À nNbColonnes
// Récupération dynamique des valeurs
champ est une chaîne = HListeRubrique(MaReq, i)
valeur est une chaîne = MaReq..{champ}
ligne..Ajoute(valeur)
FIN
data..Ajoute(ligne)
FIN
HAnnuleRequête(MaReq) // Libération propre
SINON
Info("Erreur dans la requête SQL : " + HErreurInfo())
FIN
-
Bonjour tout le monde ! Veillez consulter la Politique de forum pour comprendre nos règles, Merci a vous !Rejeter la notice
Récupérer les noms des colonnes d'un fichier par programmation et auto
Discussion dans 'Windev' créé par Amiiinee77, Juin 17, 2025.
Tags:
Gemini1961
Well-Known Member
MEMBRE WX
DUMP TEAM
Bonsoir Amiiinee77
Voici une idée :
MaReq est une Source de données
sSQL est une chaîne = "SELECT * FROM Caisse"
SI HExécuteRequêteSQL(MaReq, hRequêteDéfaut, sSQL) ALORS
data est un Tableau de 2 dimensions de chaîne
// --- Étape 1 : noms des colonnes ---
nNbColonnes est un entier = HListeRubrique(MaReq)
tabColonnes est un Tableau dynamique de chaîne
POUR i = 1 À nNbColonnes
tabColonnes..Ajoute(HListeRubrique(MaReq, i))
FIN
// On ajoute la ligne d’en-tête au tableau final
data..Ajoute(tabColonnes)
// --- Étape 2 : valeurs ligne par ligne ---
TANTQUE HLit(MaReq)
ligne est un Tableau dynamique de chaîne
POUR i = 1 À nNbColonnes
// Récupération dynamique des valeurs
champ est une chaîne = HListeRubrique(MaReq, i)
valeur est une chaîne = MaReq..{champ}
ligne..Ajoute(valeur)
FIN
data..Ajoute(ligne)
FIN
HAnnuleRequête(MaReq) // Libération propre
SINON
Info("Erreur dans la requête SQL : " + HErreurInfo())
FINCliquez pour agrandir...