I am creating a text file using the following code:

Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile(FilePath & NameOfFile, True)

Now, in the new text file created, I want to insert page breaks.

What is the code to be written to have page breaks in the text file created?

- Murthy

It is ASCiII code SOH (Start of Header) which is CHR(1).

So either
a.write chr(1)

or

a.writeline chr(1)

"Murthy" wrote:

I am creating a text file using the following code:

Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile(FilePath & NameOfFile, True)

Now, in the new text file created, I want to insert page breaks.

What is the code to be written to have page breaks in the text file created?

- Murthy

Thanks.

Yes, chr(1) is writing something to the text file, but it really didn't
force a page break on a laser printer.

Still, I will test it on a line printer and get back.

Thanks for your help.



"Joel" wrote:

It is ASCiII code SOH (Start of Header) which is CHR(1).

So either
a.write chr(1)

or

a.writeline chr(1)

"Murthy" wrote:

I am creating a text file using the following code:

Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile(FilePath & NameOfFile, True)

Now, in the new text file created, I want to insert page breaks.

What is the code to be written to have page breaks in the text file created?

- Murthy

I thought formfeed was chr(12) (hex 0C).

I know that this worked on my old dot matrix printer from years ago--not sure if
it'll work with the OP's printer.

Joel wrote:

It is ASCiII code SOH (Start of Header) which is CHR(1).

So either
a.write chr(1)

or

a.writeline chr(1)

"Murthy" wrote:

I am creating a text file using the following code:

Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile(FilePath & NameOfFile, True)

Now, in the new text file created, I want to insert page breaks.

What is the code to be written to have page breaks in the text file created?

- Murthy



--

Dave Peterson

You need to check the manual for your printer to find out what control
characters or escape sequence will produce a page break. Any of these
sequences can be made using a combination of chr() statements

PageBreak = chr(13) & chr(10) & ..............

"Murthy" wrote:

Thanks.

Yes, chr(1) is writing something to the text file, but it really didn't
force a page break on a laser printer.

Still, I will test it on a line printer and get back.

Thanks for your help.



"Joel" wrote:

It is ASCiII code SOH (Start of Header) which is CHR(1).

So either
a.write chr(1)

or

a.writeline chr(1)

"Murthy" wrote:

I am creating a text file using the following code:

Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile(FilePath & NameOfFile, True)

Now, in the new text file created, I want to insert page breaks.

What is the code to be written to have page breaks in the text file created?

- Murthy

Thanks Joel and Dave.

Finally Chr(12) has worked for my printer.

My sincere thanks to both of you again.

- Murthy

"Dave Peterson" wrote:

I thought formfeed was chr(12) (hex 0C).

I know that this worked on my old dot matrix printer from years ago--not sure if
it'll work with the OP's printer.

Joel wrote:

It is ASCiII code SOH (Start of Header) which is CHR(1).

So either
a.write chr(1)

or

a.writeline chr(1)

"Murthy" wrote:

I am creating a text file using the following code:

Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile(FilePath & NameOfFile, True)

Now, in the new text file created, I want to insert page breaks.

What is the code to be written to have page breaks in the text file created?

- Murthy



--

Dave Peterson