antp.be forum

program MovieMeter;

uses
StringUtils1;

var
MovieName: string;

procedure AnalyzeMoviePage(Address: string);
var
PageText, Line, Value: string;
begin
PageText := GetPage(Address);

// URL
SetField(fieldURL, Address);

// title & year
Line := TextBetween(PageText, '<h1>', '</h1>');
Value ...

Het probleem zit 'm in regel 40...
Verander
Value := TextAfter(Value, '>');
in
Value := TextAfter(Value, '-->');
en het zou weer moeten werken...


program MovieMeter;

uses
StringUtils1;

var
MovieName: string;

procedure AnalyzeMoviePage(Address: string);
var
PageText, Line, Value: string ...

Ik heb het script als volgt aangepast:

program MovieMeter;

uses
StringUtils1;

var
MovieName: string;

procedure AnalyzeMoviePage(Address: string);
var
PageText, Line, Value: string;
begin
PageText := GetPage(Address);

// URL
SetField(fieldURL, Address);

// title & year
Line ...

Can't get the download link to work.
But I only changed the AnalyzeResultsPage line and it worked for me again.

Edit: Updated scripts and got new version to work now.
Thanks guys, great job...

I rest my case...

You are right Thermal.
If you try to drag an image that's in fact a link, you are dragging the link and not the actual image. That's why AMC doesn't accept this as a drop.
Backgroundimages you can't drag for the same reason you can't copy them to the clipboard...

In fact nothing happens. The mousepointer is a circle with diagonal stripe when I drag an image from IE over the catalog window. It looks like catalog will not accept a drop.

I tried dragging an image from Opera but can't drop the image anywhere on the catalog window. IE 7 same problem.
Am I doing something wrong or is it just not possible.

Anyway, my idea was creating a custom image in Photoshop, copy it to the clipboard and paste it into catalog. Your project will not ...

I can't find a way to import an image from the clipboard.
Would be nice if this is possible...

Something is wrong with moviegoods.com script! i thing that search line was change!! Cheers

Maybe this will help?

program MOVIEGOODS;

var
MovieName: string;
MovieURL: string;
ImageURL: string;
ImageName: string;

// STRING PROCEDURES (don't delete any part of this)
procedure CutAfter(var ...

antp wrote:Thanks
I kept both name in "authors" in the version included on my server.

That's even better... Again I replaced my version with yours in my .rar so now there's only one version to download.

@antp: Sorry for replacing your name with mine... It was my first attempt to modify a script and did not expect it to work or even release it...:)
But once it did work, I forgot to adjust the properties again... :ha:

I corrected my mistake, cleaned up the source a bit and uploaded the new file ...

Looks like the problem is solved...

Maybe this can help.
Download Script