Javascript ASP activeXobject problem(FileSystemObject)

Here is my testing code:

<%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>
<html>
<head>
<title>Home Page</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="CSS_style/sharedstyle" rel="stylesheet" type="text/css">
<%
function MMread_path(name) {
       //read from the records
       var count_record = name + ".txt";
       //get the absolute path
       var abs_path = String(Request.ServerVariables("PATH_TRANSLATED"));
       //take off the // and words
       var file_to_open = abs_path.replace(/\\\w*.asp/, "\\") +  count_record;
       return file_to_open;
}
function MMshow_ads() {

              var abs_path = MMread_path("ads_link"); // get the absolute path for the ads
            abs_path = abs_path.replace(/\\\w*\\\w*.txt/, "\\ads\\ads_link.txt");
            //count how many ads
               var fso = new ActiveXObject("Scripting.FileSystemObject");
              if (fso.FileExists(abs_path)) { //check if it exists
                    fs_stream = fso.OpenTextFile(abs_path);
                  var link = new Array();
                  var intmax = 0;
                  while ( ! fs_stream.AtEndOfStream) {
                        strItem = fs_stream.ReadLine();
                  if (strItem !== "") {
                        var Items = new Array();
                        Items = strItem.split(/\|/);
                        //------------------
                        link[intmax] = Items[1];
                        intmax++; // count howmany ads
                  } // end adding the links
                  }//end while
                  } // end if thing exist
                  var intrandom = Math.round((intmax - 1)* Math.random());
                  var pic = abs_path.replace(/\w*.txt/,intrandom + ".gif");
                  var link = link[intrandom];
                  var out = '<a href="';
                  out += link;
                  out += '" target="_blank">';
                  out += '<img src="';
                  out += pic;
                  out += '" border= 0>';
                  out += '</a>';
                  Response.Write(out)
}
%>

<% MMshow_ads(); %>
</body>
</html>

I got a folder that contains all the ads and i want to use ASP to randomize them.
I built site with codes that are similar to the one that i shown and they work perfectly fine at my own OFFLINE computer with IIS. But then when i upload it to www.domaindlx.com server. It started to give error like this one:

Microsoft JScript runtime error '800a01ad'

Automation server can't create object

[path],Line22

Please help me on this one, and i really appreciate that.
I suspect it maybe the problem of the server instead of my code since it works perfectly fine on my own computer with IIS.
porschelauAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

DaRocker22Commented:
Your script is fine, its just your webhost that your uploading the script to has the FileSystemObject Disabled.


================================
http://www.domaindlx.com/faq.asp?q=22
================================
Can I use 'Scripting.FileSystemObject'?

This object is disabled due to security reasons.
================================



-DaRocker22
chevireddyCommented:
Hi porschelau,

Your script is fine......but when u create ActiveX Object at client side..... your web browser settings should allow to create ActiveX object.... so you change your browser security settings to low level...... if you still getting any problem dont hesitate yourself ....Thanks

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
ASP

From novice to tech pro — start learning today.