English > Support

AllMovie disappeared, Allrovi.com appeared!

<< < (16/17) > >>

Ivek23:

--- Quote from: rick.ca on September 24, 2012, 02:28:09 am ---So we may as well leave the script as is for a time, in case the data returns.

--- End quote ---

Someday they may return data, we will see, maybe we will in the future again experience what a surprise from the AllRovi.com.

Ivek23:

--- Quote ---
--- Quote from: rick.ca on September 24, 2012, 02:28:09 am ---
--- Quote ---How it works AllRovi movie script given the changes that I do not know.
--- End quote ---

I was saving just the link to the tab, which is of course now useless. So I deleted the data and removed that section of the script. For those saving the detail, I'm not sure what it does, but probably nothing (i.e., I don't think it will effectively delete any existing data). So we may as well leave the script as is for a time, in case the data returns.
--- End quote ---

--- Quote from: Ivek23 on September 24, 2012, 06:43:40 am ---
--- Quote from: rick.ca on September 24, 2012, 02:28:09 am ---So we may as well leave the script as is for a time, in case the data returns
--- End quote ---

Someday they may return data, we will see, maybe we will in the future again experience what a surprise from the AllRovi.com.
--- End quote ---

--- End quote ---

Apparently, it was a temporary error with the AllRovi.com. The error is corrected, Releases page is already back and working normally.

rick.ca:

--- Quote from: rick.ca on September 24, 2012, 02:28:09 am ---So we may as well leave the script as is for a time, in case the data returns.
--- End quote ---

I love it when being lazy turns out to be the right answer. ;)

Ivek23:
The Wayback Machine changed the url in the source code. I still find old AllMovie saved(cached) pages, but now with them you can not download more info data. If little change url address, the URL redirects to the new AllMovie page url address.

BTW:
I attach the script if you can anyone help to script work again.
I am already looking for solutions, but so far no solution.


After The Sunset

http://web.archive.org/web/20100201075229/http://allmovie.com/work/after-the-sunset-294201

[attachment deleted by admin]

Ivek23:
Here is solution:


--- Code: --- //Get URL
 EndPos := Pos('">Overview</a>', HTML);
 if EndPos > 0 then begin
  curPos := PrevPos('<a href="', HTML, EndPos);
  AddFieldValue(mfURL, 'http://web.archive.org'+Copy(HTML, curPos + 9, EndPos - curPos - 9));
 end else
  AddFieldValue(mfURL, MovieURL);
 
 //Get URL
 EndPos := Pos('">Overview</a>', HTML);
 if EndPos > 0 then begin
  curPos := PrevPos('<a href="', HTML, EndPos);
    AddFieldValue(mfURL, 'http://web.archive.org'+Copy(HTML, curPos + 9, EndPos - curPos - 9));
 end else

 //AddFieldValue(mfURL, MovieURL); // Changed to:
 AddCustomFieldValueByName('Urlw', '<link url="' + MovieURL + '">' + MovieURL + '</link>');
 AddCustomFieldValueByName('Urlw1', '<link url="' + MovieURL + '">' + MovieURL + '</link>');
   
 //Get Review URL
 if GET_REVIEW then begin
  EndPos := Pos('">Review</a>', HTML);
  if EndPos > 0 then begin
   curPos := PrevPos('<a href="', HTML, EndPos);
   ExtraLinks[smReview] := 'http://web.archive.org'+Copy(HTML, curPos + 9, EndPos - curPos - 9);
  end; 
 end;
 
 //Get Cast URL
 EndPos := Pos('">Cast</a>', HTML);
 if EndPos > 0 then begin
  curPos := PrevPos('<a href="', HTML, EndPos);
  ExtraLinks[smCast] := 'http://web.archive.org'+Copy(HTML, curPos + 9, EndPos - curPos - 9);
 end;
 
 //Get Credits URL
 if GET_CREDITS then begin
  EndPos := Pos('">Production Credits</a>', HTML);
  if EndPos > 0 then begin
   curPos := PrevPos('<a href="', HTML, EndPos);
   ExtraLinks[smCredits] := 'http://web.archive.org'+Copy(HTML, curPos + 9, EndPos - curPos - 9);
  end;
 end;

 
 //Title
 curPos := Pos('<span class="title">', HTML) + Length('<span class="title">');
 EndPos := PosFrom('</span>', HTML, curPos);
 
 AddCustomFieldValueByName('Titlew', Copy(HTML, curPos, EndPos - curPos));
 
 
 //Poster
 curPos := PosFrom('<tr><td valign="top"><img src="', HTML, EndPos);
 if curPos > 0 then begin
  curPos := curPos + Length('<tr><td valign="top"><img src="');
  EndPos := PosFrom('"', HTML, curPos);
 
  ExtraLinks[smPoster] := 'http://web.archive.org'+Copy(HTML, curPos, EndPos - curPos);
  if Pos('noimage', ExtraLinks[smPoster]) > 0 then
   ExtraLinks[smPoster] := '';
 end;
--- End code ---

I attach the script, which is now corrected.

[attachment deleted by admin]

Navigation

[0] Message Index

[#] Next page

[*] Previous page