Can anybody help me with this? I tried the solution on the link below, adding in $sth->finish(); and although the error message is surpressed now, the record never gets inserted...

Sky Blueshoes

SkyBlueshoes wrote:
I'm getting an error using SQLite:

DBD::SQLite::sth execute failed: database table is locked(1) at dbdimp.c line 398 at C:\skyblue.pl line 1095, <FILE> line 209.

I found this bug on CPAN site, but it says it's resolved. http://rt.cpan.org/Public/Bug/Display.html?id=7293

Am I doing something wrong here? Here is my script around the error:

my $sth=$db->prepare("SELECT * FROM '$stattable' WHERE nick='$greet_nick'");
               $sth->execute();
               my @nidata = $sth->fetchrow_array();
               if ($1 eq 'add') {
                  unless ($nidata[1]) {
FAILS HERE-> my $sth=$db->prepare("INSERT INTO '$stattable' (nick, msg) VALUES (?, ?)");
                            $sth->execute($greet_nick, $gmsg);
                   }

I've use this same format in other areas of my script and they work fine. I don't understand this...

SkyBlueshoes



--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to