Bob
Your strFileLocation variable needs to be the path to the txt file you are
creating. In my example I gave you:
strFileLocation = Server.MapPath("yahoo.txt")
which will create a text file called yahoo.txt in the same directory as the
ASP page you are running (because it uses Server.MapPath() to automatically
work out the path for you). If you want it to be created elsewhere, you can
do this:
strFileLocation = "d:\inetpub\wwwroot\test\yahoo.txt"
or going back to your original code, like this:
strFileLocation = objRecordset("file_location")
Hope that helps! ...oh and the fact that you got that error means you have
everything you need already installed.
Cheers
Sam
----- Original Message -----
From: "Robert Leonard" <[EMAIL PROTECTED]>
To: "ActiveServerPages" <[EMAIL PROTECTED]>
Sent: Monday, October 07, 2002 8:52 PM
Subject: RE: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000
> 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.unsub%%
>
---
You are currently subscribed to activeserverpages as: [email protected]
To unsubscribe send a blank email to [EMAIL PROTECTED]
