English > Scripts and Templates

AllMovie.com_new movie script

<< < (5/22) > >>

rick.ca:
Both this and the updated AllRovi script work great. Thanks very much for the work you do on these and other scripts, Ivek.

Ivek23:

--- Quote from: rick.ca on December 17, 2012, 02:32:34 am ---Both this and the updated AllRovi script work great. Thanks very much for the work you do on these and other scripts, Ivek.
--- End quote ---

Thank you, Rick.
I will do more tests to see if it will be something in need of repair,  then also available via the auto-update system.

Ivek23:
Here is the final AllMovie.com_new script.

Script  AllMovie.com_final  is attached.

[attachment deleted by admin]

Ivek23:

--- Quote ---
--- Quote ---This script has now been released and is available via the program's auto-update system. Run Help > Check for updates and choose AllMovie.com_new from the list.
--- End quote ---


--- Quote ---Post any comments or questions to AllMovie.com_new Script is can here.
--- End quote ---

--- End quote ---

Ivek23:
Anyone who wants to change the current date and time updates, here is a solution, example is for AllMovie.com_new movie script:

I did not like the last part of the code for 
--- Code: ---//Date ~Updated~ (choose simple or verbose version)

//AddCustomFieldValueByName('Updated', DateToStr(CurrentDateTime)); // Simple
//AddCustomFieldValueByName('Updated', DateToStr(CurrentDateTime) + ' at ' + TimeToStr(CurrentDateTime)); // Verbose
AddCustomFieldValueByName('Updated', DateToStr(CurrentDateTime) + ' at ' + TimeToStr(CurrentDateTime) + ' • ' + SCRIPT_NAME + ' ' + SCRIPT_VERSION); // Annoying


//Get ~mfURL~ or ~URL~
--- End code ---

Date was previously seen such:
--- Code: ---2013-01-13 at 14:17:50
--- End code ---

So I switched over to that part of the code

--- Code: ---procedure ParseMovie(MovieURL : String; HTML : String);
var
curPos, endPos, topPos, L, H, R : Integer;
Date, Name, URL, TmpStr, TmpStr1, TmpStr2, TmpStr3, TmpStr4, TmpStr5 : String;
DateParts: TWideArray;
begin

//Date ~Updated~ (choose simple or verbose version)
Date := DateToStr(CurrentDateTime);
if Date <> '' then
  begin
    ExplodeString(Date, DateParts, '-');
Date := DateParts[2] +'.'+ DateParts[1] +'.'+ DateParts[0];
AddCustomFieldValueByName('Updated', Date);
//AddCustomFieldValueByName('Updated', Date + ' at ' + TimeToStr(CurrentDateTime)); // Verbose
AddCustomFieldValueByName('Updated', Date + ' at ' + TimeToStr(CurrentDateTime) + ' • ' + SCRIPT_NAME + ' ' + SCRIPT_VERSION); // Annoying
  end else
    LogMessage('date not found');

//AddCustomFieldValueByName('Updated', DateToStr(CurrentDateTime)); // Simple
//AddCustomFieldValueByName('Updated', DateToStr(CurrentDateTime) + ' at ' + TimeToStr(CurrentDateTime)); // Verbose
//AddCustomFieldValueByName('Updated', DateToStr(CurrentDateTime) + ' at ' + TimeToStr(CurrentDateTime) + ' • ' + SCRIPT_NAME + ' ' + SCRIPT_VERSION); // Annoying


//Get ~mfURL~ or ~URL~
--- End code ---

Date now looks like this:
--- Code: ---13.01.2013 at 14:17:50
--- End code ---

Navigation

[0] Message Index

[#] Next page

[*] Previous page

Reply

Go to full version