English > Scripts and Templates

Imdb People

(1/3) > >>

mgpw4me:
A while back I posted a script to download people images from IMDB.  It's gone unmaintained until now.  Maybe this is a duplication of something Ivek has done, but I couldn't get anything else to work, so....

LIMITATIONS:


* You can only download 1 image
* Silent mode (not recommended) MUST be set "True" in the script itself.  In truth, I haven't even tested that it works.
* Image size is set to 600 X 600 in the script
* Script needs to be installed in the PVD->SCRIPTS directory
New attachment with updates.

Ivek23:
Thank you for the excellent working.

Thank you for your script
--- Quote from: mgpw4me on May 11, 2015, 03:06:28 am ---Maybe this is a duplication of something Ivek has done, but I couldn't get anything else to work, so....
--- End quote ---
which is not a duplicate of my script, which transfers only the photo (next to the title of people) on people IMDB Main page site. My script is just a temporary solution until Nostra has been repaired Imdb_people plugin, which now does not currently transfer photos from people on IMDB web pages (people IMDB Main page).

Ivek23:
Perhaps we can find a solution to transfer people photo images from multiple sites, if, of course, remain, as is the case with John Wayne. To help you can current AllMovie.com_new script, which now does not work anymore, where I used solution for search results on multiple pages.

If I am in this code

--- Code: ---function GetDownloadURL : AnsiString;

begin

 Msg('-------- GetDownloadUrl Starting',mlGood);
 if ( PersonUrl = '' ) then begin;
    LinkCount := ExplodeString(GetFieldValue(pfURL),Links,' ');

    for LinkIndex := 0 to LinkCount-1 do begin;
        if ((Pos('imdb.com',Links[LinkIndex]) > 0) and (PersonUrl = '')) then begin;
           PersonUrl := Links[LinkIndex] + '/mediaindex?page=1';
           PersonUrl := TFFReplace( PersonUrl,'//mediaindex?page=1','/mediaindex?page=1');
           Msg('PersonUrl has been set to ' + PersonUrl,mlGood);
           continue;
        end;
    end;
    Mode := smNormal;
    Msg('Mode now set to smNormal',mlGood);
 end;

 if (Mode = smSearch) then
    Result := SEARCH_STR
 else
 if (Mode = smPage) then
    Result := PageUrl
 else
    Result := PersonUrl;

 Msg('-------- GetDownloadUrl completed Result: ' + Result,mlGood);

end;
--- End code ---
this part of the code
--- Code: ---PersonUrl := Links[LinkIndex] + '/mediaindex';
--- End code ---
add this piece of code

--- Code: ---PersonUrl := Links[LinkIndex] + '/mediaindex?page=1';
--- End code ---
or change the page number, the script is still working properly.

If this succeeded, this would be a great script. the same one which was made a few years ago and is stored in the Archive of scripts.

mgpw4me:
Fair enough.  I've updated the script to pull in all the image pages.

Ivek23:

--- Quote from: mgpw4me on May 11, 2015, 05:14:48 pm ---Fair enough.  I've updated the script to pull in all the image pages.
--- End quote ---

I apologize if I tend to script does not transfer all the images (this has happened as soon as I installed the script), but now works perfectly and correctly.

I have a request, if it is possible to make a similar script for movies images (posters).

Thank you for your excellent work, again.

Navigation

[0] Message Index

[#] Next page