Disparaition de virgules - Archives Visual Basic / Texte, Visual Basic, VB6, VB.NET, VB 2005, VB

Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS

CodeS-SourceS est hébergé par Frontier.fr

Ce site au démarrage

AccueilCodesTutorielsForumsEmploiLivresConnexion

begin process at 2008 12 02 07:00:50

ASTUCE WINDOWS : DéPLACER LES FENêTRES PERDUES D'UN éCRAN INEXISTANT VERS MON éCRAN PRINCIPAL par cyril

TEAM SYSTEM DATABASE EDITION : VERSION FINALE DISPONIBLE DE CETTE NOUVELLE MISE à JOUR DE LA VERSION 2008 par christian

[LINQ TO WIQL] LES DESSOUS DU PROVIDER (PART 1: INTRODUCTION) par Miiitch

SHAREPOINT 2007 : ACTIVATION DE FEATURES ET ACTIVATIONDEPENDENCIES par phil

DOCUMENT W3C SUR L'ACCESSIBILITé DE SILVERLIGHT 2.0 par neodante

RE : ACTION EN LIEN AVEC UNE SAISIE DE TEXTE par jrivet

RE : VBA EXCEL USERFORM par jrivet

RE : CRéER UN VOYANT BI-COLOR (ROUGE/VERT) par jrivet

SSTAB ET MODIFIER LE RECORDSOURCE DE ADODC par tapageur99

VBA EXCEL USERFORM par flyersgoaler

+ de logiciels à télécharger

1 301 184 membres
70 nouveaux aujourd'hui
14 547 membres club

Trouver une ressource

Trouvez une ressource parmi 39 071 codes, 1 208 001 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Poser une question

Sujet : Disparaition de virgules [ Archives Visual Basic / Texte ] (Sload)

Informations & options pour cette discussion

Vous êtes ici : Thèmes / Archive Visual Basic & VB.NET / Archives Visual Basic / Texte / Disparaition de virgules
Ce sujet vous interesse ? Cliquez ici pour être averti quand il y a une nouvelle réponse

jeudi 28 octobre 2004 à 20:52:45 | Disparaition de virgules

Sload	Bonjour ! Apres le traitement d'un fichier comme suit : Open "c:\fichier.txt" Text1.Text For Input As #1 While EOF(1) = False Input #1, ligne texte = texte & ligne Wend Close #1 Avec un texte comme "1,2,3,4,5" J'obtient texte = "12345" Comment faire pour garder les virgules ? Merci d'avance Antoine
	Rép. MP 14 msg 26 msg CS

jeudi 28 octobre 2004 à 21:14:43 | Re : Disparaition de virgules

CanisLupus	Salut essaie d'utiliser line input Cordialement, CanisLupus
	Rép. MP 3748 msg

jeudi 28 octobre 2004 à 21:33:48 | Re : Disparaition de virgules

DARKSIDIOUS	Qu'est ce qu'il vient faire là le Text1.Text ? Open "c:\fichier.txt" Text1.Text For Input As #1 Sinon, en effet, il vaux mieux utiliser un LineInput si tu veux récupèrer des lignes entières plutôt que de passer par un Input ! _______________________________________ DarK Sidious [Responsable API/VB du site www.ProgOtoP.com] Téléchargez ProgOtoP API Viewer
	Rép. MP 8375 msg 10773 msg CS

vendredi 29 octobre 2004 à 01:16:43 | Re : Disparaition de virgules

econs

Dim num As Long
Dim texte As String
num=FreeFile
texte=""
Open "c:\fichier.txt" For Input As #num
While not EOF(num)
Line Input #num, ligne
texte = texte & ligne
Wend
Close #num

Manu

vendredi 29 octobre 2004 à 12:19:01 | Re : Disparaition de virgules

Sload	Ok avec Line Input ca marche bien ... Dsl pour le Text1.text ct une erreur ... Merci à tous Antoine
	Rép. MP 14 msg 26 msg CS

Cette discussion est classé dans : fichier, input, texte, virgules, disparaition

Répondre à ce message

Sujets en rapport avec ce message

Eviter les doublons dans fichier texte ou autre [ par scortek ] C'est un fichier texte (séparé par des , afin de s'ouvrir avec excel) :J'ai besoin d'automatiser le trie de ce que contient ce fichier, ligne par lign lecture de fichier texte et concatenation [ par SEBOBS ] bonjour, je lis un fichier texte, les donnees ont la forme suivante : a,b,c,d,e,f j ai sur plusieurs ligne a,b,c,,e, et a,b,c,d,, ou a,b,c sont ident Probleme fin de fichier texte [ par Jeremy014 ] Bonjour,J'ai fait une macro sous excel pour lire un fichier texte et en extraire des informations.J'ai presque tout le temps une erreur car je pense q extraction des information d'un fichier [ par pegguy ] Private Sub Form_Load()'0n Error Resume Next 'Les erreurs sont ignorees'Open "c:\it\stat\STAT01-05 2001\stat26e.txt" For Input As #1Open "c:\it\stat\S extraction des information d'un fichier [ par pegguy ] Private Sub Form_Load()'0n Error Resume Next 'Les erreurs sont ignorees'Open "c:\it\stat\STAT01-05 2001\stat26e.txt" For Input As #1Open "c:\it\stat\S extraction des information d'un fichier [ par pegguy ] Private Sub Form_Load()'0n Error Resume Next 'Les erreurs sont ignorees'Open "c:\it\stat\STAT01-05 2001\stat26e.txt" For Input As #1Open "c:\it\stat\S Encore un drole de fichier texte [ par crocmorts ] 1ere ligne :" DATE ","HEURE"," POSTE","NU.COMPOSE"," ANNUAIRE EXTERNE ","DUREE DE","DUREE DE C"2eme ligne:"01/05/02","01:08","201 ","6 Lire un fichier texte à partir d'une certaine ligne [ par crocmorts ] Salut, voila mon probleme, je souhaiterais lire un fichier texte à partir d'une ligne X. J'ai recherché ds le forum mais j'ai pas trouvé mon bonheur. virgule dans fichier texte -> Va à la ligne ??? [ par globule ] Bonjour,J'ouvere un fichier texte (j'ai besoin d'analyser ligne par ligne ce fichier)Open "c:\monFichier" For Input As #1Do While Not EOF(1) Input Fichier texte [ par xavier77 ] Salut, J'ouvre un fichier texte et je le lie ligne par ligne : NumFichier = FreeFileOpen App.Path & "\toto.txt" For Input As #NumFichierDo While EO