Los datos de autenticación que ha enviado no son válidos.
\n";
}
else {
// Comprobar si se trata de una peticion y procesarla
if (isset($HTTP_POST_VARS['borrar'])) {
$delete = $HTTP_POST_VARS['borrar'];
$new = $HTTP_POST_VARS['nuevo'];
$a = $HTTP_POST_VARS['apellidos'];
$n = $HTTP_POST_VARS['nombre'];
$s = $HTTP_POST_VARS['institucion'];
$d = $HTTP_POST_VARS['departamento'];
$t = $HTTP_POST_VARS['telefono'];
$f = $HTTP_POST_VARS['fax'];
$e = $HTTP_POST_VARS['email'];
$c = $HTTP_POST_VARS['clase'];
$j = "";
// $j = $HTTP_POST_VARS['dia15']."-".$HTTP_POST_VARS['dia16']."-".$HTTP_POST_VARS['dia17'];
$g = $HTTP_POST_VARS['mmedia']."-".$HTTP_POST_VARS['mail']."-".$HTTP_POST_VARS['cert']."-".$HTTP_POST_VARS['middleware']."-"."-".$HTTP_POST_VARS['sysadmin']."-".$HTTP_POST_VARS['red']."-".$HTTP_POST_VARS['grid']."-".$HTTP_POST_VARS['moviris'];
$ch = 0;
$r = $HTTP_POST_VARS['registrado'];
mysql_connect( 'localhost', 'reuniones', 'vogudcour8');
$res = mysql ("reuniones", "select email,clase,registrado from gt2004 where email='$e'");
if ($res == false) {
$err = mysql_error();
$mensaje = "Error en el acceso a la base de datos: $err";
$mailtext = "";
}
elseif ($delete == "y") {
$query = "delete from gt2004 where email='$e'";
$mailtext = "
Su inscripción en los Grupos de Trabajo de RedIRIS 2004
ha sido borrada por '$themail'.";
$mensaje = "La inscripcion de $a,$n ($s) - $e ha sido borrada";
}
else {
if ($new == "y") {
if (mysql_NumRows($res) > 0) {
$c = mysql_result($res,0,"clase");
$r = mysql_result($res,0,"registrado");
$query = "";
$mailtext = "";
$mensaje = "Una persona cuya dirección de correo electrónico es $e ya ha sido inscrita como $c por $r";
}
else {
// Generacion de la password
$p = exec("/usr/local/bin/apg -q -n 1 -a 0 -M nc"); // Usamos APG, una paridita de programa...
$query = "insert into gt2004 values ('$a','$n','$s','$d','$t','$f','$e','$c','$j','$g',$ch,'$r','$p')";
$mailtext = "
Ha sido inscrito como $c en los Grupos de Trabajo de RedIRIS 2004 por $r.
Puede consultar y modificar los datos de su inscripcion utilizando el URL:
http://www.rediris.es/gt/gt2004/registro/
Para acceder a él, los datos que debe emplear son los siguientes:
username: $e
password: $p
Le recomendamos que conserve este mensaje si desea acceder a sus datos
más adelante";
$mensaje = "La inscripcion de $a,$n ($s) - $e ha sido realizada";
}
}
else {
$query = "update gt2004 set apellidos='$a',nombre='$n',institucion='$s',departamento='$d',telefono='$t',fax='$f',clase='$c',jjtt='$j',ggtt='$g',fiesta=$ch where email='$e'";
$mailtext = "
Los datos de su inscripción en los Grupos de Trabajo de RedIRIS 2004 han sido
modificados por '$themail'. Puede consultar y modificar estos datos utilizando
el URL:
http://www.rediris.es/gt/gt2004/registro/
Para acceder a él, use los datos de acceso enviados al notificarle su
inscripción";
$mensaje = "Los datos de $a,$n ($s) - $e han sido actualizados";
}
}
$res = mysql ("reuniones",$query);
if ($res = false) {
$err = mysql_error();
$mensaje = "Error en el acceso a la base de datos: $err";
$mailtext = "";
}
if ($mailtext != "" && $e != $themail) {
//mail($e,"Grupos de Trabajo de RedIRIS 2004",$mailtext, "Reply-To: secretaria@rediris.es\nErrors-To: secretaria@rediris.es");
mail( $e, "Grupos de Trabajo de RedIRIS 2004",$mailtext,"From: Registro Grupos de trabajo RedIRIS 2004 $nlista\n";
}
else {
$nlista = mysql_NumRows($lista);
echo " El plazo de inscripción a los Grupos de Trabajo ya se ha cerrado. $nlista\n";
// }
// else {
// $nlista = mysql_NumRows($lista);
// echo " Recuerde que el plazo de inscripción finaliza el día 6 de Junio\n";
// echo " El plazo de inscripción a los Grupos de Trabajo ya se ha cerrado.
\n";
}
// Mostrar datos en funcion de la clase de usuario
if ($theclass == "admin") {
$lista = mysql ("reuniones", "select apellidos,nombre,institucion,email from gt2004 where clase<>'admin' and clase<>'per' order by apellidos");
if ($lista == false) {
$nlista = mysql_error();
echo "Error en la base de datos
\nHay $nlista personas registradas
\n\n";
for ($i = 0; $i < $nlista; $i++) {
$a = mysql_result($lista,$i,"apellidos");
$n = mysql_result($lista,$i,"nombre");
$s = mysql_result($lista,$i,"institucion");
$e = mysql_result($lista,$i,"email");
echo "
\n";
echo "Nueva inscripción
\n";
}
}
elseif ($theclass == "per") {
// Plazo ya cerrado
echo "Plazo de inscripción
\n";
echo "Error en la base de datos
\nPlazo de inscripción
/// $themail ha registrado $nlista personas
\n\n";
// for ($i = 0; $i < $nlista; $i++) {
// $a = mysql_result($lista,$i,"apellidos");
// $n = mysql_result($lista,$i,"nombre");
// $s = mysql_result($lista,$i,"institucion");
// $e = mysql_result($lista,$i,"email");
// echo "
\n";
// echo "Nueva inscripción
\n";
// }
}
else {
// Plazo ya cerrado
echo "Plazo de inscripción
\n";
echo "