Author Topic: Ibs.it script: url does not work (do not pass the url address)  (Read 6815 times)

0 Members and 1 Guest are viewing this topic.

Offline Ivek23

  • Global Moderator
  • *****
  • Posts: 2711
    • View Profile
Ibs.it script: url does not work (do not pass the url address)

For each data search is required for each movie whose information you are looking for is again necessary confirm the movie title, whereas for every search URL address is not transfer.
Ivek23
Win 10 64bit (32bit)   PVD v0.9.9.21, PVD v1.0.2.7, PVD v1.0.2.7 + MOD


Offline Ivek23

  • Global Moderator
  • *****
  • Posts: 2711
    • View Profile
Re: Ibs.it script: url does not work (do not pass the url address)
« Reply #1 on: June 19, 2011, 03:14:40 pm »
Ibs.it script: url does not work (do not pass the url address)

For each data search is required for each movie whose information you are looking for is again necessary confirm the movie title, whereas for every search URL address is not transfer.

This code

Code: [Select]

//Get URL
 EndPos := Pos('" content="index,follow">', HTML);
 if EndPos > 0 then begin
  curPos := PrevPos('" href="', HTML, EndPos);
  EndPos := Pos('">', HTML);
  AddFieldValue(mfURL, Copy(HTML, curPos + 8, EndPos - curPos - 8));
 end else
  AddFieldValue(mfURL, MovieURL);


I replaced with this code

Code: [Select]
//Get URL
 EndPos := Pos('"><meta name="robots" content="index,follow">', HTML);
 if EndPos > 0 then begin
  curPos := PrevPos('" href="', HTML, EndPos);
  AddFieldValue(mfURL, Copy(HTML, curPos +8, EndPos - curPos -8));
 end else
  AddFieldValue(mfURL,  MovieURL);


and URL title it is now to write and act, I tested a few movies, there is work properly.
Ivek23
Win 10 64bit (32bit)   PVD v0.9.9.21, PVD v1.0.2.7, PVD v1.0.2.7 + MOD