Run-time error 70: permission denied - при работе с текстовым файлом

@ildar323 · Регистрация: 02.03.2011

Author24 — интернет-сервис помощи студентам

На одной из пользовательских машин (Windows XP, Office 2003), возникает ошибка 70, код VBA Excel:

Visual Basic

    Dim FSO As Object
    Dim oFile As Object
    Dim sFileName as String
    
    sFileName = ThisWorkbook.Path & "\..\..\DEBUG.TXT"
    Set FSO = CreateObject("Scripting.FileSystemObject")
    Set oFile = FSO.OpenTextFile(FileName:=sFileName, iomode:=ForAppending, create:=True, Format:=TristateFalse)
    
    oFile.WriteLine (Content)
    
    oFile.Close
    Set oFile = Nothing
    Set FSO = Nothing

На всех остальных клиентских компьютерах ошибка не возникает.

@~~Апострофф~~ · 12.09.2012, 10:16

Посмотри вниз страницы - Похожие темы Run-time error '70': Permission denied при выполнении процедуры

@~~Апострофф~~ Заблокирован
	12.09.2012, 10:16	2
	Посмотри вниз страницы - Похожие темы Run-time error '70': Permission denied при выполнении процедуры 0