Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Denis P
Bonjour Marc,
Essaies de cette façon :
fOutputNum = FreeFile Open pOutputFile For Output As #fOutputNum fBmpInputNum = FreeFile Open pBmpInputFile For Binary As #fBmpInputNum
De cette façon tu ouvres ton premier fichier, donc tu lui affectes ton premier pointeur. Ensuite maintenant tu redéfinis ton deuxième pointeur. Si tu vas voir la définition de la fonction FreeFile sur MSDN tu obtins ceci : Renvoie une valeur de type integer représentant le prochain numéro de ficher pouvant être utilisé par l'instruction Open.
Donc tant et aussi longtemps que tu n'auras pas ouvert de fichier, FreeFile te retournera toujours la même valeur, puisque le pointeur n'est pas occupé tant que tu n'as pas ouvert le fichier.
Salut
Denis P
"Marc" <fun.x@#nospam#caramail.com> a écrit dans le message de news:3f950849$0$10428$
Bonjour,
je cherche a ouvrir deux fichiers de suites (1 Input et un autre Output)
J'ai essaye d'obtenir des pointeurs grace a la fonction FreeFile() mais il m'affecte la mm valeur aux pointeurs de fichier
Code concerne: Dim fOutputNum As Integer Dim fBmpInputNum As Integer
' Get the next file number available for use fOutputNum = FreeFile() fBmpInputNum = FreeFile()
Open pOutputFile For Output As #fOutputNum Open pBmpInputFile For Binary As #fBmpInputNum
D'avance merci pour votre aide
Marc
Bonjour Marc,
Essaies de cette façon :
fOutputNum = FreeFile
Open pOutputFile For Output As #fOutputNum
fBmpInputNum = FreeFile
Open pBmpInputFile For Binary As #fBmpInputNum
De cette façon tu ouvres ton premier fichier, donc tu lui affectes ton
premier pointeur. Ensuite maintenant tu redéfinis ton deuxième pointeur.
Si tu vas voir la définition de la fonction FreeFile sur MSDN tu obtins ceci
:
Renvoie une valeur de type integer représentant le prochain numéro de ficher
pouvant être utilisé par l'instruction Open.
Donc tant et aussi longtemps que tu n'auras pas ouvert de fichier, FreeFile
te retournera toujours la même valeur, puisque le pointeur n'est pas occupé
tant que tu n'as pas ouvert le fichier.
Salut
Denis P
"Marc" <fun.x@#nospam#caramail.com> a écrit dans le message de
news:3f950849$0$10428$626a54ce@news.free.fr...
Bonjour,
je cherche a ouvrir deux fichiers de suites (1 Input et un autre Output)
J'ai essaye d'obtenir des pointeurs grace a la fonction FreeFile() mais il
m'affecte la mm valeur aux pointeurs de fichier
Code concerne:
Dim fOutputNum As Integer
Dim fBmpInputNum As Integer
' Get the next file number available for use
fOutputNum = FreeFile()
fBmpInputNum = FreeFile()
Open pOutputFile For Output As #fOutputNum
Open pBmpInputFile For Binary As #fBmpInputNum
fOutputNum = FreeFile Open pOutputFile For Output As #fOutputNum fBmpInputNum = FreeFile Open pBmpInputFile For Binary As #fBmpInputNum
De cette façon tu ouvres ton premier fichier, donc tu lui affectes ton premier pointeur. Ensuite maintenant tu redéfinis ton deuxième pointeur. Si tu vas voir la définition de la fonction FreeFile sur MSDN tu obtins ceci : Renvoie une valeur de type integer représentant le prochain numéro de ficher pouvant être utilisé par l'instruction Open.
Donc tant et aussi longtemps que tu n'auras pas ouvert de fichier, FreeFile te retournera toujours la même valeur, puisque le pointeur n'est pas occupé tant que tu n'as pas ouvert le fichier.
Salut
Denis P
"Marc" <fun.x@#nospam#caramail.com> a écrit dans le message de news:3f950849$0$10428$
Bonjour,
je cherche a ouvrir deux fichiers de suites (1 Input et un autre Output)
J'ai essaye d'obtenir des pointeurs grace a la fonction FreeFile() mais il m'affecte la mm valeur aux pointeurs de fichier
Code concerne: Dim fOutputNum As Integer Dim fBmpInputNum As Integer
' Get the next file number available for use fOutputNum = FreeFile() fBmpInputNum = FreeFile()
Open pOutputFile For Output As #fOutputNum Open pBmpInputFile For Binary As #fBmpInputNum
D'avance merci pour votre aide
Marc
Marc
Thx
"Denis P" wrote in message news:
Bonjour Marc,
Essaies de cette façon :
fOutputNum = FreeFile Open pOutputFile For Output As #fOutputNum fBmpInputNum = FreeFile Open pBmpInputFile For Binary As #fBmpInputNum
De cette façon tu ouvres ton premier fichier, donc tu lui affectes ton premier pointeur. Ensuite maintenant tu redéfinis ton deuxième pointeur. Si tu vas voir la définition de la fonction FreeFile sur MSDN tu obtins
ceci
: Renvoie une valeur de type integer représentant le prochain numéro de
ficher
pouvant être utilisé par l'instruction Open.
Donc tant et aussi longtemps que tu n'auras pas ouvert de fichier,
FreeFile
te retournera toujours la même valeur, puisque le pointeur n'est pas
occupé
tant que tu n'as pas ouvert le fichier.
Salut
Denis P
"Marc" <fun.x@#nospam#caramail.com> a écrit dans le message de news:3f950849$0$10428$ > Bonjour, > > je cherche a ouvrir deux fichiers de suites (1 Input et un autre Output) > > J'ai essaye d'obtenir des pointeurs grace a la fonction FreeFile() mais
il
> m'affecte la mm valeur aux pointeurs de fichier > > Code concerne: > Dim fOutputNum As Integer > Dim fBmpInputNum As Integer > > ' Get the next file number available for use > fOutputNum = FreeFile() > fBmpInputNum = FreeFile() > > Open pOutputFile For Output As #fOutputNum > Open pBmpInputFile For Binary As #fBmpInputNum > > D'avance merci pour votre aide > > Marc > >
Thx
"Denis P" <denispronovostNospam@sympatico.ca> wrote in message
news:ezAmHc8lDHA.2772@TK2MSFTNGP12.phx.gbl...
Bonjour Marc,
Essaies de cette façon :
fOutputNum = FreeFile
Open pOutputFile For Output As #fOutputNum
fBmpInputNum = FreeFile
Open pBmpInputFile For Binary As #fBmpInputNum
De cette façon tu ouvres ton premier fichier, donc tu lui affectes ton
premier pointeur. Ensuite maintenant tu redéfinis ton deuxième pointeur.
Si tu vas voir la définition de la fonction FreeFile sur MSDN tu obtins
ceci
:
Renvoie une valeur de type integer représentant le prochain numéro de
ficher
pouvant être utilisé par l'instruction Open.
Donc tant et aussi longtemps que tu n'auras pas ouvert de fichier,
FreeFile
te retournera toujours la même valeur, puisque le pointeur n'est pas
occupé
tant que tu n'as pas ouvert le fichier.
Salut
Denis P
"Marc" <fun.x@#nospam#caramail.com> a écrit dans le message de
news:3f950849$0$10428$626a54ce@news.free.fr...
> Bonjour,
>
> je cherche a ouvrir deux fichiers de suites (1 Input et un autre Output)
>
> J'ai essaye d'obtenir des pointeurs grace a la fonction FreeFile() mais
il
> m'affecte la mm valeur aux pointeurs de fichier
>
> Code concerne:
> Dim fOutputNum As Integer
> Dim fBmpInputNum As Integer
>
> ' Get the next file number available for use
> fOutputNum = FreeFile()
> fBmpInputNum = FreeFile()
>
> Open pOutputFile For Output As #fOutputNum
> Open pBmpInputFile For Binary As #fBmpInputNum
>
> D'avance merci pour votre aide
>
> Marc
>
>
fOutputNum = FreeFile Open pOutputFile For Output As #fOutputNum fBmpInputNum = FreeFile Open pBmpInputFile For Binary As #fBmpInputNum
De cette façon tu ouvres ton premier fichier, donc tu lui affectes ton premier pointeur. Ensuite maintenant tu redéfinis ton deuxième pointeur. Si tu vas voir la définition de la fonction FreeFile sur MSDN tu obtins
ceci
: Renvoie une valeur de type integer représentant le prochain numéro de
ficher
pouvant être utilisé par l'instruction Open.
Donc tant et aussi longtemps que tu n'auras pas ouvert de fichier,
FreeFile
te retournera toujours la même valeur, puisque le pointeur n'est pas
occupé
tant que tu n'as pas ouvert le fichier.
Salut
Denis P
"Marc" <fun.x@#nospam#caramail.com> a écrit dans le message de news:3f950849$0$10428$ > Bonjour, > > je cherche a ouvrir deux fichiers de suites (1 Input et un autre Output) > > J'ai essaye d'obtenir des pointeurs grace a la fonction FreeFile() mais
il
> m'affecte la mm valeur aux pointeurs de fichier > > Code concerne: > Dim fOutputNum As Integer > Dim fBmpInputNum As Integer > > ' Get the next file number available for use > fOutputNum = FreeFile() > fBmpInputNum = FreeFile() > > Open pOutputFile For Output As #fOutputNum > Open pBmpInputFile For Binary As #fBmpInputNum > > D'avance merci pour votre aide > > Marc > >
Armel Déré
Salut,
Je penses que serai plutôt comme ça :
Dim fOutputNum As Integer Dim fBmpInputNum As Integer
' Get the next file number available for use fOutputNum = FreeFile() Open pOutputFile For Output As #fOutputNum
fBmpInputNum = FreeFile() Open pBmpInputFile For Binary As #fBmpInputNum
"Marc" <fun.x@#nospam#caramail.com> a écrit dans le message de news: 3f950849$0$10428$
Bonjour,
je cherche a ouvrir deux fichiers de suites (1 Input et un autre Output)
J'ai essaye d'obtenir des pointeurs grace a la fonction FreeFile() mais il m'affecte la mm valeur aux pointeurs de fichier
Code concerne: Dim fOutputNum As Integer Dim fBmpInputNum As Integer
' Get the next file number available for use fOutputNum = FreeFile() fBmpInputNum = FreeFile()
Open pOutputFile For Output As #fOutputNum Open pBmpInputFile For Binary As #fBmpInputNum
D'avance merci pour votre aide
Marc
Salut,
Je penses que serai plutôt comme ça :
Dim fOutputNum As Integer
Dim fBmpInputNum As Integer
' Get the next file number available for use
fOutputNum = FreeFile()
Open pOutputFile For Output As #fOutputNum
fBmpInputNum = FreeFile()
Open pBmpInputFile For Binary As #fBmpInputNum
"Marc" <fun.x@#nospam#caramail.com> a écrit dans le message de news:
3f950849$0$10428$626a54ce@news.free.fr...
Bonjour,
je cherche a ouvrir deux fichiers de suites (1 Input et un autre Output)
J'ai essaye d'obtenir des pointeurs grace a la fonction FreeFile() mais il
m'affecte la mm valeur aux pointeurs de fichier
Code concerne:
Dim fOutputNum As Integer
Dim fBmpInputNum As Integer
' Get the next file number available for use
fOutputNum = FreeFile()
fBmpInputNum = FreeFile()
Open pOutputFile For Output As #fOutputNum
Open pBmpInputFile For Binary As #fBmpInputNum