Page 1 of 1
producer field doesn't work
Posted: 2003-04-06 08:15:33
by palantir
Hi
This is just the program i was looking for: simple, fast, stable and very useful.
i just noticed what i think is a bug (or maybe you just forgot): the Producer field is never filled, at least when using the IMDB small pic script. i just took a look around and it seems that no code is written to do that.
Thanks and keep up the good work
Posted: 2003-04-06 09:21:29
by antp
Yes, it is never filled, but it is not a bug.
It is because it requires that an additional page is downloaded (producer is not available from main movie info page, it is on the "credits" page if I remember well).
It is possible to add it, maybe that I should add that as an option...
Posted: 2003-04-07 08:43:34
by palantir
maybe you could try to fill it with the writing credits (sorry if i'm being too persistent on this one;)) wich information is in the same page.
i tried to do that but i was not successful... guees i really don't know anything abou html...
Posted: 2003-04-07 10:30:12
by antp
I'll try to not forget to add that next time I update the program...
Posted: 2003-04-07 18:24:03
by Curna
Hi Palantir.
maybe you could try to fill it with the writing credits (sorry if i'm being too persistent on this one;)) wich information is in the same page.
I've changed it. Just edit your IMDB script and add this code:
Code: Select all
//Writing Credits
LineNr := FindLine('Writing credits', Page, 0);
if LineNr > -1 then
begin
FullValue := '';
LineNr:=LineNr+1;
Line := Page.GetString(LineNr);
Repeat
LineNr := LineNr + 1;
Line := Page.GetString(LineNr);
Until (Pos('Name', Line)<>0);
repeat
BeginPos := pos('">', Line) + 2;
EndPos := pos('<br>', Line);
Value := copy(Line, BeginPos, EndPos - BeginPos);
HTMLDecode(Value);
HTMLRemoveTags(Value);
if (Value <> '(more)') and (Value <> '') then
begin
if FullValue <> '' then
FullValue := FullValue + ' ';
FullValue := FullValue + Value;
end;
Delete(Line, 1, EndPos);
until (Pos('">', Line) = 0);
SetField(fieldProducer, FullValue);
end;
Then, jurst go to edit the "English.lng" file and change the FieldProducer to display "Writing credits" and not "Producer". Just load the "English.lng" language and that's all.
Hope it helps.
add producer
Posted: 2003-04-09 11:50:50
by jwm
Hi,
look in the thread 'Another improvement to...'. There you can find the code I adjusted to, amongst others, include the producer. Look for my post on february 24 or go directly there with this link:
viewtopic.php?t=401&postdays=0&postorder=asc&start=26
Enjoy !
Posted: 2003-04-11 09:06:04
by palantir
Thank you everyone for your help.
I tried some of the suggestions and they worked very well
Posted: 2005-10-30 19:13:28
by Lavie
I've changed it. Just edit your IMDB script and add this code:
Thank's.