Question sur le put #Résolu

Question

Bonjour,

J'aimerais comprendre la fonction de Var dans une ligne de code commencant par un Put.

    Open App.Path & "	oto.jpg" For Binary As #2
    Put #2, Var, buffer
    Close #2

Merci !!

Gobillot · Accepted Answer

Var est bien la position dans le fichier et non pas un num&#233;ro d'enregistrement. pour moi le libell&#233; d'erreur correspond pas.
la position commen&#231;ant &#224; 1, si Var est &#224; z&#233;ro ou n&#233;gatif forc&#233;ment il y aura une erreur. maintenant si Var est tr&#232;s grand je ne pense pas que &#231;a provoquera une erreur, mais ton fichier risque de devenir tr&#232;s gros.

Daniel

myarouvb · Answer

De plus,

Si VB me retourne "num&#233;ro d'enregistrement incorrect" (erreur d'execution 63) sur la m&#234;me ligne contenant le put, qu'est ce que cela peut signifier? 

Merci encore..

Gobillot · Answer

Var c'est la position dans le fichier, &#231;a &#233;vite d'avoir &#224; faire un Seek 
&#224; ne pas confondre avec le num&#233;ro d'enregistrement pour les fichiers Random.

Daniel

myarouvb · Answer

Pourtant, il me sort une erreur de "num&#233;ro d'enregistrement" avec ces trois lignes de code, est ce normal?

cs_rene38 · Answer

Bonjour

    Open App.Path & "	oto.jpg" For Binary As #2
    Var = 12345 '< le n&#176; d'octet dans toto.jpg o&#249; buffer doit &#234;tre enregistr&#233;

    Put #2, Var, buffer
    Close #

myarouvb · Answer

Vous voulez dire que si Var=0, cela provoque une erreur?
Entre le put et le close, j'ai une ligne : Var= Var+ UBound(buffer) + 1
Seulement, au premier passage, Var n'est pas initialis&#233;, l'erreur pourrait provenir de l&#224;?

myarouvb · Answer

Probl&#232;me r&#233;solu, cela venait bien de ma variable Var non initialis&#233;e, merci les gars!!

Question sur le put #

7 réponses

Discussions similaires