KGRKJGETMRETU895U-589TY5MIGM5JGB5SDFESFREWTGR54TY
Server : Apache/2.4.62
System : FreeBSD fbsdweb2.web.rcn.net 14.1-RELEASE FreeBSD 14.1-RELEASE releng/14.1-n267679-10e31f0946d8 GENERIC amd64
User : www ( 80)
PHP Version : 8.3.8
Disable Function : NONE
Directory :  /domains/logicswapweb/aplicaciones/admon/generales/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Current File : /domains/logicswapweb/aplicaciones/admon/generales/creaBd_suite.php
<?php
/************************************************************
M�TODO: 		dis_mensaje
DESCRIPCION: 	despliega un mensaje en la pantalla
PARAMETROS:		mensaje a desplegar
RETORNA:
*************************************************************/
function dis_mensaje($mensaje)
{
	echo "<tr>
			<td colspan=\"4\" class='pront' align='center'>
				<br><FONT color=#000099 face='Arial, Helvetica, sans-serif' size=2>".$mensaje."</FONT><br><br>
			</td>
		</tr>";
}
/************************************************************
M�TODO: 		conecta_servidor
DESCRIPCION: 	se conecta al servidor
PARAMETROS:		
RETORNA:		$vinculo--link de conexion
*************************************************************/
function conecta_servidor(){
//Atributos de conexion
	$db_HOST = "localhost";
	$db_USER = "root";
	$db_passwd='';
	$vinculo = mysql_connect($db_HOST, $db_USER, $db_passwd);
	return $vinculo;
}
/************************************************************
M�TODO: 		conecta_BD
DESCRIPCION: 	se conecta a la base de datos
PARAMETROS:		
RETORNA:		$vinculo--link de conexion
*************************************************************/
function conecta_BD($basedatos){
	$vinculo = conecta_servidor();
	if($vinculo)	$vinculo = mysql_select_db($basedatos,$vinculo);
	return $vinculo;
}
/************************************************************
M�TODO: 		ret_BD
DESCRIPCION: 	retorna las bases de datos que existen en el servidor	
PARAMETROS:	
RETORNA:
*************************************************************/
function ret_BD(){
	$vinculo = conecta_servidor();
	if($vinculo){
		$db_list = mysql_list_dbs($vinculo);
		return $db_list;
	}
	else{ 
		$mensaje = "Error conectando al servidor MYSQL";
		dis_mensaje($mensaje);
		return false;
	}
}
/************************************************************
M�TODO: 		existe_BD
DESCRIPCION: 	indica si una base de datos existe en el servidor	
PARAMETROS:		$nombre_BD--nombre de la base de datos
RETORNA:		TRUE -- existe la base de datos en el servidor
				FALSE-- no exise la base de datos
*************************************************************/
function existe_BD($nombre_BD){
	$registro=ret_BD();
	$existe=FALSE;
	if($registro)
		while ($fila = mysql_fetch_object($registro))
			if($fila->Database == $nombre_BD)	$existe=TRUE;
	return $existe;
}
/************************************************************
M�TODO: 		crea_BD
DESCRIPCION: 	crea una base de datos en el servidor	
PARAMETROS:		$nombre_BD--nombre de la base de datos
RETORNA:		TRUE -- se creo la base de datos en el servidor
				FALSE-- no se creo la base de datos
*************************************************************/
function crea_BD($nombre_BD){
	$existe=existe_BD($nombre_BD);
	$creada=FALSE;
	if(! $existe){
		$vinculo = conecta_servidor();
		if($vinculo){
			$consulta='create database '.$nombre_BD;
			$registro=mysql_query($consulta,$vinculo);
			if(	$registro)	$creada=TRUE;
		}
	}
	return $creada;
}
/************************************************************
M�TODO: 		consultar
DESCRIPCION: 	Realiza conexion a la base de datos y 
				Verifica que la base de datos sea la adecuada	
PARAMETROS:	
	$consulta:	consulta a realizar en la base de datos
	$basedatos:	base de datos en la que se realizar� la consulta
RETORNA:
	error:		cuando la consulta genera algun error
	$registros:	cuando la consulta no genera errores
*************************************************************/
function consultar($consulta, $basedatos){
	$vinculo = conecta_BD($basedatos);
	if($vinculo)	echo 'conecto';
	$registros  = mysql_query($consulta,$vinculo);
						echo mysql_error();
	mysql_close($vinculo); 
	return $registros;
}
/************************************************************
M�TODO: 		existe_tabla
DESCRIPCION: 	indica si una tabla existe en la base de datos	
PARAMETROS:		$nombre_tabla--nombre de la tabla
RETORNA:		TRUE -- existe tabla en la base de datos 
				FALSE-- no exise la tabla en la base de datos
*************************************************************/
function existe_tabla($basedatos, $nombre_tabla){
	$vinculo = conecta_BD($basedatos);
	$registro= mysql_list_tables($basedatos); 
	$existe=FALSE;
	if($registro){
		while ($fila = mysql_fetch_row($registro)) 
			if($fila[0] == $nombre_tabla)	$existe=TRUE;
		mysql_free_result($registro); 
	}
	return $existe;
}
//*************************************************************/
//crea tabla noticias
function crea_noticias($basedatos){
	$nombre_tabla='noticias';
	$existe=existe_tabla($basedatos, $nombre_tabla);
	if(!$existe){
		$consulta='CREATE TABLE `noticias` (
		  `noticia_id` mediumint(8) unsigned NOT NULL auto_increment,
		  `noticia_fechapublic` date default NULL,
		  `noticia_fechafin` date default NULL,
		  `noticia_titulo` varchar(250) default NULL,
		  `user_id` mediumint(8) unsigned default NULL,
		  `noticia_url` varchar(250) default NULL,
		  `noticia_resumen` text,
		  `noticia_contenido` text,
		  `noticia_tema` varchar(5) default NULL,
		  PRIMARY KEY  (`noticia_id`)
		) ENGINE=MyISAM ';
		$resultado = consultar($consulta, $basedatos);
		if($resultado)	return TRUE;
		else			return FALSE;
	}
	else return FALSE;
}
//******************************cuerpo del programa*****************************
//crea base de datos
$basedatos='suite';
$creada=crea_BD($basedatos);
if($creada)	echo 'base de datos creada<br>';
else 		echo 'La base de datos ya existe<br>';
//crea tablas
$resultado=crea_noticias($basedatos);
if($existe) echo 'la tabla existe';
else echo 'la tabla no existe';
?>

Anon7 - 2021