Personal Video Database

Thank you so much Ivek!

Thank you Ivek for your further help. I assumed that I had to put .cfg files to Script folder. Now, PVD doesn't crash, but nothing is imported. I just see status "downloading from http://www.kinopoisk.ru/..." and nothing happens after status disappears.

Also, I didn't found any line of the code you posted in kinopoisk_poster.cfg file. No "pgPosters :=Enabled", no "optPosters :=Enabled". None of these lines are present in file?

Any tip? Thank you in advance

Does kinopoisk.ru poster import works? I receive regular updates of the script but never succedded to import any poster. PVD crashes when running the script?

Thank you in advance

Great!!!

Thank you, Ivek


But I meant on that specific script. I can't import Tech specs and awards with it?

        Ruben Gonzales <afrocuban01@yahoo.com>
        Today at 5:14 PM
        To: nostradamus68@gmx.net

Nostra,

"... I would like to kindly ask you something. Please give PVD chance to survive. Give the code to community, or whatever is most suitable for you. Definitely there is no software out there that is more funcional than your phenomenal PVD.

Gratefuly,
Afrocuban

Hello Ivek,
What I see now, the script searches by url if there's any, and if there's no url then by: 1. Title and if there's no title, or script cannot find in on RT, it searches by 2. origtitle

One more possible use of it arrised. Is it possible to set this script to search for a movie details by this order: 1. Custom title; 2. Title; 3. origtitle.

So, if theres no Custom title, it would search by Title, and if there's no results by these 2, to search by origtitle?

Thanks in advance!

Ok, I got it!

One (right) bracket missing, and one sufficient "end". This was what I asked for

procedure ParseMovie(MovieURL : String; HTML : String);
var
curPos, endPos : Integer;
Date, Title, URL, Month, Month1, Months, TmpStr, TmpStr0, TmpStr1,

TmpStr2  : String;
DateParts : TWideArray;
begin

//Date ~Updated~ (choose simple or verbose version)
Date := DateToStr(CurrentDateTime);
if Date <> '' then
  begin
    ExplodeString(Date, DateParts, '-');
Date := DateParts[2] +'.'+ DateParts[1] +'.'+ DateParts[0];
AddCustomFieldValueByName('RTUpdated', Date + ' at ' + TimeToStr

(CurrentDateTime) + ' • ' + RATING_NAME + ' ' + SCRIPT_VERSION); //

Annoying
  end else
    LogMessage('date not found');


//Get ~mfURL~ or ~RT Url~
endPos := Pos('" rel="canonical" itemprop="url"/>', HTML);
if endPos > 0 then begin
curPos := PrevPos('</title> <link href="', HTML, endPos);
AddFieldValue(mfURL, Copy(HTML, curPos + 21, endPos - curPos - 21));
end else
AddFieldValue(mfURL, MovieURL);
AddCustomFieldValueByName('Rottentomatoes.com', '<link url="' + MovieURL +

'">Rottentomatoes.com</link>');


////// ---- ~Movie~ ---- //////

//~Title~
curPos := Pos('" itemprop="name"> ', HTML) + Length('" itemprop="name"> ');
EndPos := PosFrom('</span></h1>', HTML, curPos);
    TmpStr := RemoveTags(Trim(Copy(HTML, curPos, endPos - curPos)), false);
TmpStr := StringReplace(TmpStr, '                 ', ' ', True, True, False);
if TmpStr <> '' then
AddCustomFieldValueByName('Title',TmpStr);
Once again, thanks a lot, Ivek!

Hello Ivek,

Is it possible with this script to import Title to a Custom Field also named "Title"? What piece of code it would be? Thanks in advance.

I have already added this piece of code
AddCustomFieldValueByName('Rottentomatoes.com', '<link url="' + MovieURL + '">Rottentomatoes.com</link>');
:
//Get ~mfURL~ or ~RT Url~
endPos := Pos('" rel="canonical" itemprop="url"/>', HTML);
if endPos > 0 then begin
curPos := PrevPos('</title> <link href="', HTML, endPos);
AddFieldValue(mfURL, Copy(HTML, curPos + 21, endPos - curPos - 21));
end else
AddFieldValue(mfURL, MovieURL);
AddCustomFieldValueByName('Rottentomatoes.com', '<link url="' + MovieURL + '">Rottentomatoes.com</link>');

Ivek,

Great tip and work as usual! Thank you so much for being there for us! 

Wish you all the best.

Note: This is to relate to this forum topic, if someone is interested in with it.