English > Scripts and Templates

IAFD People

(1/2) > >>

oenghus:
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

afrocuban:
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)?

nostra:
No, URLs are not allowed to have spaces in them.

Ivek23:

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

Simple solution for this:


--- Code: --- //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;
--- End code ---

pra15:
Hello everybody,

It seems iafd.com has changed URL photo of headshot.
Correction :

--- Code: ---//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;
--- End code ---

I've tested only some page it seems work good.

Navigation

[0] Message Index

[#] Next page