My.Resources bestand opslaan

[apellsientje925]

Hallo,

Hoe kan ik een bestand uit de map resources opslaan in een folder als er op een knop wordt gedrukt?

Bij voorbaat dank

 

[SuperABC]

Mocht het om een Image gaan:

        Dim Img As Image = My.Resources.<ImageName>
        Img.Save("G:\Overige\abctest.png")

Maar bij een File (exe of wat dan ook) wordt het al een stuk lastiger!

 

[apellsientje925]

Bedankt,

Maar het gaat om een Exe

 

[SuperABC]

Is niet zo heel veel moeilijker:

        Dim stream As New IO.FileStream("C:\Users\SuperABC\Desktop\test.exe", IO.FileMode.Create)

        stream.Write(My.Resources.<FileName>.Clone,0,My.Resources.<FileName>.Length)

Volgens mij wordt op deze methode wel in één keer het hele programma gekopieerd naar het geheugen. Bij kleine programma's is dit geen probleem maar bij grotere moet je stukje voor stukje weg schrijven elke keer een stuk of 4096Bytes.:thumb:

 

[apellsientje925]

Bedankt! Werkt perfect

 

[Senquell]

Ik zocht ook zoiets

Dim Img As Image = My.Resources.<ImageName>
Img.Save("G:\Overige\abctest.png")

als ik die code toevoegt aan mijn button.
word er een error aangegeven:
'Stuff.My.Resources' is a namespace and cannot be used as an expression.
en ik heb een foto geplaats in resources..

 

[SuperABC]

Hoe kom je hierbij dan:

[COLOR="Red"]Stuff.[/COLOR]My.Resources

 

[Senquell]

Hoe kom je hierbij dan:

[COLOR="Red"]Stuff.[/COLOR]My.Resources

Dat is mijn project naam..
oplossing?

 

[SuperABC]

Je project naam weg laten, als dat nodig was had ik het wel gezegd in het voorbeeld:thumb: