alternative to WScript.Shell

[rcmail14872@yahoo.com]

I have seen some very general suggestions for alternative code to the
WScript.Shell code, but nothing specific. In the two lines of code
below (I think) the first line creates a text file on the hard drive.
When I get to this line I get runtime error 429 "ActiveX component
can't create object". I know I should not use WSH but I haven't been
able to figure out an alternative. I tried looking through the VBA
editor help file for "file" and "createobje ct" but I didn't get
anywhere.

Set shell = CreateObject("W Script.Shell")
Set fso = CreateObject("S cripting.FileSy stemObject")

[rcmail14872@yahoo.com]

Re: alternative to WScript.Shell

Sorry, I wrote to soon. I found the code below and it does just what I
need.

Dim fs As Object
Dim ts As Object

Set fs = CreateObject("S cripting.FileSy stemObject")

Set ts = fs.CreateTextFi le("FileName", True)
ts.WriteLine "Text goes here."
ts.Close

set ts=Nothing
Set fs = Nothing


rcmail14...@yah oo.com wrote:[color=blue]
> I have seen some very general suggestions for alternative code to the
> WScript.Shell code, but nothing specific. In the two lines of code
> below (I think) the first line creates a text file on the hard drive.
> When I get to this line I get runtime error 429 "ActiveX component
> can't create object". I know I should not use WSH but I haven't been
> able to figure out an alternative. I tried looking through the VBA
> editor help file for "file" and "createobje ct" but I didn't get
> anywhere.
>
> Set shell = CreateObject("W Script.Shell")
> Set fso = CreateObject("S cripting.FileSy stemObject")[/color]

[Tony Toews]

Re: alternative to WScript.Shell

rcmail14872@yah oo.com wrote:
[color=blue]
>Set ts = fs.CreateTextFi le("FileName", True)
>ts.WriteLine "Text goes here."
>ts.Close[/color]

From the A97 online help.

When working with large amounts of data, it is often convenient to write data to or
read data from a file. The Open statement lets you create and access files directly.
Open provides three types of file access:

· Sequential access (Input, Output, and Append modes) is used for writing text
files, such as error logs and reports.
· Random access (Random mode) is used to read and write data to a file without
closing it. Random access files keep data in records, which makes it easy to locate
information quickly.
· Binary access (Binary mode) is used to read or write to any byte position in
a file, such as storing or displaying a bitmap image.

Note The Open statement should not be used to open an application's own file types.
For example, don't use Open to open a Word document, a Microsoft Excel spreadsheet,
or a Microsoft Access database. Doing so will cause loss of file integrity and file
corruption.

The following table shows the statements typically used when writing data to and
reading data from files.

Access Type Writing Data Reading Data
Sequential Print #, Write # Input #
Random Put Get
Binary Put Get

Tony
--
Tony Toews, Microsoft Access MVP
Please respond only in the newsgroups so that others can
read the entire thread of messages.
Microsoft Access Links, Hints, Tips & Accounting Systems at

http://www.granite.ab.ca/accsmstr.htm