Show Posts
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
But it still doesn't download the full credits. The actors and director on the first page are the only ones downloaded. The others (writers, producers etc) are not included.
I fixed search results with the url.
Imdb Movie script
v 0.1.0.4
Imdb Movie(1) script
v 0.1.0.3
Scripts is attached in the first post.
imdb script is not working again. When I tried to fetch a movie, nothing is fetched beside the imdb link.
sorry...false alarm..it works after i restarted my pc
All right, you alerted me to the error.
Probably use the stable version 0.9.9.21 the which unfortunately I have not tested earlier versions of the script. I tested the beta version 1.0.23 is where these problems do not appear. The problem is the url address in the search results.
Now it is corrected and hopefully it will not be more problems.
I fixed search results with the url.
Imdb Movie script
v 0.1.0.4
Imdb Movie(1) script
v 0.1.0.3
Scripts is attached here.
procedure ParseSearchResults(HTML : String);
var
curPos, endPos : Integer;
Title, Title1, Year, URL, Preview, Preview1 : String;
begin
curPos := Pos('<table class="findList">', HTML);
if curPos < 1 then
Exit;
LogMessage('Parsing search results...');
curPos := PosFrom('<img src="', HTML, curPos)+10;
endPos := PosFrom('.jpg" height="44" width="32" /></a>', HTML, curPos);
Preview := Trim(Copy(HTML, curPos, endPos - curPos));
curPos := PosFrom('<a href="/title/', HTML, curPos);
while curPos > 0 do begin
endPos := PosFrom('?ref_=fn_tt_tt_', HTML, curPos);
URL := Trim(Copy(HTML, curPos+9, endPos - curPos-9));
URL := BASE_URL + URL;
curPos := PosFrom('>', HTML, curPos)+1;
endPos := PosFrom('</td> </tr>', HTML, curPos);
Title := RemoveTags(Trim(Copy(HTML, curPos, endPos - curPos)), false);
Title := StringReplace(Title, '-', #13, true, false, true);
curPos := PosFrom('<img src="', HTML, curPos)+10;
endPos := PosFrom('.jpg" height="44" width="32" /></a>', HTML, curPos);
Preview := Trim(Copy(HTML, curPos, endPos - curPos));
AddSearchResult(Title, '', '', URL, '');
curPos := PosFrom('<a href="/title/', HTML, curPos);
end;
end;
function NextMode(curMode : Integer) : Integer;
imdb script is not working again. When I tried to fetch a movie, nothing is fetched beside the imdb link.
sorry...false alarm..it works after i restarted my pc
Well I followed some of your advices and I'm back in business. Everything is working just fine and add a couple of posters/info. Thanx guys big upZ!
To use TMDb script, download it using the link Ivek provided and put it in your Scripts folder. I'm not sure if you have to, but restart PVD so it appears in your Import menu.
restart PVD so it appears in your Import menu
Same here, are there immediate plans to update the plugins? IMPawards is also dead and has been for such a long time I can't even remember how long it's been.
thanks for consideration
If I am not the only one to whom it matters please make the scripts for posters work again.
pretty please
Or the TheMovieDB.org script for downloading only one poster, if you wish.
Oops. I forgot about that one. Thanks.
I'm not sure which, if any, of the dedicated poster plugins still works. The IMDb plugin should get a poster. If you want a better quality one, the best source now seems to be TMDb. Unfortunately, the TMDb plugin will only get ALL the posters available for a movie, which isn't practical. If you run the data plugin, however, that will record the URL which is then available for visiting the site and manually choosing a poster.
Thanks! This makes it much easier to add Top 250 ranks and keep ratings up-to-date.
//Get URL
EndPos := Pos('">Overview</a>', HTML);
if EndPos > 0 then begin
curPos := PrevPos('<a href="', HTML, EndPos);
AddFieldValue(mfURL, 'http://web.archive.org'+Copy(HTML, curPos + 9, EndPos - curPos - 9));
end else
AddFieldValue(mfURL, MovieURL);
//Get URL
EndPos := Pos('">Overview</a>', HTML);
if EndPos > 0 then begin
curPos := PrevPos('<a href="', HTML, EndPos);
AddFieldValue(mfURL, 'http://web.archive.org'+Copy(HTML, curPos + 9, EndPos - curPos - 9));
end else
//AddFieldValue(mfURL, MovieURL); // Changed to:
AddCustomFieldValueByName('Urlw', '<link url="' + MovieURL + '">' + MovieURL + '</link>');
AddCustomFieldValueByName('Urlw1', '<link url="' + MovieURL + '">' + MovieURL + '</link>');
//Get Review URL
if GET_REVIEW then begin
EndPos := Pos('">Review</a>', HTML);
if EndPos > 0 then begin
curPos := PrevPos('<a href="', HTML, EndPos);
ExtraLinks[smReview] := 'http://web.archive.org'+Copy(HTML, curPos + 9, EndPos - curPos - 9);
end;
end;
//Get Cast URL
EndPos := Pos('">Cast</a>', HTML);
if EndPos > 0 then begin
curPos := PrevPos('<a href="', HTML, EndPos);
ExtraLinks[smCast] := 'http://web.archive.org'+Copy(HTML, curPos + 9, EndPos - curPos - 9);
end;
//Get Credits URL
if GET_CREDITS then begin
EndPos := Pos('">Production Credits</a>', HTML);
if EndPos > 0 then begin
curPos := PrevPos('<a href="', HTML, EndPos);
ExtraLinks[smCredits] := 'http://web.archive.org'+Copy(HTML, curPos + 9, EndPos - curPos - 9);
end;
end;
//Title
curPos := Pos('<span class="title">', HTML) + Length('<span class="title">');
EndPos := PosFrom('</span>', HTML, curPos);
AddCustomFieldValueByName('Titlew', Copy(HTML, curPos, EndPos - curPos));
//Poster
curPos := PosFrom('<tr><td valign="top"><img src="', HTML, EndPos);
if curPos > 0 then begin
curPos := curPos + Length('<tr><td valign="top"><img src="');
EndPos := PosFrom('"', HTML, curPos);
ExtraLinks[smPoster] := 'http://web.archive.org'+Copy(HTML, curPos, EndPos - curPos);
if Pos('noimage', ExtraLinks[smPoster]) > 0 then
ExtraLinks[smPoster] := '';
end;It looks like there are 7 now. The first two appear to be identical in name and size. The "moviesbu0112" is the backup, on a thumb drive. Should I delete the next four? (360 bytes, and 3.70kb x 3) The "old" files wont open anyway with any software I have--should they also be deleted? I don't know what the "internet explorer files" are or how they were created? Delete as well?
Thanks for your help.
According database will be this may help:
1.) Before you save it, rename it, it may be less of a problem that you lose.
2.) Save it to another location.
3.) Then it would be a really good thing you do at this location also has a copy of this database, for example, if there is something wrong, you can still restore at least partial information or almost all the information that you have stored.
Last verified true because I have some experience with similar problems as described above. I have several times in the same way lost my movies database (example: ALL MYMOVIES), with a copy of such a database is able to return back already existing database (example: ALL MYMOVIES 1).