PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEVWEBDEV and WINDEV Mobile

Home → WEBDEV 2024 → Problème avec importation de excel vers base de données
Problème avec importation de excel vers base de données
Started by Hassane Hamed Sy SAVANE, Mar., 28 2017 2:10 PM - No answer
Posted on March, 28 2017 - 2:10 PM
Bonjour j'ai un problème avec mes importations de données d'un fichier excel vers ma base de données. Tout marchais sans problème il y a pas si longtemps que ça. Quand j'upload le le fichier et que je fait le traitement le message d'erreur retourné est : "le fichier n'a pas été trouvé". Voici le le code qui fonctionnait et qui ramène un erreur maintenant:

i est un entier=0

sNomFichier est une chaîne
sNomFichier = fExtraitChemin(UploadNomFichier(SAI_Exel_file,Faux),fDisque + fRépertoire + fFichier + fExtension) // sai_fichier represente le champ upload

IdFichierXLS est un entier

OUVERTURE du Fichier sélectionné
IdFichierXLS = xlsOuvre(sNomFichier)

Info(IdFichierXLS)

SI IdFichierXLS <> -1 ALORS

t est un entier
nNbligne est un entier= xlsNbLigne(IdFichierXLS)

POUR t = 2 A nNbligne

=xlsDonnée(IdFichierXLS,t,1)
USER_LIST.REGION_ID=xlsDonnée(IdFichierXLS,t,2)
USER_LIST.DUTY_STATION_ID=xlsDonnée(IdFichierXLS,t,3)
FIN

SI i>0 ALORS
Info(i+" Staff Added into the System")
FIN


SINON
// Affichage du message d'erreur si l'ouverture n'a pas été effectuée
Erreur(xlsMsgErreur(IdFichierXLS))

FIN