#!/usr/bin/perl

use lib "../cgi";
use CGI;
use config;
use output;
use database;

$html_page = "../template_cgi.htm";
$form_page = "./guide.htm";

$query = new CGI;
print $query->header;

$id_part = $query->param('id_part');

$dbh = db_connect( $cfg_dbname );
if( !$dbh )
{
   CgiDie( $dbh, "Impossible de se connecter", "à la base de données !!!" );
}

PrintHtmlBlocReplace( $html_page, "", "<!--BEGIN_INSERT-->" );
PrintHtmlBlocReplace( $form_page, "", "" );
PrintHtmlBlocReplace( $html_page, "<!--END_INSERT-->", "" );


db_disconnect( $dbh );
exit();