cmd = New MySqlCommand("Select a.nombre as cenote, d.nombre as restaurante, c.costo_minimo from cenotes as a, localidades as b, costo_restaurante as c, restaurantes as d where b.ID_localidad=a.localidad AND c.Id_cenotes=a.Id_cenote AND c.id_restaurante=d.Id_restaurante AND c.Id_cenotes=" & Yucatan.idcenote, conexion.Mysqlcon)
        restaurantes = New MySqlDataAdapter(cmd)
        restaurante = New DataSet()


        Dim lectura As MySqlDataReader
        Try
            conexion.iniciar()
            conexion.Mysqlcon.Open()

            cmd.Connection = conexion.Mysqlcon

            lectura = cmd.ExecuteReader
            lectura.Read()

            Dim CostoMi As Decimal
            Dim CostoMa As Decimal

            CostoMi = lectura(3).ToString
            CostoMa = lectura(4).ToString

            TextBox7.Text = Format(CostoMi, "$ ###.####")
            TextBox10.Text = Format(CostoMa, "$ ###.####")


        Catch ex As Exception
            MsgBox(ex.Message)
        Finally
            conexion.Mysqlcon.Close()
        End Try

        'cerrar despues de llenado'
        conexion.Mysqlcon.Close()

        restaurantes.Fill(restaurante, "nombre")

        Dim Tabla As DataTable
        Tabla = restaurante.Tables("nombre")

        Dim Fila As DataRow
        For Each Fila In Tabla.Rows
            Combo.Items.Add(Fila.Item("restaurante"))
        Next

'Kilometros cancun-merida'
        cmd = New MySqlCommand("Select a.[Distancia de Cancun] from cenotes as a, localidades as b where b.ID_localidad=a.localidad AND a.ID_cenote=" & Tabasco.idcenote, conexion.Mysqlcon)
        kilomes = New MySqlDataAdapter(cmd)
        kilome = New DataSet
        kilomes.Fill("[Distancia de Cancun]")

<?php 
session_start();
if(isset($_SESSION["nick"]) && isset($_SESSION["pass"])){
    header("Location: panel.php");
}else
{

	}
?> 

<li>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<b><?php 
		session_start();
		if(isset($_SESSION["conectado"])){
		    echo  "Bienvenido: ";
			echo "<a href=panel.php>";
			echo  $_SESSION["nick"];} else{
				echo " ";
				session_destroy();
				}
		?></b></li>

<form action="loggin.php" method="post">
  <label>
  <div align="left">
    <p class="Estilo4"><br />
      <span class="Estilo5">*</span> Usuario:</p>
    <p class="Estilo4"><br />
      <input type="text" size="15" name="nick"  onblur="this.id=''" title="Escribe tu usuario..." onkeypress="this.type='nick'" />
    </p><br />
  </div>
  </label>
  <p align="left">
   <label><span class="Estilo4"><span class="Estilo5">* </span>Contraseña: <br />
   <br />
   <input type="password" size="15" name="pass"  onkeypress="this.type='pass''password'" />
   <br />
   </span>
   <!--label class="checkbox"
   input type="checkbox" name="transporte" value="1">Recuerda mis datos /input>  
   /label-->
   <br />
   <input class="btn btn-large btn btn-info" type="submit" name="enviar" value="Iniciar Sesión" />
      </label>      
  </form>

<?php

include("conexion.php");

//header("Location: index.php")
$user=$_SESSION["nick"]=$_POST["nick"];
$pass=$_SESSION["pass"]=$_POST["pass"];


$sql="SELECT id FROM usuarios WHERE nick='".$_SESSION["nick"]."'and pass='".$_SESSION["pass"]."'";


$result=mysql_query($sql);
$row=mysql_fetch_array($result);


if ($row){
header("Location: panel.php");

}else{

header("Location: error.php");
}


?>

<?php
include ("conexion.php");
if(!$_SESSION["nick"] || !$_SESSION["pass"]){//vemos si está declarada la variable, pero no en el index.
header('Location: login.php');
}else{
$user = $_SESSION["nick"];
$pass = $_SESSION["pass"];
}
?> 

