Open text file and append new text?

I'm getting a error: Invalid procedure or argument.

Set Fileout = fso.OpenTextFile(filePath, ForAppending, TristateFalse)

You are passing TristateFalse as argument 3. It should be argument 4.

Please read the documentation.

Description

Opens a specified file and retus a TextStream object that can be used to read from or append to the file.

Syntax

object.OpenTextFile(filename[, iomode[, create[, format]]])

The OpenTextFile method has these parts:

Part      Description
----      -----------
object    Required. Always the name of a FileSystemObject.
filename  Required. String expression that identifies the file to open.
iomode    Optional. Indicates input/output mode. Can be one of two constants, either ForReading or ForAppending.
create    Optional. Boolean value that indicates whether a new file can be created if the specified filename doesn't exist. The value is True if a new file is created; False if it isn't created. The default is False.
format    Optional. One of three Tristate values used to indicate the format of the opened file. If omitted, the file is opened as ASCII.

Source OpenTextFile Method

Recent Questions...