Actually, looking at it further, I don't think mod_perl is enabled on my linkssql.net site...
I double checked that the script is taking new changes ok by adding a 'duplicate check' bit of code (reports an error if a similar entry exists in the database). Could it be anything to do with the code above the statement? BTW, I've edited it a bit more now, so its in a couple of statements, instead of one long one;
use GT::Date;
GT::Date::date_set_format($Date_Format);
my $Date = GT::Date::date_get();
my $TimeStmp = GT::Date::timelocal();
my $Article_Table = $DB->table('News_Articles') || &error("SQL Error: $GT::SQL::error");
my $result = $Article_Table->insert( { Title => $Title, Short => $Short_Article, Date => $Date, Category => $Category, Image => $Image, TimeStmp => $TimeStmp, Full => $Full_Article } ) || &error("SQL Error: $GT::SQL::error");
if (!$result) { &error("SQL Error: $GT::SQL::error"); }
This is doing my head in! And there I was thinking the rewrite of my Ace_News plugin was going to be easy! That will serve me right for being too confident...lol
Cheers
Andy (mod)
andy@ultranerds.co.uk
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package | GLinks ULTRA Package PRO
Links SQL Plugins | Website Design and SEO | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!
I double checked that the script is taking new changes ok by adding a 'duplicate check' bit of code (reports an error if a similar entry exists in the database). Could it be anything to do with the code above the statement? BTW, I've edited it a bit more now, so its in a couple of statements, instead of one long one;
Code:
# ok, if we have got this far, lets assume its ok to add the article... use GT::Date;
GT::Date::date_set_format($Date_Format);
my $Date = GT::Date::date_get();
my $TimeStmp = GT::Date::timelocal();
my $Article_Table = $DB->table('News_Articles') || &error("SQL Error: $GT::SQL::error");
my $result = $Article_Table->insert( { Title => $Title, Short => $Short_Article, Date => $Date, Category => $Category, Image => $Image, TimeStmp => $TimeStmp, Full => $Full_Article } ) || &error("SQL Error: $GT::SQL::error");
if (!$result) { &error("SQL Error: $GT::SQL::error"); }
This is doing my head in! And there I was thinking the rewrite of my Ace_News plugin was going to be easy! That will serve me right for being too confident...lol
Cheers
Andy (mod)
andy@ultranerds.co.uk
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package | GLinks ULTRA Package PRO
Links SQL Plugins | Website Design and SEO | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!