Inseré un fichier dans les ressources

Bonjour,

Au même titre que cette fonction extrait des données des ressources :
[code]
Public Function ExtractDR(FileName As String, RType As String, RNumber As String)
     Dim BUFFER_RES_DATA() As Byte
     Open FileName For Binary Access Write As #1
     BUFFER_RES_DATA = LoadResData(RNumber, RType)
     ReDim Preserve BUFFER_RES_DATA(UBound(BUFFER_RES_DATA))
     Put #1, , BUFFER_RES_DATA
    Close #1
End Function
[/code]

Existe t'il une fonction qui permet d'ajouter un fichier dans ces ressources svp??

Merci

Par pitié, que l'on m'explique la ligne :

ReDim Preserve BUFFER_RES_DATA(UBound(BUFFER_RES_DATA))

heu j'en sais rien, j'ai recopier... :s

par contre ca répond pas à ma question :( ....

tu pourra pas modifier l'exe : il est utilisé par toi.

faut voir a modifier les resources depuis un autre Exe

ReDim Preserve BUFFER_RES_DATA(UBound(BUFFER_RES_DATA))
=> Donne a mon tableau BUFFER_RES_DATA la taille du tableau BUFFER_RES_DATA

c'est recherché, hein ^^