ADOdb - El otro acceso a bases de datos (PHP)

ADOdb significa Active Data Objects Data Base y soporta MySQL, PostgreSQL, Interbase, Firebird, Informix, Oracle, MS SQL 7, Foxpro, Access, ADO, Sybase, FrontBase, DB2, SAP DB, SQLite así cómo ODBC. Drivers para Sybase, Informix, FrontBase y PostgreSQL son contribuciones de comunidades. Podeis encontrarlas en \(mini)xampp\php\pear\adodb.

El ejemplo

Código fuente

<?php
	include "langsettings.php";
?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
	"http://www.w3.org/TR/html4/loose.dtd">
<html>
	<head>
		<meta name="author" content="Kai Oswald Seidler, Kay Vogelgesang, Carsten Wiedmann">
		<link href="xampp.css" rel="stylesheet" type="text/css">
		<title></title>
	</head>

<?php
		
	 $host = "127.0.0.1";
	 $timeout = "1";

if ($REMOTE_ADDR) {
		if ($REMOTE_ADDR != $host) {
			echo "<h2> FORBIDDEN FOR CLIENT $REMOTE_ADDR (only localhost!)<h2>";
		}
	}
	else {
		
		// if ()
			if (empty($_POST['dbserver'])) {
				$_POST['dbserver'] = 'mysql';
			}
			if (empty($_POST['host'])) {
				$_POST['host'] = '127.0.0.1';
			}
			if (empty($_POST['user'])) {
				$_POST['user'] = 'root';
			}
			if (empty($_POST['password'])) {
				$_POST['password'] = '';
			}
			if (empty($_POST['database'])) {
				$_POST['database'] = 'cdcol';
			}
			if (empty($_POST['table'])) {
				$_POST['table'] = 'cds';
			}

if (isset($_POST['adodb']) && ($_POST['adodb'] == "submit")) {
				if ($_POST['dbserver'] == "sqlite") {
					include_once 'adodb/adodb-errorpear.inc.php';
					include_once 'adodb/adodb.inc.php';
					include_once 'adodb/tohtml.inc.php';
					$db = ADONewConnection($_POST['dbserver']);
					@$db->Connect($_POST['database'], '0666');
					echo "<p><b>DBServer: $_POST[dbserver]</b><p>";
					$result = $db->Execute("SELECT * FROM $_POST[table]");
					if (!is_object($result)) {
				        $e = ADODB_Pear_Error();
				        echo '<p><b>'.$e->message.'</b>'; 
					} else {
						while (!$result->EOF) {
							for ($i = 0, $max = $result->FieldCount(); $i < $max; $i++) {
								echo $result->fields[$i].' ';
								$result->MoveNext();
								echo "<br>";
							}
						}
					}
				} else {
					if (($_POST['dbserver'] == "mysql") || ($_POST['dbserver'] == "postgres7") || ($_POST['dbserver'] == "ibase") || ($_POST['dbserver'] == "mssql") || ($_POST['dbserver'] == "borland_ibase") || ($_POST['dbserver'] == "firebird") || ($_POST['dbserver'] == "mssqlpo") || ($_POST['dbserver'] == "maxsql") || ($_POST['dbserver'] == "oci8") || ($_POST['dbserver'] == "oci805") || ($_POST['dbserver'] == "oci8po") || ($_POST['dbserver'] == "postgres") || ($_POST['dbserver'] == "oracle") || ($_POST['dbserver'] == "postgres64") || ($_POST['dbserver'] == "sybase")) {
						include_once 'adodb/adodb-errorpear.inc.php';
						include_once 'adodb/adodb.inc.php';
						include_once 'adodb/tohtml.inc.php';
						$db = ADONewConnection($_POST['dbserver']);
						@$db->Connect($_POST['host'], $_POST['user'], $_POST['password'], $_POST['database']);
						echo "<p><b>DBServer: $_POST[dbserver]</b><p>";
						$result = $db->Execute("SELECT * FROM $_POST[table]");
						if (!is_object($result)) {
					        $e = ADODB_Pear_Error();
					        echo '<p><b>'.$e->message.'</b>'; 
						} else {
							while (!$result->EOF) {
								for ($i = 0, $max = $result->FieldCount(); $i < $max; $i++) {
									echo $result->fields[$i].' ';
									$result->MoveNext();
									echo "<br>";
								}
							}
						}
					} else {
						print_r($TEXT['ADOdb-notdbserver']);
					}
				}
			}
		}
		?>

	Servidor de base de datos (MySQL, Oracle ..?)		Host de base de datos (Nombre o IP)


	Nombre del usuario autorizado		Clave del usuario autorizado


	Base de datos en el servidor de base de datos		Tabla de la base de datos