Credenciales inválidas
\n"; echo "Los datos de autenticación para '$themail' 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 = $HTTP_POST_VARS['dia26']."-".$HTTP_POST_VARS['dia27']."-".$HTTP_POST_VARS['cena'];
$g = $HTTP_POST_VARS['cert']."-".$HTTP_POST_VARS['red']."-".$HTTP_POST_VARS['mail']."-".$HTTP_POST_VARS['mmedia']."-".$HTTP_POST_VARS['sysadmin']."-".$HTTP_POST_VARS['middleware']."-".$HTTP_POST_VARS['docencianet'];
$i = $HTTP_POST_VARS['fecha'];
$ch = 0;
$r = $HTTP_POST_VARS['registrado'];
mysql_connect( 'localhost', 'reuniones', 'vogudcour8');
$res = mysql ("reuniones", "select email,clase,registrado from gt2005 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 gt2005 where email='$e'";
$mailtext = "
Su inscripción en los Grupos de Trabajo de RedIRIS 2005 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 gt2005 values ('$a','$n','$s','$d','$t','$f','$e','$c','$j','$g',$ch,'$r','$p','$i');";
if($c == "ponente"){
$mailtext = "
Ha sido inscrito como $c en los Grupos de Trabajo de RedIRIS 2005 por $r.
Por favor, entre en la pagina de registro en la siguiente dirección para completar sus datos:
http://www.rediris.es/gt/gt2005/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";
}else{
$mailtext = "
Ha sido inscrito como $c en los Grupos de Trabajo de RedIRIS 2005 por $r.
Puede consultar y modificar los datos de su inscripcion utilizando el URL:
http://www.rediris.es/gt/gt2005/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 $nlista\n";
}
else {
$nlista = mysql_NumRows($lista);
echo " Recuerde que el plazo de inscripción finaliza el día 17 de Mayo\n";
echo " El plazo de inscripción y modificación de su registro para los Grupos de Trabajo se cerró el día 20 de Mayo. The dead line for registering and modifying your registration info ended on October 17. $nlista\n";
// }
// else {
// $nlista = mysql_NumRows($lista);
// echo " El plazo de inscripción a los Grupos de Trabajo se cerró el día 17 de Octubre\n";
// echo " El plazo de inscripción y modificación de su registro para los Grupos de Trabajo se cerró el día 20 de Mayo. The dead line for registering and modifying your registration info ended on October 17.
";
}
}
else {
$query = "update gt2005 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 2005 han sido
modificados por $themail. Puede consultar y modificar estos datos utilizando
el URL:
http://www.rediris.es/gt/gt2005/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";
}
}
mysql_connect( 'localhost', 'reuniones', 'vogudcour8');
$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 RedIRIS 2005",$mailtext, "From: Secretaria Grupos de Trabajo RedIRIS 2005
\n";
}
// Mostrar datos en funcion de la clase de usuario
if ($theclass == "admin") {
mysql_connect( 'localhost', 'reuniones', 'vogudcour8');
$lista = mysql ("reuniones", "select apellidos,nombre,institucion,email from gt2005 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";
echo "Nueva inscripción
\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 "
Si tiene cualquier duda o sugerencia, puede hacernosla llegar a través de la dirección conferencias @ rediris.es
If you have any doubt or suggestion, please send an email to conferencias @ rediris.esError en la base de datos
\nPlazo de inscripción
\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 "
Si tiene cualquier duda o sugerencia, puede hacernosla llegar a través de la dirección conferencias @ rediris.es
If you have any doubt or suggestion, please send an email to conferencias @ rediris.es