English > Support
Personal Video Database 1.0.2.7 MOD
Ivek23:
--- Quote from: ronaldomm on January 05, 2019, 11:31:41 pm ---Hi,
I have been a long time user of this excellent program, but I am with a problem about the filmography of actors in this new version.
After I used the IMDB People [EN] [HTTPS] plugin for an specific actor, it isn't showing his full filmography. Look the exemple attached.
Please, could you help me in this case?
Regards.
--- End quote ---
--- Quote from: ronaldomm on January 06, 2019, 03:36:00 pm --- :)
OK. Thanks for while.
I am going to wait by the definitive solution. For while, i keep using The Proxomitron.
See you.
--- End quote ---
The solution is already, but it still needs some tests before the release, which you can expect in a day or two.
Ivek23:
--- Quote from: VVV_Easy_Programing on January 05, 2019, 03:10:50 pm ---Tell me if I was wrong in something.
--- End quote ---
I have not yet been able to verify everything if something is missing or it may not be necessary to change anything at the moment.
Ivek23:
--- Quote from: Ivek23 on January 06, 2019, 08:07:37 pm ---The solution is already, but it still needs some tests before the release, which you can expect in a day or two.
--- End quote ---
IMDB_People_ [EN] [HTTPS]+ script now has an added filmography code for transmitting information as well as for Altenative names.
IMDB_People_ [EN] [HTTPS]+ script is attached.
Ivek23:
IMDB_People_ [EN] [HTTPS]+ script
--- Quote ---Function ParsePage_IMDBPeopleAWARDS(HTML:String):Cardinal; //BlockOpen
//Returns:
// Result:=prFinished; Script has finished gathering data
// Result:=prError; If żany big problem? with exit
//Retrieve: AddAward(Event, Award, Category, Recipient, Year, Won)
Var
curPos,endPos,endPosAux,index,curPos0,curPos1,curPos2,curPos3,curPos4,endPos0,endPos1,endPos2:Integer;
MovieURL,ItemList:String;
ItemArray: TWideArray;
EventBlock,EventName,EventYear,YearBlock,AwardBlock,AwardName,AwardCategory,AwardRecipient,MovieYear:String;
AwardWon: Boolean;
Begin
LogMessage('Function ParsePage_IMDBPeopleAWARDS BEGIN=====================||');
Result:=prFinished; //It will change to prError if any big problem with exit
.
.
.
//Recipient Level
curPos2:=Pos('<td class="award_description">',AwardBlock); //String which opens the AwardCategory and AwardRecipient list data. WEB_SPECIFIC
While curPos2>0 Do Begin
//Get all "raw" list data for create good values separators (not use TextBetWeen)
endPos2:=PosFrom('</td>',AwardBlock,curPos2)+Length('</td>'); //Strings which opens/closes the data. WEB_SPECIFIC
ItemList:=Copy(AwardBlock,curPos2,endPos2-curPos2);
//LogMessage(' Parse results ('+IntToStr(curPos2)+','+IntToStr(curPos2)+') complex ItemList:'+ItemList+'||');
//The Receipt awards ItemList may have: 1) empty description or not have name (not interesting) and break ItemArray[]. 2) Several titles with year 3) Detail o full Notes
//So is better search sequentily by token in a block than with ItemArray
endPosAux:=PosFrom(#13,ItemList,2); //Strings which opens/closes the data. WEB_SPECIFIC
curPos3:=PosFrom('title',ItemList,2); //Strings which opens/closes the data. WEB_SPECIFIC
If (endPosAux<curPos3) Or (curPos3=0) Then Begin //There is Awardcategory because #13 is befor name or there isn't name. WEB_SPECIFIC
curPos4:=1;
AwardCategory:=TextBetWeen(ItemList,'<td class="award_description">',#13,false,curPos4); //Strings which opens/closes the data. WEB_SPECIFIC
LogMessage(' Parse Results in AwardCategory:'+AwardCategory+'||');
curPos4:=Pos('Shared with:',AwardCategory); //WEB_SPECIFIC.
If 0<curPos4 then AwardCategory:=Copy(AwardCategory,0,curPos4-1);
LogMessage(' Parse Results in AwardCategory0:'+AwardCategory+'||');
End Else Begin
AwardCategory:='';
End;
If curPos3=0 Then Begin //Award without Recipient
AddAward(EventName, AwardName, AwardCategory, '', EventYear, AwardWon);
LogMessage(' Get results Awards:#'+IntToStr(index)+'|'+EventName+'|'+AwardName+'|'+AwardCategory+'|'+''+'|'+EventYear+'|'); //+BoolToStr(AwardWon)+'||');
End;
While curPos3>0 Do Begin
MovieURL:='http://www.imdb.com/title'+TextBetWeen(ItemList,'<a href="/title','?ref_=nmawd_awd_',true,curPos4)+'/'; //Strings which opens/closes the data. WEB_SPECIFIC
LogMessage(' ** Parse Results in MovieURL: '+MovieURL);
AwardRecipient:=TextBetWeen(ItemList,'>','<',false,curPos3); //Strings which opens/closes the data. WEB_SPECIFIC
LogMessage(' Parse Results in AwardRecipient:'+AwardRecipient+'||');
MovieYear:=TextBetWeen(ItemList,'(',')',false,curPos3); //Strings which opens/closes the data. WEB_SPECIFIC
LogMessage(' ** Parse Results in MovieYear:'+MovieYear);
AddAward(EventName, AwardName, AwardCategory, AwardRecipient, EventYear, AwardWon);
LogMessage(' Get results Awards:#'+IntToStr(index)+'|'+EventName+'|'+AwardName+'|'+AwardCategory+'|'+AwardRecipient+'|'+EventYear+'|'); //+BoolToStr(AwardWon)+'||');
//endPosAux:=PosFrom('note',ItemList,curPos3); //Strings which opens/closes the data. WEB_SPECIFIC
endPosAux:=PosFrom('truncated-note',ItemList,curPos3); //Strings which opens/closes the data. WEB_SPECIFIC
curPos3:=PosFrom('title',ItemList,curPos3); //Strings which opens/closes the data. WEB_SPECIFIC
//curPos3:=PosFrom('name',ItemList,curPos3); //Strings which opens/closes the data. WEB_SPECIFIC
If curPos3>endPosAux Then curPos3:=0 //Avoid Names in notes. WEB_SPECIFIC
End;
curPos2:=PosFrom('<td class="award_description">',AwardBlock,endPos2); //String which opens the AwardCategory and AwardRecipient list data. WEB_SPECIFIC
End;
curPos1:=PosFrom('<td class="award_outcome"',YearBlock,endPos1); //String which opens the AwardName and Won list data. WEB_SPECIFIC
End;
curPos0:=PosFrom('<td class="award_year"',EventBlock,endPos0); //String which opens the AwardYearlist data. WEB_SPECIFIC
End;
curPos:=PosFrom('<table class="awards"',HTML,endPos); //String which detectecs the Event. Search directly '<h3>' is very inconsistent. WEB_SPECIFIC
index:=index+1;
End;
LogMessage('Function ParsePage_IMDBMovieAWARDS END=====================||');
End; //BlockClose
--- End quote ---
In ParsePage_IMDBPeopleAWARDS, a few months ago, beauty errors were discovered or found, which had just been corrected or removed. IMDB_People_ [EN] [HTTPS]+ script now correctly transfers the Awards informations.
The revised IMDB_People_ [EN] [HTTPS]+ script is attached.
Ivek23:
--- Quote from: Ivek23 on January 07, 2019, 11:21:30 am ---
--- Quote from: VVV_Easy_Programing on January 05, 2019, 03:10:50 pm ---Tell me if I was wrong in something.
--- End quote ---
I have not yet been able to verify everything if something is missing or it may not be necessary to change anything at the moment.
--- End quote ---
In the near future, I will post corrections in the existing IMDB_ [EN] [HTTPS] script, which will be called IMDB_ [EN] [HTTPS] + script (in a few days, hopefully it will be), as well as some new scripts such as Plot Summary, Soundtracks and other information. It will also be published separately IMDB_ [EN] [HTTPS] script for Cast & Crew extra informations.
Navigation
[0] Message Index
[#] Next page
[*] Previous page
Go to full version