<?php 
session_start();
if(isset($_SESSION["nick"]) && isset($_SESSION["pass"])){
    header("Location: panel.php");
}else
{

	}
?> 

<?php
session_start();
$conex = 0;

if ($conex == 0) {
$servidorc = 'localhost';
$basec = 'foraneo';
$usuarioc = 'root';
$contrasenac = '';
};


if ($conex == 1) {
    $servidorc = "localhost";
    $usuarioc = "usuario";
    $contrasenac = "contraseña";
    $basec = "base";
};

    $con = mysql_connect($servidorc, $usuarioc, $contrasenac);

/* Hacemos condicion para saber si la conexion se ha realizado con exito */
if (!$con) {
    echo('No se puede conectar' . mysql_error()); //con esto "cachamos el error" para no caer abruptamente.
} else {
   // echo "   Se Conecto correctamente";
}

$db_selected = mysql_select_db($basec, $con); //Aqui ponemos como primer parametro el nombre de la bd y el segundo parametro ponemos el nombre de la variable en donde guardamos la conexión

if (!$db_selected)
  {
  die ("No puede conectarse a la base de datos : " . mysql_error());//con esto "cachamos el error" para no caer abruptamente.
}
else{
//echo "Se ha conectado correctamente a la base de datossssssssssssssss";
}

?>

<div id="apDiv23">
  <input class="btn btn-large btn-danger" type="submit" name="btnD" value="Cerrar Session" onClick=" window.location.href='index.php'" />

<?php 
session_unset();
session_destroy();
?>
</div>

<form action="loggin.php" method="post">
  <label>
  <div align="left">
    <p class="Estilo4"><br />
      <span class="Estilo5">*</span> Usuario:</p>
    <p class="Estilo4"><br />
      <input type="text" size="15" name="nick"  onblur="this.id=''" title="Escribe tu usuario..." onkeypress="this.type='nick'" />
    </p><br />
  </div>
  </label>
  <p align="left">
   <label><span class="Estilo4"><span class="Estilo5">* </span>Contraseña: <br />
   <br />
   <input type="password" size="15" name="pass"  onkeypress="this.type='pass''password'" />
   <br />
   </span>
   <!--label class="checkbox"
   input type="checkbox" name="transporte" value="1">Recuerda mis datos /input>  
   /label-->
   <br />
   <input class="btn btn-large btn btn-info" type="submit" name="enviar" value="Iniciar Sesión" />
      </label>      
  </form>

<?php
include ("conexion.php");
if(!$_SESSION["nick"] || !$_SESSION["pass"]){//vemos si está declarada la variable, pero no en el index.
header('Location: login.php');
}else{

$user = $_SESSION["nick"];
$pass = $_SESSION["pass"];
}
?> 

<?
include("conexion.php");
if(!$_SESSION["nick"] || !$_SESSION["pass"]){//vemos si está declarada la variable, pero no en el index.
}else{
header('Location: panel.php');
}
?> 

<?php

include("conexion.php");

//header("Location: index.php")
$user=$_SESSION["nick"]=$_POST["nick"];
$pass=$_SESSION["pass"]=$_POST["pass"];


$sql="SELECT id FROM usuarios WHERE nick='".$_SESSION["nick"]."'and pass='".$_SESSION["pass"]."'";


$result=mysql_query($sql);
$row=mysql_fetch_array($result);


if ($row){
setcookie('nick', $user, time() + 60 * 60 * 24 * 30);
setcookie('pass', $pass, time() + 60 * 60 * 24 * 30);
header("Location: panel.php");

}else{

header("Location: error.php");
}


?>

<?php
include ("conexion.php");

//usuario y clave pasados por el formulario
$user = $_SESSION["nick"];
$pass = $_SESSION["pass"];
//usa la funcion conexiones() que se ubica dentro de funciones.php
if ($con){

} else {
header('Location: login.php');
}
?>

<div id="apDiv23">
  <input class="btn btn-large btn-danger" type="submit" name="btnD" value="Cerrar Session" onClick=" window.location.href='index.php'" />

<?php 
session_unset();
session_destroy();
?>
</div>

<?php
session_start();
$conex = 0;

