updated videos table

git-svn-id: http://yolanda.mister-muffin.de/svn@105 7eef14d0-6ed0-489d-bf55-20463b2d70db
This commit is contained in:
josch 2007-10-20 22:01:44 +00:00
parent 40a1fc3405
commit d8aefc4997
2 changed files with 4 additions and 2 deletions

View file

@ -61,7 +61,7 @@ $dbh->do(qq{create table
derivativeworks bool not null, derivativeworks bool not null,
sharealike bool not null, sharealike bool not null,
commercialuse bool not null, commercialuse bool not null,
status int not null, status int default 0,
primary key (id) primary key (id)
) )
}) or die $dbh->errstr; }) or die $dbh->errstr;
@ -92,6 +92,8 @@ $dbh->do(qq{create table
height smallint not null, height smallint not null,
fps float not null, fps float not null,
hash char(64) not null, hash char(64) not null,
viewcount int default 0,
downloadcount int default 0,
primary key (id), primary key (id),
fulltext (title, description, subject) fulltext (title, description, subject)
) )

View file

@ -26,7 +26,7 @@ if($userid)
my $dbh = DBI->connect("DBI:mysql:$database:$host", $dbuser, $dbpass) or die $dbh->errstr; my $dbh = DBI->connect("DBI:mysql:$database:$host", $dbuser, $dbpass) or die $dbh->errstr;
#make new entry for video into the databse #make new entry for video into the databse
my $sth = $dbh->prepare(qq{insert into uploaded (title, description, userid, status, timestamp) values ( ?, ?, ?, 0, unix_timestamp())}) or die $dbh->errstr; my $sth = $dbh->prepare(qq{insert into uploaded (title, description, userid, timestamp) values ( ?, ?, ?, unix_timestamp())}) or die $dbh->errstr;
$sth->execute($query->param("title"), $query->param("description"), $userid) or die $dbh->errstr; $sth->execute($query->param("title"), $query->param("description"), $userid) or die $dbh->errstr;
$sth->finish() or die $dbh->errstr; $sth->finish() or die $dbh->errstr;