Scripting.FileSystemObject"

Hi all

when I execute the following VB6 code in Windows 2000 and
as an Administrator, everything is working fine.

Project->References->"Microsoft Scripting Runtime" and
scrrun.dll is located in C:\WINNT\System32

Sub Main()
Dim fs As FileSystemObject

Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("c:\testfile.txt", True)
a.WriteLine ("This is a test.")
a.Close
End Sub

The problem is that when i try to execute it as a
Restricted User i get the message :

"Run-time error '-21470024770 (8007007e)'
Automation error
The specified module could not be found"

Can anyone has a solution to that?

when I execute the following VB6 code in Windows 2000 and
as an Administrator, everything is working fine.

Project->References->"Microsoft Scripting Runtime" and
scrrun.dll is located in C:\WINNT\System32

Sub Main()
Dim fs As FileSystemObject

Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("c:\testfile.txt", True)
a.WriteLine ("This is a test.")
a.Close
End Sub

The problem is that when i try to execute it as a
Restricted User i get the message :