if ($conex == 0) {
$servidorc = 'localhost';
$basec = 'foraneo';
$usuarioc = 'root';
$contrasenac = '';
};


if ($conex == 1) {
    $servidorc = "miservidorweb";
    $usuarioc = "miusuarioweb";
    $contrasenac = "micontraseñaweb";
    $basec = "mibaseweb";
};

    $con = mysql_connect($servidorc, $usuarioc, $contrasenac);

/* Hacemos condicion para saber si la conexion se ha realizado con exito */
if (!$con) {
    echo('No se puede conectar' . mysql_error()); //con esto "cachamos el error" para no caer abruptamente.
} else {
   // echo "   Se Conecto correctamente";
}

$db_selected = mysql_select_db($basec, $con); //Aqui ponemos como primer parametro el nombre de la bd y el segundo parametro ponemos el nombre de la variable en donde guardamos la conexión

if (!$db_selected)
  {
  die ("No puede conectarse a la base de datos : " . mysql_error());//con esto "cachamos el error" para no caer abruptamente.
}
else{
//echo "Se ha conectado correctamente a la base de datossssssssssssssss";
}

?>

<?php
include ("conexion.php");
session_unset();
if ($con){
//usuario y clave pasados por el formulario
$user = $_SESSION["nick"];
$pass = $_SESSION["pass"];
} else {
header('Location: login.php');
}
?>

<?php
if(!$SYS) exit; // Evita la visualización directa

$SYS['MYSQL']['USER'] = 'root';
$SYS['MYSQL']['PASS'] = '';
$SYS['MYSQL']['BDATOS'] = 'usuarios';
$SYS['MYSQL']['HOST'] = 'localhost';
// ---------------------------------------------------

$SYS['MYSQL']['HANDLE'] = mysql::crear_handle(
 $SYS['MYSQL']['USER'],
 $SYS['MYSQL']['PASS'],
 $SYS['MYSQL']['BDATOS'],
 $SYS['MYSQL']['HOST']
);

$_GET = stripslashses_gpc($_GET);
$_POST = stripslashses_gpc($_POST);
$_COOKIE = stripslashses_gpc($_COOKIE);
$_SERVER = stripslashses_gpc($_SERVER);

function stripslashses_gpc($buffer){
 if(!function_exists('get_magic_quotes_gpc'))
  return $buffer;
 if(get_magic_quotes_gpc()){
  if(is_array($buffer)){
   foreach($buffer as $variable => $valor){
    $temp[$variable] = stripslashses_gpc($valor);
   }
   return $temp;
  }else{
   return stripslashes($buffer);
  }
 }else{
  return $buffer;
 }
}

class mysql{

 function crear_handle($user, $pass, $bdatos, $host){
  if(!$handle = mysql_connect($host, $user, $pass))
   return false; // Imposible conectar
  if(mysql_select_db($bdatos, $handle)){
   return $handle; // Retorna el manipulador
  }else{
   return false; // La base de datos no existe
  }
 }

 function selecciona($query, $handle, $una_columna = false){
  if(!$query = mysql_query($query, $handle))
   return false; // La query falló
  else{
   while($fila = mysql_fetch_array($query, MYSQL_ASSOC)){
    $retorno[] = $fila; // Llena la variable con las filas retornadas
   }
   @mysql_free_result($query); // Livera memoria
  }
  if($una_columna)
   return $retorno[0]; // Devuelve una sola columna
  return $retorno; // Devuelve todas las columnas
 }
}
?>

<?php
if(!$SYS) exit; // Evita la visualización directa

class user{

