Post reply

Warning: this topic has not been posted in for at least 120 days.
Unless you're sure you want to reply, please consider starting a new topic.

Note: this post will not display until it's been approved by a moderator.

Name:
Email:
Subject:
Message icon:
Attach:
(Clear Attachment)
(more attachments)
Allowed file types: gif, jpg, png, txt, tpl, lng, ini, pvd, psf, ini, cfg, csv, zip, xml, pas, 7z
Restrictions: 4 per post, maximum total size 1024KB, maximum individual size 1024KB
Note that any files attached will not be displayed until approved by a moderator.
Verification:
Type the letters shown in the picture
Listen to the letters / Request another image

Type the letters shown in the picture:
How many words are in this question?:

shortcuts: hit alt+s to submit/post or alt+p to preview


Topic Summary

Posted by: Ivek23
« on: June 09, 2015, 05:24:46 am »

Quote from: AimHere on June 08, 2015, 02:43:48 pm
Can someone post a link/attachment for the complete, corrected, up-to-date version of this script, please? Thanks.

The revised script is attached here:

http://www.videodb.info/forum_en/index.php/topic,3951.msg19154.html#msg19154
Posted by: AimHere
« on: June 08, 2015, 02:43:48 pm »

Can someone post a link/attachment for the complete, corrected, up-to-date version of this script, please? Thanks.
Posted by: pra15
« on: May 03, 2015, 05:15:45 pm »

you're welcome
Posted by: Frank MT
« on: May 03, 2015, 12:37:28 pm »

Thx pra15,

works fine again.  :)
Posted by: pra15
« on: April 23, 2015, 01:12:09 am »

Hello everybody,

It seems iafd.com has changed URL photo of headshot.
Correction :
Code: [Select]
//Foto
curPos :=Pos('id="headshot">',HTML);
if curPos >0 then begin
PhotoURL := TextBetween(HTML,'src="','"></div>',True,curpos);
LogMessage ('URL Foto: '+PhotoURL);
ParsePhoto(PhotoURL);
end
else
begin
PhotoURL := '';
LogMessage ('URL Foto: NESSUNO');
end;
I've tested only some page it seems work good.
Posted by: Ivek23
« on: January 08, 2015, 01:26:46 pm »

Quote from: nostra on January 22, 2014, 02:51:54 am
No, URLs are not allowed to have spaces in them.

Simple solution for this:

Code: [Select]
//Foto
curPos :=Pos('src="/graphics/headshots',HTML);
if curPos >0 then begin
EndPos:= PosFrom('>',HTML,curPos);
LogMessage ('URL Foto: '+PhotoURL);
PhotoURL := BASE_URL + Copy(HTML,curPos + 6, EndPos - curPos - 7);
PhotoURL := StringReplace(PhotoURL, ' ', '%20', true, false, true);
LogMessage ('URL Foto: '+PhotoURL);
ParsePhoto(PhotoURL);
end
else
begin
PhotoURL := '';
LogMessage ('URL Foto: NESSUNO');
end;
Posted by: nostra
« on: January 22, 2014, 02:51:54 am »

No, URLs are not allowed to have spaces in them.
Posted by: afrocuban
« on: November 14, 2013, 08:19:40 pm »

I have no knowledge about scripting, but just a lucky guess. Is it possbile, not to put "%20" instead of spaces in url, but to put whole url under quotes (double, or single, I'm not sure)?
Posted by: oenghus
« on: November 14, 2013, 04:25:33 am »

There is a problem loading the image for some people and I think it's where the image URL contains spaces. The URL for the person is:

http://www.iafd.com/person.rme/perfid=alishaadams/gender=f/alisha-adams.htm

The current procedure in the script I use is:
procedure ParsePhoto(PhotoURL : String);
begin
   LogMessage('PARSING PHOTO...' + PhotoURL);
   PhotoURL:=HTMLToText (PhotoURL);
   AddImageURL(4,PhotoURL);
   
end;

PVD log:
PARSING PHOTO...http://www.iafd.com/graphics/headshots/alishaadams_f_alisha adams aalluredotcom hs.jpg
Url di download: Foto
GET: http://www.iafd.com/graphics/headshots/alishaadams_f_alisha adams aalluredotcom hs.jpg
HTTP/1.1 400 Bad Request

I tried replacing spaces in PhotoURL with %20 before AddImageURL but it didn't make any difference.

Does anyone have any ideas how to fix this ?

Thx
Oenghus