Posted by: Ivek23
« on: September 22, 2014, 07:11:42 am »I tested that CustomField must be only memo because this can hide url reference and after that url working.
This code i use for actors and working.
//Seiyu ~ctActors~
curPos := Pos('<h4>main cast</h4>', HTML);
LogMessage('21 zistujem ci su Actors');
if curPos > 0 then begin
curPos := PosFrom('creatorid=', HTML, curPos);
EndPos := curPos;
curPos1 := PosFrom('">show more</a></td>', HTML, curPos)
LogMessage('21.1 zadávam Actors');
while (curPos < curPos1) do begin
URL := 'http://anidb.net/perl-bin/animedb.pl?show=creator&creatorid=' + TextBetween(HTML, 'creatorid=', '">', false, curPos);
LogMessage('20.2 zadavam url Actors '+URL);
TransName := TextBetween(HTML, '">', '</a>', false, curPos);
LogMessage('20.3 zadavam meno Actors '+TransName);
curPos := PosFrom('charid=', HTML, curPos);
URLr := 'http://anidb.net/perl-bin/animedb.pl?show=character&charid=' + TextBetween(HTML, 'charid=', '">', false, curPos);
LogMessage('20.4 zadavam url role '+URLr)
Role := TextBetween(HTML, '">', '</a>', false, curPos);
LogMessage('20.3 zadavam meno role '+Role);
curPos := PosFrom('creatorid=', HTML, curPos);
AddMoviePerson('', TransName, Role, URL, ctActors);
end;
Yes, since you information about Actors transferred to normal Actors field the same also for Directors, Writers, Composers and Producers information. Otherwise, if such information is transferred to the memo custom fields. Here, it is necessary already in the script write such a code, that the url link already been added to record the information in the memo custom Fields. Then the url will really work.
Nostra could tell something more about this topic, but unfortunately it has long been absent.