Solved

File System Object

Posted on 2000-05-16
10
980 Views
Last Modified: 2012-05-04
i am trying to create a filesystem object in my asp page in order to track the number of visit. However there are error which says:

Microsoft VBScript runtime error '800a01ad'

ActiveX component can't create object: 'Scripting.FileSystemObject'

may i know how to solve this problem??

thank you
0
Comment
Question by:riyugie
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 2
  • 2
  • +2
10 Comments
 
LVL 6

Expert Comment

by:setiawan
ID: 2815696
Hi riyugie,

Post your code,and make sure there is Windows Scripting Host installed.

hope this helps

  danny
0
 
LVL 18

Expert Comment

by:mgfranz
ID: 2815788
Don't use components...;

<SCRIPT LANGUAGE="vbscript" RUNAT="server">
Function txtPageCounter
        Dim tmpHitCount,textObject,pagename,fhandle
        pagename = Request.ServerVariables("PATH_TRANSLATED") & ".txt"
      
        If Session(pagename) = "" Then
                Application.Lock
                Set textObject  = CreateObject("Scripting.FileSystemObject")
                If textObject.FileExists(pagename) Then

   Set fhandle = textObject.OpenTextFile(pagename)
   tmpHitCount = fhandle.readline
   fhandle.close
                Else
   tmpHitCount = 0
                End If
                tmpHitcount = tmpHitCount + 1
                Set fhandle = textObject.CreateTextFile(pagename)
                fhandle.writeline (tmpHitCount)
                fhandle.close
                Application.UnLock
                Session(pagename) = tmpHitCount
        Else
                 tmpHitCount = Session(pagename)
        End If
        txtPageCounter = tmpHitCount

End Function
</SCRIPT>
....

You are visitor # <%=txtPageCounter%>
0
 
LVL 1

Expert Comment

by:sgovinda
ID: 2820000
Change this line of code
Set textObject  = CreateObject("Scripting.FileSystemObject")
to
Set textObject  = Server.CreateObject("Scripting.FileSystemObject")

I faced similar problems with just using CreateObject, and the error was appearing at random.

By the way, if you still get the error, I would suggest, wrap your file handling code in a separate component and run it out of process.  You can do this by writing an ActiveX dll and registering with MTS as a server package. That's what I finally did to eliminate the error.
0
PeopleSoft Has Never Been Easier

PeopleSoft Adoption Made Smooth & Simple!

On-The-Job Training Is made Intuitive & Easy With WalkMe's On-Screen Guidance Tool.  Claim Your Free WalkMe Account Now

 
LVL 18

Expert Comment

by:mgfranz
ID: 2820007
???
0
 

Author Comment

by:riyugie
ID: 2823980
sgovinda ,

i have tried to use the server.createobject method, however, the error messages says that :"

Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

"

and i do not know how to create the dll, can u give me some ideas??

and here i accompany the codes that i have written:

      set fs = server.CreateObject("Scripting.FileSystemObject")
      varInOutFile = Server.MapPath("/home/home.cnt")
      set a = fs.openTextFile(varInOutFile)
      ct = cLng(a.ReadLine)
      a.close

if ct <> session("VisitCount")  then
      Set fs = server.CreateObject("Scripting.FileSystemObject")
      varInOutFile = Server.MapPath ("/home/home.cnt")
      Set a = fs.OpenTextFile(varInOutFile)
      ct = CLng(a.ReadLine)
      ct = ct + 1
            a.Close
            Set a = fs.CreateTextFile(varInOutFile, True)
            a.WriteLine (ct)
      a.Close
      session("VisitCount") = ct
end if

0
 
LVL 18

Expert Comment

by:mgfranz
ID: 2823990
My code works perfectly without ANY modifications.  However you are free to make any changes you feel necessary, but it might break the code...
0
 

Accepted Solution

by:
dstrommer earned 30 total points
ID: 2829629
Goto http://support.microsoft.com

Lookup Article ID: Q194801

The problem is that you don't have the dll installed, its corrupt, or you don't have permissions.

0
 
LVL 18

Expert Comment

by:mgfranz
ID: 2829792
What???
0
 

Expert Comment

by:dstrommer
ID: 2830722
Microsoft has a great support database at http://support.microsoft.com.

The database contains technical articles about bugs, fixes, hints, tips, etc.

Each document begins with the letter Q.

The answer to your problem is found in the Article ID: Q194801

The problem is that you can't instantiate the COM component.

According to the Error you got and the Q document info.

You have 3 possible problems.

1. The COM (FileSystem COM object) is not installed.
2. The FileSystem COM object is corrupt.
3. You don't have permissions.

The Q document tells you how to fix the problems your having.
0
 

Author Comment

by:riyugie
ID: 2831887
thank you all of u for the comments posted..

i have solved the problem and the problem is that the scrrun.dll file has been corrupted.

the error 'disappear' after i reinstall the IE5.

Thank you
0

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Hello, all! I just recently started using Microsoft's IIS 7.5 within Windows 7, as I just downloaded and installed the 90 day trial of Windows 7. (Got to love Microsoft for allowing 90 days) The main reason for downloading and testing Windows 7 is t…
I would like to start this tip/trick by saying Thank You, to all who said that this could not be done, as it forced me to make sure that it could be accomplished. :) To start, I want to make sure everyone understands the importance of utilizing p…
There's a multitude of different network monitoring solutions out there, and you're probably wondering what makes NetCrunch so special. It's completely agentless, but does let you create an agent, if you desire. It offers powerful scalability …
In this brief tutorial Pawel from AdRem Software explains how you can quickly find out which services are running on your network, or what are the IP addresses of servers responsible for each service. Software used is freeware NetCrunch Tools (https…

617 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question