 function registrar($data_array){
  /* Verifica que cada dato sea real */
  /* Falta el nick */
  if(!$data_array['nick'])
   return array(
    'estado' => 'error',
    'data' => 'Falta el nick.'
   );
  /* Falta el pass */
  if(!$data_array['pass'])
   return array(
    'estado' => 'error',
    'data' => 'Falta la contraseña.'
   );
  /* El mail es falso */
  if(!user::es_mail($data_array['mail']))
   return array(
    'estado' => 'error',
    'data' => 'La dirección de correo no es válido.'
   );
  /* El usuario ya existe */
  if(user::existe_dato($data_array['nick'], 'nick'))
   return array(
    'estado' => 'error',
    'data' => 'El nick ya existe.'
   );
  /* El mail ya existe */
  if(user::existe_dato($data_array['mail'], 'mail'))
   return array(
    'estado' => 'error',
    'data' => 'La dirección E-Mail \''.$data_array['mail'].'\' ya está siendo utilizada.'
   );
  /* Los datos son correctos */
  global $SYS; // Globaliza para el Handle de MySQL
  /* 
   Hacemos la query y le decimos a la función que nos entregue el
   la primera columna solamente
  */
  $id = mysql::selecciona('
   select max(id) from usuarios
  ', $SYS['MYSQL']['HANDLE'], true);
  /* Si no hay usuarios entonces el id es 1 */
  $id = ((int)$id['max(id)'] + 1);
  if(mysql_query('
   INSERT INTO `foraneo`.`usuarios` (
    `id` ,
    `nick` ,
    `nombre` ,
    `pass` ,
    `mail` ,
    `token` ,
    `data` ,
    `fecha_acceso`
   ) VALUES (
    \''.(int)$id.'\',
    \''.mysql_real_escape_string($data_array['nick']).'\',
    \''.mysql_real_escape_string($data_array['nombre']).'\',
    \''.mysql_real_escape_string(sha1($data_array['pass'])).'\', 
    \''.mysql_real_escape_string($data_array['mail']).'\', 
    \''.md5(microtime().rand(0,999)).'\',
    \'\', 
    \''.time().'\'
   );
  ', $SYS['MYSQL']['HANDLE']))
   return array(
    'estado' => 'ok',
    'data' => 'La cuenta ha sido creada satisfactoriamente!'
   ); // Base de datos actualizada
  else
   return array(
    'estado' => 'error',
    'data' => 'Imposible crear tu cuenta. Contactate con el administrador.'
   ); // Imposible actualizar los datos
 }

 function existe_dato($dato, $tipo){
  global $SYS;
  $valor = mysql::selecciona('
   select `'.mysql_real_escape_string($tipo).'` 
   from usuarios 
   where `'.mysql_real_escape_string($tipo).'` = \''.mysql_real_escape_string($dato).'\'
   limit 1
  ', $SYS['MYSQL']['HANDLE'], true);
  if($valor[$tipo] == $dato)
   return true; // Existe
  else
   return false; // No existe
 }

 function carga_sesion(){
  global $SYS;
  if(!$data = unserialize($_COOKIE['user_data']))
   return false; // La cookie no es válida ya que no contiene datos serializados
  $id = $data['id'];
  $pass = $data['pass'];
  unset($data); // Destruye la variable para ser reutilizada
  
  $data = mysql::selecciona('
   select * 
   from usuarios 
   where id = \''.mysql_real_escape_string($id).'\' and 
   pass = \''.mysql_real_escape_string($pass).'\' 
   limit 1 
  ', $SYS['MYSQL']['HANDLE'], true); // Límite de 1 resultado
  if($data['id']){
   /* Actualiza la fecha del último acceso */
   mysql_query('
    update `usuarios` 
    SET `fecha_acceso` = \''.(int)time().'\' 
    where `id` = 2
    limit 1
   ', $SYS['MYSQL']['HANDLE']);
   return $data;
  }else{
   return false;
  }
 }
 
 function login($user, $pass){
  global $SYS;
  $data = mysql::selecciona('
   select * 
   from usuarios 
   where nick = \''.mysql_real_escape_string($user).'\' and 
   pass = \''.mysql_real_escape_string(sha1($pass)).'\' 
   limit 1 
  ', $SYS['MYSQL']['HANDLE'], true); // Límite de 1 resultado
  if(!$data['id'])
   return false; // No es un usuario válido o se produjo un intento de ataque
  /* Devuelve el pass cifrado en SHA1 al igual que la cookie */
  /* Establece la cookie del usuario */
  setcookie(
   'user_data', 
   serialize(array('id' => $data['id'], 'pass' => $data['pass'])), 
   false, 
   '/'
  ); // Compatibiliza con pernalinks
  return $data; // Retorna los datos del usuario
 }
 
 function es_mail($email){
  /* Verifica atraves de la expresión regular si es correcto */
  if(ereg("^[_a-zA-Z0-9-]+(\.[_a-zA-Z0-9-]+)*@+([_a-zA-Z0-9-]+\.)*[a-zA-Z0-9-]{2,200}\.[a-zA-Z]{2,6}$", $email)){
   $email = explode('@', $email);
   /* Verifica que el host del mail existe */
   if(@gethostbynamel($email[1])) return true;
   else return false;
  }else{
   return false;
  }
 }
 
}
?>

<?php
/* Compatibilidad con acentos y eñes */
header('Content-Type: text/html; charset=iso-8859-1');

/* 
Declara la url del script
Nunca declarar $_SERVER['PHP_SELF'] si no saben como
utilizarlo ya que puede causar fallas de tipo XSS
http://www.webcomparte.com/foro/programacion-en-php/evitar-el-cross-site-scripting-(xss)/
*/
$SYS['WEB_SELF'] = 'http://'.$_SERVER['HTTP_HOST'].$_SERVER['SCRIPT_NAME'];
/* conexión a la base de datos */
include('mysql.php');
/* Función de usuarios */
include('usuarios.php');

if($_POST['nick']){
 if($_POST['pass'] == $_POST['pass2']){
  $estado = user::registrar($_POST);
 }else{
  $estado = array(
   'estado' => 'error',
   'data' => 'Las contraseñas no coinciden.'
  );
 }
}

function muestra_input($variable){
 global $estado;
 if($estado['estado'] == 'error')
  echo @htmlspecialchars($_POST[$variable], ENT_QUOTES);
}
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//ES" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml"  lang="es-CL" xml:lang="es">
 <head>
  <meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1" />
  <title>Registrarse</title>
 </head>
 <body>
  <?php if($estado['estado'] == 'error'){ ?>
   <strong>Se ha producido el siguiente error:</strong><br />
   <?php echo htmlspecialchars($estado['data'], ENT_QUOTES); ?><br />
   <br />
  <?php }elseif($estado['estado'] == 'ok'){ ?>
   <strong><?php echo htmlspecialchars($estado['data'], ENT_QUOTES); ?></strong><br />
   <br />
  <?php } ?>
  Bievenido!, por favor ingrese sus datos.<br />
  <br />
  <form method="post" action="<?php echo $SYS['WEB_SELF']; ?>">
  <table style="text-align: left; width: 100%;" border="0" cellpadding="2" cellspacing="2">
   <tbody>
    <tr>
     <td width="150">Nick</td>
     <td><input type="text" name="nick" value="<?php muestra_input('nick'); ?>" /></td>
    </tr>
    <tr>
     <td>Nombre completo</td>
     <td><input type="text" name="nombre" value="<?php muestra_input('nombre'); ?>" /></td>
    </tr>
    <tr>
     <td>Dirección E-Mail</td>
     <td><input type="text" name="mail" value="<?php muestra_input('mail'); ?>" /></td>
    </tr>
    <tr>
     <td>Contraseña</td>
     <td><input type="password" name="pass" /></td>
    </tr>
    <tr>
     <td>Repita su contraseña</td>
     <td><input type="password" name="pass2" /></td>
    </tr>
    <tr>
     <td></td>
     <td><input type="submit" value="Registrarse!" /></td>
    </tr>
   </tbody>
  </table>
 </body>
</html>

Public Class Informacion
    Friend conexion As MySqlConnection
    Private Sub Informacion_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Aestado As Estado = New Estado
        'Creamos conexion'
        conexion = New MySqlConnection()
        conexion.ConnectionString = "server=" & "localhost" & ";" & "user id=" & "root" & ";" & "password=" & " " & ";" & "Database=" & "cenotes" & ";"

        'Creamos adaptador'
        Dim adapter As New MySqlDataAdapter("Select a.nombre from cenotes as a, localidades as b where b.ID_localidad=a.localidad AND b.ID_estado=" & Aestado.idestado, conexion)
        Dim dbDataset As DataSet = New DataSet()
        conexion.Open()