<?php
print "<HTML><PRE>";
$conn = OCILogon ("scott", "tiger");
$sql = "delete from emp where deptno = 10";
$stmt = OCIParse ($conn,$sql);
if (OCIStatementType ($stmt) == "DELETE" ) {
die "You are not allowed to delete from this table<BR>";
}
OCILogoff ($conn);
print "</PRE></HTML>";
?>