ошибка открытия файла

[Юджин]

есть строка

Код: Выделить всё

Open "C:\Priem\файл.txt" For Output As #1

. насколько я понимаю, если файл в папке отсутствует, то при выполнении строки файл должен создаваться, а тут прога выдает "Файл не найден". как быть?

[Sirik]

или папки нет, или права отсутствуют

зы. насчёт 120 постов читал?

[Viper]

Если нет папки, то будет ошибка, но не "Файл не найден", а "Путь не найден"

[ВуД]

попробуй так:
Open "c:\файл.txt" For Output As #1
Print #1, txtText.Text
Close #1

[ANDLL]

2ВуД:Лучше уж молчи... чем пиши подобные глупости.
Проблема либо в правах(хотя тут должна выскакивать Access deninded) либо автор что-то напутал.

[Alexanbar]

Кстати, лучше так:

Код: Выделить всё

f=FreeFile

open "C:\Priem\файл.txt" For Output As #f

Print #f, txtText.Text

close #f

А , случайно, этот файл не открыт ли уже до выполнения этой программой? Или, скажем закрыт ли он после предыдущего обращения к нему?

[Demonx]

Access deninded

Access denied

[Юджин]

забавно, но на другой машине при запуске "неработающего" exeшника все ок, а вот при запуске у меня на машине под f8 даже после полной перезагрузке и условии, что к файлу обращаются 1 раз (как раз для этой записи) выскакивает это сообщение. Кстати, сделал автосоздание этого файла из vb - проблема не решилась, хотя файл создается и не используется на момент открытия его accessом. ГЛЮК-с

[Viper]

Странный глюк... мож все-таки где-то ошибка завелась? показал бы автор побольше кода, не только одну строку.

[Юджин]

глюк интереснее. перекинул из accessа весь модуль в тело проги (в vb) - заработало. жаль только что там используется excel с циклом. дольше работать будет. вывод такой: не пользуйтесь лицензионным офисом на лецензионном windows...

[uhm]

Офигительный вывод. Правда.