Personal Video Database 1.0.2.7 MOD

English > Support

<< < (44/73) > >>

afrocuban:
Thank you so much Easy! God bless you! :)

It just looks that custom field piece of code has to come at the beginning of ~url section:

//Get ~url~
AddCustomFieldValueByName('FilmAffinity.com', '<link url="'+ StringReplace(DownloadURL,BASE_URL_PRE_TRUE,BASE_URL_PRE,True,False,False)+ '">FilmAffinity.com</link>');
if (0=Pos(BASE_URL,StoredURL)) then begin //Write the url if not exists (Spanish or english)
AddFieldValueXML('url',StringReplace(DownloadURL,BASE_URL_PRE_TRUE,BASE_URL_PRE,True,False,False));
LogMessage(' Get result url:'+StringReplace(DownloadURL,BASE_URL_PRE_TRUE,BASE_URL_PRE,True,False,False)+'||');
end;

This is how it works flawlessly. Thanks again!

afrocuban:
Oh, and one more question: when future FA script update happens, I guess I'd have to manually make a copy of it and add piece of code above?

Best regards

VVV_Easy_Programing:

--- Quote from: afrocuban on January 09, 2020, 12:15:27 am ---...
This is how it works flawlessly. Thanks again!

--- End quote ---
It sure happens because you have the url in the normal field, this is the meaning of code:
if (0=Pos(BASE_URL,StoredURL)) then begin //Write the url if not exists (Spanish or english)

With the code at the beginning of ~url section you you assure that the url is always written in the custom field, I don't see anything against.

--- Quote from: afrocuban on January 09, 2020, 01:10:01 am ---Oh, and one more question: when future FA script update happens, I guess I'd have to manually make a copy of it and add piece of code above?

--- End quote ---
Well, if I do the update I will try to include this code even if I don't add the custom field (I think there would be no risks).
In that case I would alert you.

Ivek23:
IMDB_ [EN] [HTTPS] V 1.4.1.2 script

--- Quote ---CHANGE LOG :
V 1.4.1.2 (10/01/2020) Ivek23: Added "IMDb.com" url links for afrocuban request per forum post: http://www.videodb.info/forum_en/index.php/topic,4154.msg21035.html#msg21035.
.
.
.
//Parse with the Movie URL 'smNormal'------------------------------------------------------------------------------------
If (Mode=smNormal) Then Begin
//Get the script Overwrite Options saved in pvdconf.ini (Remember that PVD only save the options on exit)
//0=Do nothing,1=Set if Empty,2=Overwrite
PVDConfigOptions:=TextBetWeenFirst(FileToString(GetAppPath+'pvdconf.ini'),'IMDB_[EN][HTTPS].psf=',Chr(13));
//LogMessage('Stored Script PVDConfigOptions is:'+PVDConfigOptions+'||');
//LogMessage('The Script option of position '+ IntToStr(opPoster) +' is:'+Copy(PVDConfigOptions,opPoster,1)+'||');
Result:=prFinished; //It will change to prError if any big problem with exit;
//Information in several page. Needs Provider MovieID
MovieID:=TextBetWeenFirst(DownloadURL,BASE_URL_PRE_TRUE,BASE_URL_SUF);
LogMessage(' ParsePage mode smNormal|'+IntToStr(Mode)+'|. Getting provider data for MovieID|'+ MovieID +'|');
AddCustomFieldValueByName('IMDbID',MovieID);
LogMessage(' Get result IMDbID (CF~IMDbID~):'+MovieID+'||');
//Get ~url~
if (0=Pos(BASE_URL_PRE,StoredURL)) then begin //Write the url if not exists
AddFieldValueXML('url',StringReplace(DownloadURL,BASE_URL_PRE_TRUE,BASE_URL_PRE,True,False,False));
LogMessage(' Get result url:'+StringReplace(DownloadURL,BASE_URL_PRE_TRUE,BASE_URL_PRE,True,False,False)+'||');
end;
//Get ~IMDb Movie Url~
Movie_URL:=StringReplace(DownloadURL,BASE_URL_PRE_TRUE,BASE_URL_PRE,True,False,False);
AddCustomFieldValueByName('IMDb.com','<link url="'+Movie_URL+'">IMDb.com</link>');
AddCustomFieldValueByName('IMDbMoviesUrl','<link url="'+Movie_URL+'">IMDb MovieUrl</link>');
LogMessage(' Get result Movie_url: '+Movie_URL+' ||');
Fullinfo:='';
//Fullinfo:=Fullinfo+'<link url="'+Movie_UR+'">Maindetails</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'">MainPage</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'reference">Reference</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'fullcredits">Full Cast&Crew</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'awards">Awards</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'releaseinfo">ReleaseDates</link> ';
//Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'technical">TechnicalSpecs</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'technical">TechSpecs</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'parentalguide">ParentsGuide</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'keywords">PlotKeywords</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'plotsummary">PlotSummary</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'locations">FilmLocations</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'taglines">Taglines</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'companycredits">CompanyCredits</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'movieconnections">Connections</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'soundtrack">Soundtracks</link> ';
//Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'externalsites">Miscellaneous</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'externalsites">MiscSites</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'externalsites#photos">MiscPhoto</link> ';
Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'mediaindex">PhotoGallery</link> ';
//Fullinfo:=Fullinfo+'<link url="'+Movie_URLL+'externalsites#misc">MiscSites</link> ';
//Fullinfo:=Fullinfo+'<link url="'+Movie_URL+'externalsites#photos">MiscPhoto</link> ';
If Fullinfo <> '' then IMDB_URL:=Fullinfo;
If IMDB_URL <> '' then AddCustomFieldValueByName('IMDb Movie Url',IMDB_URL);
LogMessage(' Get result Fullinfo-IMDB_URL (CF~IMDb Movie Url~ ):'+#13+IMDB_URL+'||')
//Parse principal provider page = BASE_URL_PRE_TRUE------------------------------------------------------------------
--- End quote ---

It's attached IMDB_ [EN] [HTTPS] V 1.4.1.2 script.

Ivek23:
IMDB_ [EN] [HTTPS] V 1.4.1.3 script

Made many minor fixes in several pieces of code.

--- Quote ---CHANGE LOG :
V 1.4.1.3 (01/05/2020) Ivek23: Added some new custom fields. Made many minor fixes in several pieces of code.
See the forum post: http://www.videodb.info/forum_en/index.php/topic,4141.0.html
--- End quote ---

Added some new custom fields.

Custom Fields:

--- Quote ---New:

Hidden Custom Fields in IMDB_ [EN] [HTTPS] script

* Sound Mix:
* Color:
* User CommentsPVD custom field for Type/Comments in Preferences/Movies/Custom Items:

* Sound Mix: (Multiselect list)
* Color: (Multiselect list)
* User Comments (Memo)
--- End quote ---

It's attached IMDB_ [EN] [HTTPS] V 1.4.1.3 script.

Navigation

[0] Message Index

[#] Next page

[*] Previous page

Go to full version