Gecko [ edgpens.lpkmn.gov.my ]

Name	Size	Permission
.mad-root	0 B	-rw-rw-rw-
benchmark.php	2.03 KB	-rw-rw-rw-
client.php	3.98 KB	-rw-rw-rw-
pdo.php	1.82 KB	-rw-rw-rw-
test-active-record.php	4.63 KB	-rw-rw-rw-
test-active-recs2.php	1.41 KB	-rw-rw-rw-
test-active-relations.php	2.99 KB	-rw-rw-rw-
test-active-relationsx.php	24.48 KB	-rw-rw-rw-
test-datadict.php	7.49 KB	-rw-rw-rw-
test-perf.php	959 B	-rw-rw-rw-
test-pgblob.php	1.99 KB	-rw-rw-rw-
test-php5.php	2.48 KB	-rw-rw-rw-
test-xmlschema.php	1.28 KB	-rw-rw-rw-
test.php	54.95 KB	-rw-rw-rw-
test2.php	598 B	-rw-rw-rw-
test3.php	893 B	-rw-rw-rw-
test4.php	4.56 KB	-rw-rw-rw-
test5.php	1.35 KB	-rw-rw-rw-
test_rs_array.php	679 B	-rw-rw-rw-
testcache.php	803 B	-rw-rw-rw-
testdatabases.inc.php	17.82 KB	-rw-rw-rw-
testgenid.php	766 B	-rw-rw-rw-
testmssql.php	1.98 KB	-rw-rw-rw-
testoci8.php	2.32 KB	-rw-rw-rw-
testoci8cursor.php	2.89 KB	-rw-rw-rw-
testpaging.php	2.25 KB	-rw-rw-rw-
testpear.php	870 B	-rw-rw-rw-
testsessions.php	2.48 KB	-rw-rw-rw-
time.php	520 B	-rw-rw-rw-
tmssql.php	1.92 KB	-rw-rw-rw-
xmlschema-mssql.xml	832 B	-rw-rw-rw-
xmlschema.xml	961 B	-rw-rw-rw-

Code Editor : test4.php

<?php

/** 
 * @version V4.50 6 July 2004 (c) 2000-2012 John Lim (jlim#natsoft.com). All rights reserved.
 * Released under both BSD license and Lesser GPL library license. 
 * Whenever there is any discrepancy between the two licenses, 
 * the BSD license will take precedence. 
 *
 * Set tabs to 4 for best viewing.
 * 
 * Latest version is available at http://php.weblogs.com
 *
 * Test GetUpdateSQL and GetInsertSQL.
 */
 
error_reporting(E_ALL);
function testsql()
{

include('../adodb.inc.php');
include('../tohtml.inc.php');

global $ADODB_FORCE_TYPE;

//==========================
// This code tests an insert

$sql = "
SELECT * 
FROM ADOXYZ WHERE id = -1"; 
// Select an empty record from the database

#$conn = ADONewConnection("mssql");  // create a connection
#$conn->PConnect("", "sa", "natsoft", "northwind"); // connect to MySQL, testdb

$conn = ADONewConnection("mysql");  // create a connection
$conn->PConnect("localhost", "root", "", "test"); // connect to MySQL, testdb

#$conn = ADONewConnection('oci8po');
#$conn->Connect('','scott','natsoft');

if (PHP_VERSION  >= 5) {
	$connstr = "mysql:dbname=northwind";
	$u = 'root';$p='';
	$conn = ADONewConnection('pdo');
	$conn->Connect($connstr, $u, $p);
}
//$ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;

$conn->debug=1;
$conn->Execute("delete from adoxyz where lastname like 'Smi%'");

$rs = $conn->Execute($sql); // Execute the query and get the empty recordset
$record = array(); // Initialize an array to hold the record data to insert

if (strpos($conn->databaseType,'mysql')===false) $record['id'] = 751;
$record["firstname"] = 'Jann';
$record["lastname"] = "Smitts";
$record["created"] = time();

$insertSQL = $conn->GetInsertSQL($rs, $record);
$conn->Execute($insertSQL); // Insert the record into the database

if (strpos($conn->databaseType,'mysql')===false) $record['id'] = 752;
// Set the values for the fields in the record
$record["firstname"] = 'anull';
$record["lastname"] = "Smith\$@//";
$record["created"] = time();

if (isset($_GET['f'])) $ADODB_FORCE_TYPE = $_GET['f'];

//$record["id"] = -1;

// Pass the empty recordset and the array containing the data to insert
// into the GetInsertSQL function. The function will process the data and return
// a fully formatted insert sql statement.
$insertSQL = $conn->GetInsertSQL($rs, $record);
$conn->Execute($insertSQL); // Insert the record into the database

$insertSQL2 = $conn->GetInsertSQL($table='ADOXYZ', $record);
if ($insertSQL != $insertSQL2) echo "Walt's new stuff failed: $insertSQL2";
//==========================
// This code tests an update

$sql = "
SELECT * 
FROM ADOXYZ WHERE lastname=".$conn->Param('var'). " ORDER BY 1"; 
// Select a record to update

$varr = array('var'=>$record['lastname'].'');
$rs = $conn->Execute($sql,$varr); // Execute the query and get the existing record to update
if (!$rs || $rs->EOF) print "No record found!";

$record = array(); // Initialize an array to hold the record data to update

// Set the values for the fields in the record
$record["firstName"] = "Caroline".rand();
//$record["lasTname"] = ""; // Update Caroline's lastname from Miranda to Smith
$record["creAted"] = '2002-12-'.(rand()%30+1);
$record['num'] = '';
// Pass the single record recordset and the array containing the data to update
// into the GetUpdateSQL function. The function will process the data and return
// a fully formatted update sql statement.
// If the data has not changed, no recordset is returned

$updateSQL = $conn->GetUpdateSQL($rs, $record);
$conn->Execute($updateSQL,$varr); // Update the record in the database
if ($conn->Affected_Rows() != 1)print "Error1 : Rows Affected=".$conn->Affected_Rows().", should be 1";

$record["firstName"] = "Caroline".rand();
$record["lasTname"] = "Smithy Jones"; // Update Caroline's lastname from Miranda to Smith
$record["creAted"] = '2002-12-'.(rand()%30+1);
$record['num'] = 331;
$updateSQL = $conn->GetUpdateSQL($rs, $record);
$conn->Execute($updateSQL,$varr); // Update the record in the database
if ($conn->Affected_Rows() != 1)print "Error 2: Rows Affected=".$conn->Affected_Rows().", should be 1";

$rs = $conn->Execute("select * from ADOXYZ where lastname like 'Sm%'");
//adodb_pr($rs);
rs2html($rs);

$record["firstName"] = "Carol-new-".rand();
$record["lasTname"] = "Smithy"; // Update Caroline's lastname from Miranda to Smith
$record["creAted"] = '2002-12-'.(rand()%30+1);
$record['num'] = 331;

$conn->AutoExecute('ADOXYZ',$record,'UPDATE', "lastname like 'Sm%'");
$rs = $conn->Execute("select * from ADOXYZ where lastname like 'Sm%'");
//adodb_pr($rs);
rs2html($rs);
}

testsql();
?>

${this.title}

Code Editor : test4.php