PConnect("localhost", "root", "", "test"); // connect to MySQL, testdb //$conn =& ADONewConnection('oci8'); //$conn->Connect('','scott','natsoft'); //$ADODB_FETCH_MODE = ADODB_FETCH_ASSOC; $conn->debug=1; $conn->Execute("delete from adoxyz where lastname like 'Smith%'"); $rs = $conn->Execute($sql); // Execute the query and get the empty recordset $record = array(); // Initialize an array to hold the record data to insert // Set the values for the fields in the record $record["firstname"] = 'null'; $record["lastname"] = "Smith\$@//"; $record["created"] = time(); //$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->qstr($record['lastname']). " ORDER BY 1"; // Select a record to update $rs = $conn->Execute($sql); // Execute the query and get the existing record to update if (!$rs) 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"] = "Smithy Jones"; // Update Caroline's lastname from Miranda to Smith $record["creAted"] = '2002-12-'.(rand()%30+1); $record['num'] = 3921; // 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); // Update the record in the database if ($conn->Affected_Rows() != 1)print "

Error: Rows Affected=".$conn->Affected_Rows().", should be 1

"; $rs = $conn->Execute("select * from adoxyz where lastname like 'Smith%'"); adodb_pr($rs); rs2html($rs); } testsql(); ?>