I think its writeln() I could be getting my languages mixed up though hehe.
Greg -----Original Message----- From: Robert Leonard [mailto:[EMAIL PROTECTED]] Sent: Wednesday, October 09, 2002 10:23 AM To: ActiveServerPages Subject: RE: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000 Sam, Ok - almost works like a charm - except at WriteLine I get the following error. Does create file fine, but empty. Is WriteLine wrong? Thanks much in advance bob *************code Microsoft VBScript runtime error '800a0005' Invalid procedure call or argument /get_movie_14.asp, line 56 ****code 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) <------------line 56 a.close -----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 --- 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]
