GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV
,
WEBDEV
e
WINDEV Mobile
Inicio
|
Mensagens recentes
|
Conecte-se...
|
Disconnect
|
Português
Inicio
→
WINDEV (versões anteriores)
→
Creation fichier a partir d'une table
Creation fichier a partir d'une table
Iniciado por Kael, abr., 17 2004 9:47 PM - Sem resposta
Conecte-se…
Kael
#1
Publicado em abril, 17 2004 - 9:47 PM
Bonjour à tous.
Là j'ai un problème plutot bizarre, j'ai recopé l'algo d'un des exmples fournis
avec windev 7.5 qui permet d'exporter chaque ligne d'une table dans un fichier
(de type .txt dans mon cas), tout marchait tres bien et puis du jour au lendemain,
ça ne marche plus.
Le probleme c'est qu'il ne créé plus le fichier a l'endroit que je lui dit
et sans son nom. A la place je retrouve des fichiers "1", "2" ou "3" sans
extension dans le repertoire EXE du projet.
Je vous donne quand même ce que j'ai fait :
repertoire = fSélecteur(rep, "", "Sélectionnez un fichier...", "Script AVS"+TAB+"*.avs"+RC+"Fichier
Texte"+TAB+"*.txt", "avs", fselCrée+fselExiste)
SI repertoire <> "" ALORS
TableVersTexte(t_apercu,repertoire)
....
***********************************************
PROCEDURE TableVersTexte(sNomFic,sSep=TAB)
h,j,nPos,nIDFic sont des entiers
sNomCol,sLigne sont des chaînes
nIDFic = fOuvre(sNomFic,foCréation+foEcriture)
nPos=TableSelect(t_apercu)
SI nPos < 1 ALORS nPos= 1
POUR h=1 A t_apercu..Occurrence
TableSelectPlus(t_apercu,h)
sLigne=""
POUR j = 1 A TableOccurrence(t_apercu,toColonne)
sNomCol =TableEnumèreColonne(t_apercu, j)
SI PAS sLigne ~= "" ALORS
sLigne += sSep
FIN
sLigne += {sNomCol}[h]
FIN
fEcritLigne(nIDFic,sLigne)
FIN
fFerme(nIDFic)
TableSelectPlus(t_apercu,nPos)
**************************************************
ou t_apercu est la table en question
Je précise que c'est une procédure locale de la fenêtre ou se trouve la table
(on sait jamais ^^)
Merci d'avance pour votre aide
Denunciar
0
0
→ Voltar para WINDEV (versões anteriores)
WINDEV 2024
WEBDEV 2024
WINDEV Mobile 2024
WINDEV (versões anteriores)
WEBDEV (versões anteriores)
WINDEV Mobile (versões anteriores)
Reports & Queries
Off-topic
Ferramentas
Français
English
Español
Portuguesa
Fermer cette fenêtre
Tipo de Pesquisa
Apenas tópicos
Todas as mensagens
Período de pesquisa
Qualquer momento
Última hora
Últimas 24 horas
Semana passada
Mês passado
Ano passado
Cancelar
Pré-visualização da sua mensagem
Adicionar imagem
Importar uma imagem de uma URL
Enviar uma imagem a partir do seu disco
Deixe um ficheiro ou clique em "Procurar ..."
ou
Cancelar
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Texto