Помогите создать контейнер

[claymen]

Роман-вб
В свой проект я вставил следующий код:
Dim files() As Byte
files = LoadResData(101, "Custom")
Open "c:\1.mp3" For Binary Access Write As 1
Put 1, , files
Close 1
Теперь я могу воспроизводить мой MP3-файл. А если я создам несколько ресурсов, мне придётся для каждого ресурса производить предыдущий код (конечно с ID того ресурса)?
Да, и потом я не хочу, чтобы на компьютере оставался мой MP3-файл. Значит мне придётся его потом удалять?

[Роман-вб]

claymen
Именно. Если не хочешь повторять код, пиши подпрограмму. Но повтор кода тоже неплохо, так пишут умные книги.
Удалять файл думаю знаешь как.

[claymen]

Всем
СПАСИБО! Ну вот я и разобрался с тем, как внедрять в свою программу что-то своё!
Всем спасибо! Думаю Вы все то же начинали не с "профи".