Как правильно сгенирировать?

[Druid-2004]

Нужно сгенирировать файл, имя которого будет состоять из цифр.
Должно получиться типа этого:

Private Sub CreateFile()
NameFile=int(rnd*1000000) //от сюда берем имя будующего файла
open /здесь мне нужна помощь/ for append as #1
print #1, "Что-нибудь"
close #1
end sub

До файла с именем NameFile должен стоять полный путь к нему... Например "C:\test\"

...корочеЮ как правильно соеденить путь и сгенированное циферное имя?

[Amed]

Надо просто создавать тему только в одном разделе

[_Мика_]

App.path - полный путь
App.ExeName - имя твоей проги

[Amed]

Мика, ответ уже был дан в другом разделе... А Ваш - немного не то...

[_Мика_]

АААА ну тогда сорри