Sam,

This is great, but my problem moved; the line below created the error
below it.

***************This Line
Set a = fs.CreateTextFile(strFileLocation)   <---- Line 56

***************Created this error
Microsoft VBScript runtime error '800a0005' 

Invalid procedure call or argument 

/get_movie_14.asp, line 56 
*****************
See all your code below

I think I have something just not installed....

Thanks
bob


-----Original Message-----
From: Sam Thompson [mailto:[EMAIL PROTECTED]] 
Sent: Monday, October 07, 2002 12:25 PM
To: ActiveServerPages
Subject: Re: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000


<%
strURL = "http://www.yahoo.com/";
strFileLocation = Server.MapPath("yahoo.txt")

Dim objXMLHTTP, xml, s
Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP")
xml.Open "GET", strURL, False
xml.Send
s = xml.responseText
Set xml = Nothing

Set fs = Server.CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile(strFileLocation)
a.WriteLine (s)
a.close
%>

HTH
Sam

----- Original Message -----
From: "Robert Leonard" <[EMAIL PROTECTED]>
To: "ActiveServerPages" <[EMAIL PROTECTED]>
Sent: Monday, October 07, 2002 5:10 PM
Subject: RE: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000


> Sam   appreciate the help..
>
> Very simply, we have a spider program that picks up a page from a 
> given web site and stores that page (source) in a given location.  No 
> database involved.  Code is:
>
> **************************
> Set Inet = Server.CreateObject("InetCtls.Inet.1") (problem line) 
> Inet.RequestTimeOut=170 Server.ScriptTimeOut=170
>
> Do While Not objRecordset.EOF
> 'strURL = objRecordset("url")&""
> strURL = "http://www.anywhere.com";
> strFileLocation = objRecordset("file_location")&""
> %>
> <%=strURL%> Is The URL.<br>
> <%=strFileLocation%> Is Being Worked On.<br>
> <%
> Inet.Url = strURL
> s = Inet.OpenURL
> Set fs = Server.CreateObject("Scripting.FileSystemObject")
> Set a = fs.CreateTextFile(strFileLocation)
> a.WriteLine (s)
> a.close
> ********************************
>
> -----Original Message-----
> From: Sam Thompson [mailto:[EMAIL PROTECTED]]
> Sent: Monday, October 07, 2002 11:33 AM
> To: ActiveServerPages
> Subject: Re: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000
>
>
> Before I/we give you some code you need to explain more, please try 
> and spend abit more time typing your posts and thinking about what you

> want us to help you with, reading your mind isnt easy!
>
> Have you got an ASP page which drags data from a database? Is it this 
> data that you want to create a text file from? Or have you just got a 
> static HTML page, and you need to create an ASP page which creates a 
> txt file from the static HTML page?
>
> Detail is important.
>
> ----- Original Message -----
> From: "Robert Leonard" <[EMAIL PROTECTED]>
> To: "ActiveServerPages" <[EMAIL PROTECTED]>
> Sent: Monday, October 07, 2002 4:13 PM
> Subject: RE: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000
>
>
> >
> > Yes, that is exactly what I want to do; I am creating a txt file 
> > from the source HTML file of the site.  How else?
> >
> > bob
> >
> > -----Original Message-----
> > From: Sam Thompson [mailto:[EMAIL PROTECTED]]
> > Sent: Monday, October 07, 2002 10:26 AM
> > To: ActiveServerPages
> > Subject: Re: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000
> >
> >
> > So you wanna create a txt or html file containing some data which 
> > you have dragged out of a database? You dont need to use the Inet 
> > component to do that, IS that what you want to do?
> >
> > If not, maybe you need to add additional components to IIS on your 
> > W2K
>
> > box, I dont think the Inet control is installed by default. Try 
> > Add/Remove programs.
> >
> > HTH
> >
> > Sam Thompson
> >
> > ----- Original Message -----
> > From: "Robert Leonard" <[EMAIL PROTECTED]>
> > To: "ActiveServerPages" <[EMAIL PROTECTED]>
> > Sent: Monday, October 07, 2002 3:20 PM
> > Subject: RE: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000
> >
> >
> > > I am simply trying to go to a web site and write the data(source) 
> > > to
>
> > > a
> >
> > > specified file name on the server (different than would be in the 
> > > Temp
> >
> > > Internet directory).  Problem is, I do not know what I am missing 
> > > either; works on our NT server, but not on 2000 server
> > >
> > > Confused in florida (at least its sunny)
> > >
> > > Bob
> > >
> > >
> > > -----Original Message-----
> > > From: Chris Tifer [mailto:[EMAIL PROTECTED]]
> > > Sent: Monday, October 07, 2002 12:26 PM
> > > To: ActiveServerPages
> > > Subject: Re: 'ASP 0177 : 800401f3' works fine on NT4 errors on 
> > > 2000
> > >
> > >
> > > The component seems to need to be registered.
> > > What component is this?
> > >
> > > Chris Tifer
> > >
> > > ----- Original Message -----
> > > From: "Robert Leonard" <[EMAIL PROTECTED]>
> > > To: "ActiveServerPages" <[EMAIL PROTECTED]>
> > > Sent: Sunday, October 06, 2002 10:21 AM
> > > Subject: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000
> > >
> > >
> > > > Problem...  worked on old server (nt4) but now on 2000 server 
> > > > does
>
> > > > not. What am i missing?
> > > >
> > > > all I am trying to do is create a source file of a web page 
> > > > being accessed
> > > >
> > > > Line 35
> > > > ***************************
> > > > Set Inet = Server.CreateObject("InetCtls.Inet.1")
> > > >
> > > > error message
> > > > ***************************
> > > > Server object error 'ASP 0177 : 800401f3'
> > > >
> > > > Server.CreateObject Failed
> > > >
> > > > /get_movie_14.asp, line 35
> > > >
> > > > Invalid ProgID. For additional information specific to this 
> > > > message please visit the Microsoft Online Support site located 
> > > > at:
>
> > > > http://www.microsoft.com/contentredirect.asp.
> > > >
> > > > ---
> > > > You are currently subscribed to activeserverpages as: 
> > > > [EMAIL PROTECTED] To unsubscribe send a blank email to
> > > %%email.unsub%%
> > > >
> > >
> > >
> > > ---
> > > You are currently subscribed to activeserverpages as: 
> > > [EMAIL PROTECTED] To unsubscribe send a blank email to 
> > > %%email.unsub%%
> > >
> > >
> > >
> > >
> > > ---
> > > You are currently subscribed to activeserverpages as:
> > [EMAIL PROTECTED]
> > > To unsubscribe send a blank email to
> > %%email.unsub%%
> > >
> >
> >
> > ---
> > You are currently subscribed to activeserverpages as: 
> > [EMAIL PROTECTED] To unsubscribe send a blank email to 
> > %%email.unsub%%
> >
> >
> >
> >
> > ---
> > You are currently subscribed to activeserverpages as:
> [EMAIL PROTECTED]
> > To unsubscribe send a blank email to
> %%email.unsub%%
> >
>
>
> ---
> You are currently subscribed to activeserverpages as: 
> [EMAIL PROTECTED] To unsubscribe send a blank email to %%email.unsub%%
>
>
>
>
> ---
> You are currently subscribed to activeserverpages as:
[EMAIL PROTECTED]
> To unsubscribe send a blank email to
%%email.unsub%%


---
You are currently subscribed to activeserverpages as: [EMAIL PROTECTED]
To unsubscribe send a blank email to
%%email.unsub%%




---
You are currently subscribed to activeserverpages as: [email protected]
To unsubscribe send a blank email to [EMAIL PROTECTED]

Reply via email to