Tore, Yes I did try and (results were 8 and string). Works fine with other sites... I also know the variable exists because it will display in the screen output. I am going to try two different things - 1st, strip the forst 500 characters just to see if there is something to cause this and if this does not work, I am simply doing to insert the data into oracle and handle there (which maybe should have been the way it should have been done in 1st place)... Still will take any suggestions....
Thanks for the help... U2 Sam Bob leonard -----Original Message----- From: Bostrup, Tore [mailto:[EMAIL PROTECTED]] Sent: Friday, October 11, 2002 9:33 AM To: ActiveServerPages Subject: RE: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000 Did you try my suggestions below? (The View Source issue turned out to be something else, and it works now). Let us know what the results were. Tore. -----Original Message----- From: Robert Leonard [mailto:[EMAIL PROTECTED]] Sent: Thursday, October 10, 2002 5:30 PM To: ActiveServerPages Subject: RE: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000 Wow.... Every site works but the one I want (sux). What would possibly be in that soure to cause the error. I tried probably a dozen different sites and they all worked. Any Ideas? I can strip out if I know...???.... bob -----Original Message----- From: Bostrup, Tore [mailto:[EMAIL PROTECTED]] Sent: Thursday, October 10, 2002 1:02 PM To: ActiveServerPages Subject: RE: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000 I noticed that the Hollywood URL contains an ActiveX control, that a popunder occurred, and that it has View Source disabled in my browser... Also, I noticed that the documentation on the ResponseText method was somewhat vague as to what exactly was being returned. I would suggest: 1: Do a Response.Write VarType(s) and a Response.Write TypeName(s) to see what type of data it really references in the failing case. 2: If it does indicate a simple text (8 and String being the respective outputs), try pasting the actual text in as a literal in the WriteLine statement. 3: Find another site with "View Source" disabled, and see if you get the same result. Does anybody know of such a site? HTH, Tore. -----Original Message----- From: Robert Leonard [mailto:[EMAIL PROTECTED]] Sent: Thursday, October 10, 2002 11:50 AM To: ActiveServerPages Subject: RE: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000 Interesting.... -----Original Message----- From: Sam Thompson [mailto:[EMAIL PROTECTED]] Sent: Thursday, October 10, 2002 11:09 AM To: ActiveServerPages Subject: Re: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000 I just tested your code, it works if strURL is http://www.yahoo.com/ but it doesnt work using that hollywood.com url that you are trying to use. Dunno what to suggest now!!! Cheers Sam ----- Original Message ----- From: "Robert Leonard" <[EMAIL PROTECTED]> To: "ActiveServerPages" <[EMAIL PROTECTED]> Sent: Thursday, October 10, 2002 3:46 PM Subject: RE: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000 > Sam, > > Everything works up until I try to use the variable 's'. I can write > a literal w writeline and I can use the s variable within a response > write but when I try to use the a.writeline (s), I get the error > below; all works like a charm until we get to there. Could it be > something in the HTML code that is executing(?) causing the error (but > if that were the case, the same problem would exist in the temp file. > (??) > > Error************** > Microsoft VBScript runtime error '800a0005' > > Invalid procedure call or argument > > /get_movie_14.asp, line 58 > > Code****************"Just An Example" > strURL = > "http://www.hollywood.com/showtimes/theatre_detail.asp?searchtheatre=2 > 55 > 4" > strFileLocation = "C:\out2_working\movies\3.dat" > %> > <%=strURL%> Is The URL.<br> > <%=strFileLocation%> Is Being Worked On.<br> > <% > > 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) > Response.Write "File Name = '" & strFileLocation & "' writing '" & s & > "" > a.WriteLine (s) <----- Line 58 > a.close > > > Thanks in advance again > > bob > > -----Original Message----- > From: Sam Thompson [mailto:[EMAIL PROTECTED]] > Sent: Wednesday, October 09, 2002 11:00 AM > To: ActiveServerPages > Subject: Re: 'ASP 0177 : 800401f3' works fine on NT4 errors on 2000 > > > Bob, > > s is supposed to be a variable which contains the string of HTML which > you have grabbed from another site. > > This error would mean that s is empty, or doesnt exist as a variable, > have you changed the name of s or moved it somewhere else? Maybe you > could post your code again. > > Cheers > Sam > > ----- Original Message ----- > From: "Robert Leonard" <[EMAIL PROTECTED]> > To: "ActiveServerPages" <[EMAIL PROTECTED]> > Sent: Wednesday, October 09, 2002 3:23 PM > 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.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]
