Help!!! Проблема с объектом File.

[Forgott]

Народ!
Срочно нужна Ваша помощь... Проблема в том, что когда пытаюсь открыть файл в объекте File (кликаю на него скажем мышкой), то выдается ошибка, что File Not Found. Путь указан верно File1.Path = "c:\base\z" и самое интересное, что в окне показываются файлы именно из этой папки, но (!) все равно выдает ошибки. Если эти файлы открыть из корня (где сама прога лежит), то все летает "на ура". Первый раз с такой фигней сталкиваюсь, может кто знает?
P.S.
Файлы из этой папки открываются для чтения и записи так:
Open File1.Filename for Input as #1 и,
Open File1.Filename for Output as #1.
Close #1 везде стоит. Может дело в том, что номера (я про #1) у всех одинаковые?

[Zenitchik]

Мои поздравления.
Ищите и читайте про оператор Open. Он просит ПУТЬ файла, а не имя. Естественно, когда вы даете ему имя, он думает, что это относительный путь и ищет в папке приложения.

Разбирайтесь. Генерите путь.

[Бяка]

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

Open File1.Path & "\" & File1.Filename for Input as #1

[Proxy]

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

"\"

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

Environ("HomePath")

[Forgott]

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

Open File1.Path & "" & File1.Filename for Input as #1

Да, сам догнал я сделал тока так: open file1.path + "" + file1.filename...

[Бяка]

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

""

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

Environ("HomePath")

ну тогда так

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

....
Open NormPath(File1.Path) & File1.Filename for Input as #1
....


Function NormPath(ByVal Pth As String) As String
  NormPath= Pth & IIf(VBA.Right$(Pth , 1) = "", vbNullString, "")
End Function

[Хакер]

Proxy
И к чему ты это написал?