version 1.16, 2004/08/28 23:47:41
|
version 1.17, 2005/07/05 16:12:12
|
Line 57 print "Before connecting to the DB\n";
|
Line 57 print "Before connecting to the DB\n";
|
or die "Can't connect to DB chgk\n" . $dbh->errstr; |
or die "Can't connect to DB chgk\n" . $dbh->errstr; |
print "Connected successfully\n"; |
print "Connected successfully\n"; |
|
|
@tbl_list = $dbh->func( '_ListTables' ); |
@tbl_list = $dbh->tables(); |
|
|
&CheckTable("Questions"); |
&CheckTable("Questions"); |
$dbh->do("CREATE TABLE Questions ( |
$dbh->do("CREATE TABLE Questions ( |