Include("../param/vgi.txt"); $category = $Request->QueryString(cat); $category = "preparazione" if (!$category); $login = $Session->{logOK}{logOK}; $user = $Session->{useID}{useID}; $pid = $Request->QueryString(id); $popup = $Request->QueryString(popup); $errlog = ""; $query = "SELECT * FROM events WHERE state='$category' and tipo <> 'e' ORDER BY datains DESC"; if ($pulsante eq "login"){ $user = $Request->QueryString(user); $pass = $Request->QueryString(pass); $tab = $dbh->prepare("SELECT * from users where userName = '$user' and password = '$pass' and effettivo = 's'"); $tab->execute; $recs = $tab->fetchrow_hashref; $dbuse = $recs->{userName}; $dbpas = $recs->{password}; $tab->finish; if ($user eq $dbuse && $pass eq $dbpas && $user ne ""){ $Session->{logOK} = {logOK => "ok"}; $Session->{useID} = {useID => $dbuse}; $Response->Redirect("attivita.asp?cat=$category&id=$pid&popup=ok"); }else{ $login = ""; $errlog = "ko"; $Session->{logOK} = {logOK => ""}; $Session->{useID} = {useID => ""}; } } if (!$pid){ $tab = $dbh->prepare("SELECT id FROM events WHERE state='$category' and tipo <> 'e' ORDER BY datains DESC"); $tab->execute; $recs = $tab->fetchrow_hashref; $pid = $recs->{id}; $tab->finish; } $tab = $dbh->prepare("SELECT * FROM events WHERE id='$pid'"); $tab->execute; $recs = $tab->fetchrow_hashref; $ptitle = $recs->{title}; $psubtitle = $recs->{subtitle}; $ptext = $recs->{text}; $plink = $recs->{link}; $pstate = $recs->{state}; $tab->finish; $onload = ""; $onload = "onload=\"doPopUp('altadef.asp?id=$pid','altadef',800,600,'yes')\"" if ($popup eq "ok"); ?> VILLAGGIO GLOBALE INTERNATIONAL bgcolor="#EAEAEA" marginheight="0" marginwidth="0" leftmargin="0" topmargin="0">
VGI
ATTIVITA' IN PREPARAZIONE ATTIVITA' IN PREPARAZIONE
ATTIVITA' IN CORSO ATTIVITA' IN CORSO
ATTIVITA'  
 
 
prepare($query); $tab->execute; while ($recs = $tab->fetchrow_hashref){ $id = $recs->{id}; $title = $recs->{title}; $state = $recs->{state}; $datains = $recs->{datains}; ($aa,$mm,$gg) = split(/-/,$datains); $ddatains = "$gg/$mm/$aa"; $class = "onpink"; $class = "onpink" if ($id == $pid); $tabi = $dbh->prepare("SELECT * from images where eventID = $id order by id limit 1"); $tabi->execute; $recsi = $tabi->fetchrow_hashref; $wxid = $recsi->{id}; $eventID = $recsi->{eventID}; $didascalia = $recsi->{didascalia}; $path = "events/archivio_img/img".$id."_".$wxid.".jpg"; ($imgWidth, $imgHeight) = imgsize($path); $tabi->finish; if ($wxid){ ?>
.:: <?=$didascalia?> ::.

()
 

finish; ?>