FORUM WINDEV

J'ai des donnée dans un fichier excel et j'aimerai remplir
les tables de ma bd avec, voici comment ce presente mon fichier excel:


Etablissement AnnéeScolaire Matricule Nom Prénom Nom et Prénom
CIS 2006 CI060001 OLEMBE NOAVI CHRISTIAN OLEMBE NOAVI CHRISTIAN
CIS 2006 CI060002 NGADJEU TCHEMI ANGE GUY GAETAN NGADJEU TCHEMI ANGE GUY GAETAN
CIS 2006 CI060003 FOCHIE TAMTO FOCHIE TAMTO
CIS 2006 CI060004 NEMBOU FOKA NEMBOU FOKA
CIS 2006 CI060005 TCHOUASSI TCHOUALA JOSEPH THIERRY TCHOUASSI TCHOUALA JOSEPH THIERRY
CIS 2006 CI060006 KETE ESSOULOU BLAISE LANDRY KETE ESSOULOU BLAISE LANDRY
CIS 2006 CI060007 NOUDJO SERGE PATRICK NOUDJO SERGE PATRICK
CIS 2006 CI060008 NGOUN YOMI JAMEN CHRISTELLE NGOUN YOMI JAMEN CHRISTELLE
CIS 2006 CI060009 OYONO ABA"A GHISLAIN BRICE OYONO ABA"A GHISLAIN BRICE
CIS 2006 CI060010 DEUTCHOUA DAVID LEONEL DEUTCHOUA DAVID LEONEL
CIS 2006 CI060011 NONGA BATOULE FLORENCE NONGA BATOULE FLORENCE
CIS 2006 CI060012 MBALLA TSOGO AIME CHRISTIAN MBALLA TSOGO AIME CHRISTIAN
CIS 2006 CI060013 HAMAWE TOMDIEU FERNAND HAMAWE TOMDIEU FERNAND
CIS 2006 CI060014 TAGNE SIMO DANIEL JESPTHE TAGNE SIMO DANIEL JESPTHE
CIS 2006 CI060015 NKOULOU AWONO PIERRE NKOULOU AWONO PIERRE
CIS 2006 CI060016 NENKAM TAMTSEU LUC NENKAM TAMTSEU LUC
CIS 2006 CI060017 TCHOMTE LENGUE GERVAIS PATRICK TCHOMTE LENGUE GERVAIS PATRICK
CIS 2006 CI060018 NGOK GWEM JEAN MARIE NGOK GWEM JEAN MARIE
CIS 2006 CI060019 OGNANGUET AMBOMBI FRANCIS EMMAR. OGNANGUET AMBOMBI FRANCIS EMMAR.
CIS 2006 CI060020 KAMFOUO EMILIENNE KAMFOUO EMILIENNE
CIS 2006 CI060021 NKOUMOU OVAMBE BROWN ROUSSOS NKOUMOU OVAMBE BROWN ROUSSOS
CIS 2006 CI060022 NDASSA MBATCHOU STEVE NDASSA MBATCHOU STEVE



et j'ai près de 9000 données, SVP j'ai besoin de votre aide

sSel est une chaîne
sSel = fSélecteur(cheminexcel, "Sélectionnez un fichier...", "Tous fichiers (*.xls)"+TAB+"*.xls", "*", fselOuvre+fselExiste)
SI sSel<>"" ALORS
cheminexcel = sSel
FIN


//SAI_Saisie1 EST UN CHAMP de selection pour le chemin du fichier xls
idfic est un entier
i est un entier
resnblignes est un entier
idfic = xlsOuvre(cheminexcel)
resnblignes = xlsNbLigne(idfic)

SI idfic<>-1 ALORS
SI OuiNon("Voulez-vous importer les données ?") ALORS
Sablier(Vrai)
POUR i=2 A resnblignes
tabase.tarubrique1=xlsdonnées(idfic,i,1)
tabase.tarubrique2=xlsdonnées(idfic,i,2)
.
.
.
.
tabase.tarubriqueN=xlsdonnées(idfic,i,N)
hajoute(tabase)
FIN

Info("importation terminer.")
FIN
SINON
Erreur("Le fichier excel est ouvert!"+RC+"Ou lien non valide.")
RETOUR
FIN

Sablier(Faux)
xlsFerme(idfic)

Bonjour,
Importation réussie mais il y a un problème de date !
Si j'ai une date 01/01/1975 elle devient 01/01/0031 ou autre chiffre non compris !
Voulez vous me guider SVP ? chaineversdate ou quelque chose comme ça ?

verifier le format de ton champs date aaaa/mm/jj
bonne chance

Merci de la réponse.
Le format est bien vérifié dans windev et dans excel mais le problème pérsiste.

merci frère