English > Support

Allmovie.com https

(1/15) > >>

afrocuban:
One more https transition. Allmovie.com script isn't possible to use anymore in PVD?

Kind regards.

UtNut:

Same here, is there chance to work around https? Really love their comments.

Ivek23:
Tests Proxomitron. I think this would be an ideal solution for your problems. I also attach a default.cfg file that already has an added solution for the Allmovie.com https connection. How and what is described in topic:
Proxomitron - next https solution for PVD.

I did not test if it works, because at present I have many family responsibilities (my father is seriously ill) and there is no time for testing.

BTW:
I will know more about this somewhere around the first of November, how and what will happen in the next few months to the end of March of the following year.

default.cfg file is attach.

afrocuban:
Dear Ivek,

So sorry to hear about your father. Wish him well, please!

Thank you for your kind answer. Following your proxomitron guide I actually made it work for allmovie.com! The only strange thing is that it doesn't import AllMovie synopsis anymore.

Kind regards

Ivek23:

--- Quote from: afrocuban on October 14, 2017, 02:15:59 am ---Dear Ivek,

So sorry to hear about your father. Wish him well, please!

--- End quote ---

Thanks.


--- Quote from: afrocuban on October 14, 2017, 02:15:59 am ---Thank you for your kind answer. Following your proxomitron guide I actually made it work for allmovie.com! The only strange thing is that it doesn't import AllMovie synopsis anymore.
--- End quote ---

Allmovie.com script requires mass updates, which I can not do with the current situation. But I hope that as soon as possible,
so stay tuned for messages.

At the moment and quickly, I made corrections only in the ParseSearchResults procedure so that the script finds search results for a specific movie.


--- Code: ---procedure ParseSearchResults(HTML : String);
var
curPos, endPos : Integer;
Title, Year, URL, director : String;
begin
//List of other site number where search page :
TabNumber := [''];

// curPos := Pos('<option value="movies" selected>', HTML);
// curPos := Pos('div class="results-section movies">', HTML);
curPos := Pos('<li class="movie">', HTML);
if curPos < 1 then
Exit;

LogMessage('Parsing search results...');

//curPos := PosFrom('<a href="http://www.allmovie.com/movie/', HTML, curPos);
curPos := PosFrom('<a href="https://www.allmovie.com/movie/', HTML, curPos);
while curPos > 0 do begin
endPos := PosFrom('">', HTML, curPos);
URL := Copy(HTML, curPos + 9, endPos - curPos - 9);
    URL     := StringReplace(URL, 'https://', 'http://', True, True, False);

curPos := PosFrom('">', HTML, curPos)+2;
endPos := PosFrom('</a>', HTML, curPos);
Title := Copy(HTML, curPos, endPos - curPos);

curPos := PosFrom('</a>', HTML, curPos)+4;
endPos := PosFrom('</div>', HTML, curPos);
Year := RemoveTags(Trim(Copy(HTML, curPos, endPos - curPos)), false);

// curPos := PosFrom('">', HTML, curPos)+2;
// endPos := PosFrom('</a></dd>', HTML, curPos);
// director := RemoveTags(Trim(Copy(HTML, curPos, endPos - curPos)), false);

AddSearchResult(Title+' '+Year, '', '', URL, '');
curPos := PosFrom('<a href="https://www.allmovie.com/movie/', HTML, curPos);

end;

AddSearchResult('', '', '', '', '');

//Get Name of movie to search :               
    MovieName := GetFieldValue(2);
    Explodestring(MovieName,TabMovieName,#32);
    MovieName := '';
    For I:=low(TabMovieName) to High(TabMovieName) do
    Begin
    MovieName := MovieName + #43 + TabMovieName[I];
MovieName := StringReplace(MovieName, '/', '-', true, false, true);
    end;
//Add Links to Page with other sites in TabNumber:
    For I := Low(TabNumber) to High(TabNumber) do
    Begin
URL := 'http://www.allmovie.com/search/movies/'+MovieName;
//AddSearchResult('Search in '+MovieName+' on AllMovie.com','Movie results','',URL,'');
AddSearchResult('Search in '+MovieName+' on AllMovie.com','','',URL,'');
  end;
 
end;
--- End code ---

Navigation

[0] Message Index

[#] Next page