Здравствуйте, у меня есть простая программа, написанная на VB6, я хочу её результаты вычислений записать в отдельный файл. Знаю, что App.Path - значит создать файл по тому же пути, где лежит сам проэкт. Вот код той части, где результат вычислений заносится в файл:
Open App.Path & "\result.txt" For Output As #1
Write #1, A
Close #1
Но сейчас уже результатов несколько и я хотел бы, чтоб такмже где лежит проект создавалась сначала папка а внутри неё уже файл.
пробовал писать к примеру:
Open App.Path & "\folder_result/result1.txt" For Output As #1
Write #1, A
Close #1
И папку folder_result он естественно несоздаёт, можно конечно прописать путь, но при перемещение проекта, или к примеру созданного exe-файла, файл с результатом всё равно записывается по тому пути, что был прописан в коде, а нужно чтобы где лежит проект, создавалась папка а в ней файл, как это можно былобы сделать?
Ответить
|