分享
 
 
 

PHP链接oracle的函数

王朝oracle·作者佚名  2006-01-08
窄屏简体版  字體: 小|中|大|超大  

※db_logon() 开启数据库连接

※db_query() 通用select

※db_change() 数据库改变的通用函数（insert,delete,update）

※db_insert() insert,直接调用db_change()

※db_delete() delete,直接调用db_change()

※db_update() update,直接调用db_change()

※db_commit() 事务递交

※db_rollback() 事务回退

※db_logoff() 断开数据库连接

Class c_ora_db

{

变量定义

var $C_user = ""; 数据库用户名

var $C_passwd = ""; 数据库口令

var $C_db = ""; 数据库名

var $I_linkID = 0; 连线句柄

var $I_stmtID = 0; 查询句柄

var $color =""; 全局颜色

函数名：db_logon()

作 用：开启数据库连接

参 数：无

返回值：连线句柄（整型）

备 注：无

function db_logon()

{

$this->I_linkID = @OCILogon($this->C_user,$this->C_passwd,$this->C_db);

if ($this->I_linkID == 0){AlertExit('数据库链接失败，请与DBA联系！');}

return $this->I_linkID;

}

函数名：db_query($C_sql,$A_define="",$I_start=-1,$I_end=-1)

作 用：select

参 数：$C_sql sql语句

$A_define 需绑定的字段。数组型

$I_start 开始取记录 -1则取出查询的所有记录

$I_end 结束取纪录

返回值：二维数组($A_rs)

备 注：通过数字0,1,2....可访问对应字段的值; 或通过查询字段名也可访问对应字段的值

如通过$A_rs[0][0]或$A_rs[0]['NAME']或$A_rs[0]['name']都可访问首条记录NAME字段

$I_start,$I_end是配合分页使用的参数。

function db_query($C_sql,$A_define="",$I_start=-1,$I_end=-1)

{

if (!$C_sql){AlertExit("参数不全！");}检查参数

连接检测

if ($this->I_linkID == 0){AlertExit('数据库链接失败，请与DBA联系！');}

格式检测

$this -> I_stmtID = OCIParse($this -> I_linkID,$C_sql);

if (!$this -> I_stmtID){AlertExit(' sql格式出错！请与程序员联系');}

如果没指定绑定的字段，则从SQL语句中去取

if($A_define=="")

{

$A_Cur = explode("select",$C_sql);

$A_Cur = explode("from",$A_Cur[1]);

$A_define = explode(",",$A_Cur[0]);

}

绑定数据库表字段

if(gettype($A_define) == "array") 查询列是数组

{

for($i=0;$i<count($A_define);$i++)

{

$A_define_up[$i] = trim(strtoupper($A_define[$i])); 大写并去除空格

}

for($i=0;$i<count($A_define_up);$i++)

{

OCIDefineByName($this -> I_stmtID,"$A_define_up[$i]",&$$A_define[$i]); 绑定

}

}

elseif(trim($A_define) <> "") 查询列只有一个

{

$A_define_up = trim(strtoupper($A_define));

OCIDefineByName($this -> I_stmtID,"$A_define_up",&$$A_define);

}

执行绑定好的SQL语句

if(!OCIExecute($this -> I_stmtID))

{

echo "<font color=red><b>执行出错:</b></font>SQL Error:<font color=red>$C_sql</font><br>";

return false;

}

$lower = 0; 返回二维数组的第一维下标控制变量

$cnt = 0; 开始取数标识

取记录

while (OCIFetchInto($this -> I_stmtID,&$cur,OCI_ASSOC))

{

取查询出来的所有记录

if ($I_start == -1)

{

if (gettype($A_define) == "array") 查询列是数组

{

for ($i=0;$i<count($A_define);$i++)

{

if ($cur[$A_define_up[$i]] <> $$A_define[$i])

{

$$A_define[$i] = $cur[$A_define_up[$i]];

}

$A_rs[$lower][$i] = $$A_define[$i]; 用数字访问

$A_rs[$lower][$A_define[$i]] = $$A_define[$i]; 用小些访问

$A_rs[$lower][$A_define_up[$i]] = $$A_define[$i]; 用大写访问

}

}

elseif (trim($A_define) <> "") 查询列只有一个

{

if ($cur[$A_define_up] <> $$A_define)

{

$$A_define = $cur[$A_define_up];

}

$A_rs[$lower][0] = $$A_define; 用数字访问

$A_rs[$lower][$A_define] = $$A_define; 用小写访问

$A_rs[$lower][$A_define_up] = $$A_define; 用大些访问

}

$lower++; 下标加一

}

取出指定记录(配合分页使用)

if ($I_start <> -1)

{

if ($cnt >= $I_start)

{

$cnt++;

if ($I_end - $I_start <> 0)

{

$I_end--;

if (gettype($A_define) == "array")

{

for($i=0;$i<count($A_define_up);$i++)

{

if ($cur[$A_define_up[$i]] <> $$A_define[$i])

{

$$A_define[$i] = $cur[$A_define_up[$i]];

}

$A_rs[$lower][$i] = $$A_define[$i]; 用数字访问

$A_rs[$lower][$A_define[$i]] = $$A_define[$i]; 用小些访问

$A_rs[$lower][$A_define_up[$i]] = $$A_define[$i]; 用大写访问

}

}elseif(trim($A_define) <> "")

{

if ($cur[$A_define_up] <> $$A_define)

{

$$A_define = $cur[$A_define_up];

}

$A_rs[$lower][0] = $$A_define; 用数字访问

$A_rs[$lower][$A_define] = $$A_define; 用小些访问

$A_rs[$lower][$A_define_up] = $$A_define; 用大写访问

}

$lower++;

}else

{

break; 如果$I_end-$I_start=0 表示取完记录并跳出while循环

}

}else

{

$cnt++; 如果$cnt<$I_start,$cnt++

}

}

} while的结束

释放句柄并返回查询数据（一个二维数组）

OCIFreestatement($this -> I_stmtID);

return $A_rs;

} function的结束

函数名：db_change($C_sql,$A_bind)

作 用：db change

参 数：$C_sql sql语句

$A_bind 需绑定的字段。数组型

返回值：布尔值

备 注：insert,delete,update通用

function db_change($C_sql,$A_bind="")

{

if (!$C_sql){AlertExit("参数不全！");}检查参数

连接检测

if($this -> I_linkID==""){ AlertExit("我们的数据库正忙，请稍后再连接！");}

格式检测

$this -> I_stmtID = OCIParse($this -> I_linkID,$C_sql);

if (!$this -> I_stmtID){AlertExit(' sql格式出错！请与程序员联系');}

绑定

if(gettype($A_bind) == "array")

{

for($i=0;$i<count($A_bind);$i++)

{

global $$A_bind[$i];

$$A_bind[$i] = StripSlashes($$A_bind[$i]); 去掉反斜线字元

$$A_bind[$i] = str_replace("<?","< ?",$$A_bind[$i]); 过滤掉PHP标示

}

for($i=0;$i<count($A_bind);$i++){

OCIBindByName($this -> I_stmtID, ":$A_bind[$i]", &$$A_bind[$i], -1); 绑定

}

}

elseif(trim($A_bind) <> "") 不是数组，是字符

{

global $$A_bind;

$$A_bind = StripSlashes($$A_bind);

$$A_bind = str_replace("<?","< ?",$$A_bind); 过滤掉PHP标示

OCIBindByName($this -> I_stmtID, ":$arrBind", &$$A_bind, -1);

}

执行并检测是否成功

if(!OCIExecute($this -> I_stmtID,OCI_DEFAULT))

{

echo "<font color=red><b>执行出错:</b></font>SQL Error:<font color=red>$C_sql</font><br>";

return false;

}

/*传回受影响的行数

global $I_changenum;

$I_changenum = OCINumrows($this -> I_stmtID);*/

释放句柄，传回值

OCIFreeStatement($this -> I_stmtID);

return true;

}

函数名：db_delete($C_sql)

作 用：delete

参 数：C_sql sql语句

返回值：布尔值

备 注：该函数只是为了使用直观,本质调用db_change()

function db_delete($C_sql)

{

return $this -> db_change($C_sql);

}

函数名：db_insert($C_sql,A_bind)

作 用：insert

参 数：C_sql sql语句

A_bind 绑定

返回值：布尔值

备 注：该函数只是为了使用直观,本质调用db_change()

function db_insert($C_sql,$A_bind="")

{

return $this -> db_change($C_sql,$A_bind);

}

函数名：db_update($C_sql,A_bind)

作 用：update

参 数：C_sql sql语句

A_bind 绑定

返回值：布尔值

备 注：该函数只是为了使用直观,本质调用db_change()

function db_update($C_sql,$A_bind="")

{

return $this -> db_change($C_sql,$A_bind);

}

函数名：db_commit()

作 用：事务递交

参 数：无

返回值：布尔值

备 注：无

function db_commit()

{

return (OCICommit($this->I_linkID));

}

函数名：db_rollback()

作 用：事务回退

参 数：无

返回值：布尔值

备 注：无

function db_rollback()

{

return (OCIRollback($this->I_linkID));

}

函数名：db_logoff()

作 用：断开数据库连接

参 数：无

返回值：布尔值

备 注：无

function db_logoff()

{

return (OCILogoff($this->I_linkID));

}

※db_logon() 开启数据库连接

※db_query() 通用select

※db_change() 数据库改变的通用函数（insert,delete,update）

※db_insert() insert,直接调用db_change()

※db_delete() delete,直接调用db_change()

※db_update() update,直接调用db_change()

※db_commit() 事务递交

※db_rollback() 事务回退

※db_logoff() 断开数据库连接

Class c_ora_db

{

变量定义

var $C_user = ""; 数据库用户名

var $C_passwd = ""; 数据库口令

var $C_db = ""; 数据库名

var $I_linkID = 0; 连线句柄

var $I_stmtID = 0; 查询句柄

var $color =""; 全局颜色

函数名：db_logon()

作 用：开启数据库连接

参 数：无

返回值：连线句柄（整型）

备 注：无

function db_logon()

{

$this->I_linkID = @OCILogon($this->C_user,$this->C_passwd,$this->C_db);

if ($this->I_linkID == 0){AlertExit('数据库链接失败，请与DBA联系！');}

return $this->I_linkID;

}

函数名：db_query($C_sql,$A_define="",$I_start=-1,$I_end=-1)

作 用：select

参 数：$C_sql sql语句

$A_define 需绑定的字段。数组型

$I_start 开始取记录 -1则取出查询的所有记录

$I_end 结束取纪录

返回值：二维数组($A_rs)

备 注：通过数字0,1,2....可访问对应字段的值; 或通过查询字段名也可访问对应字段的值

如通过$A_rs[0][0]或$A_rs[0]['NAME']或$A_rs[0]['name']都可访问首条记录NAME字段

$I_start,$I_end是配合分页使用的参数。

function db_query($C_sql,$A_define="",$I_start=-1,$I_end=-1)

{

if (!$C_sql){AlertExit("参数不全！");}检查参数

连接检测

if ($this->I_linkID == 0){AlertExit('数据库链接失败，请与DBA联系！');}

格式检测

$this -> I_stmtID = OCIParse($this -> I_linkID,$C_sql);

if (!$this -> I_stmtID){AlertExit(' sql格式出错！请与程序员联系');}

如果没指定绑定的字段，则从SQL语句中去取

if($A_define=="")

{

$A_Cur = explode("select",$C_sql);

$A_Cur = explode("from",$A_Cur[1]);

$A_define = explode(",",$A_Cur[0]);

}

绑定数据库表字段

if(gettype($A_define) == "array") 查询列是数组

{

for($i=0;$i<count($A_define);$i++)

{

$A_define_up[$i] = trim(strtoupper($A_define[$i])); 大写并去除空格

}

for($i=0;$i<count($A_define_up);$i++)

{

OCIDefineByName($this -> I_stmtID,"$A_define_up[$i]",&$$A_define[$i]); 绑定

}

}

elseif(trim($A_define) <> "") 查询列只有一个

{

$A_define_up = trim(strtoupper($A_define));

OCIDefineByName($this -> I_stmtID,"$A_define_up",&$$A_define);

}

执行绑定好的SQL语句

if(!OCIExecute($this -> I_stmtID))

{

echo "<font color=red><b>执行出错:</b></font>SQL Error:<font color=red>$C_sql</font><br>";

return false;

}

$lower = 0; 返回二维数组的第一维下标控制变量

$cnt = 0; 开始取数标识

取记录

while (OCIFetchInto($this -> I_stmtID,&$cur,OCI_ASSOC))

{

取查询出来的所有记录

if ($I_start == -1)

{

if (gettype($A_define) == "array") 查询列是数组

{

for ($i=0;$i<count($A_define);$i++)

{

if ($cur[$A_define_up[$i]] <> $$A_define[$i])

{

$$A_define[$i] = $cur[$A_define_up[$i]];

}

$A_rs[$lower][$i] = $$A_define[$i]; 用数字访问

$A_rs[$lower][$A_define[$i]] = $$A_define[$i]; 用小些访问

$A_rs[$lower][$A_define_up[$i]] = $$A_define[$i]; 用大写访问

}

}

elseif (trim($A_define) <> "") 查询列只有一个

{

if ($cur[$A_define_up] <> $$A_define)

{

$$A_define = $cur[$A_define_up];

}

$A_rs[$lower][0] = $$A_define; 用数字访问

$A_rs[$lower][$A_define] = $$A_define; 用小写访问

$A_rs[$lower][$A_define_up] = $$A_define; 用大些访问

}

$lower++; 下标加一

}

取出指定记录(配合分页使用)

if ($I_start <> -1)

{

if ($cnt >= $I_start)

{

$cnt++;

if ($I_end - $I_start <> 0)

{

$I_end--;

if (gettype($A_define) == "array")

{

for($i=0;$i<count($A_define_up);$i++)

{

if ($cur[$A_define_up[$i]] <> $$A_define[$i])

{

$$A_define[$i] = $cur[$A_define_up[$i]];

}

$A_rs[$lower][$i] = $$A_define[$i]; 用数字访问

$A_rs[$lower][$A_define[$i]] = $$A_define[$i]; 用小些访问

$A_rs[$lower][$A_define_up[$i]] = $$A_define[$i]; 用大写访问

}

}elseif(trim($A_define) <> "")

{

if ($cur[$A_define_up] <> $$A_define)

{

$$A_define = $cur[$A_define_up];

}

$A_rs[$lower][0] = $$A_define; 用数字访问

$A_rs[$lower][$A_define] = $$A_define; 用小些访问

$A_rs[$lower][$A_define_up] = $$A_define; 用大写访问

}

$lower++;

}else

{

break; 如果$I_end-$I_start=0 表示取完记录并跳出while循环

}

}else

{

$cnt++; 如果$cnt<$I_start,$cnt++

}

}

} while的结束

释放句柄并返回查询数据（一个二维数组）

OCIFreestatement($this -> I_stmtID);

return $A_rs;

} function的结束

函数名：db_change($C_sql,$A_bind)

作 用：db change

参 数：$C_sql sql语句

$A_bind 需绑定的字段。数组型

返回值：布尔值

备 注：insert,delete,update通用

function db_change($C_sql,$A_bind="")

{

if (!$C_sql){AlertExit("参数不全！");}检查参数

连接检测

if($this -> I_linkID==""){ AlertExit("我们的数据库正忙，请稍后再连接！");}

格式检测

$this -> I_stmtID = OCIParse($this -> I_linkID,$C_sql);

if (!$this -> I_stmtID){AlertExit(' sql格式出错！请与程序员联系');}

绑定

if(gettype($A_bind) == "array")

{

for($i=0;$i<count($A_bind);$i++)

{

global $$A_bind[$i];

$$A_bind[$i] = StripSlashes($$A_bind[$i]); 去掉反斜线字元

$$A_bind[$i] = str_replace("<?","< ?",$$A_bind[$i]); 过滤掉PHP标示

}

for($i=0;$i<count($A_bind);$i++){

OCIBindByName($this -> I_stmtID, ":$A_bind[$i]", &$$A_bind[$i], -1); 绑定

}

}

elseif(trim($A_bind) <> "") 不是数组，是字符

{

global $$A_bind;

$$A_bind = StripSlashes($$A_bind);

$$A_bind = str_replace("<?","< ?",$$A_bind); 过滤掉PHP标示

OCIBindByName($this -> I_stmtID, ":$arrBind", &$$A_bind, -1);

}

执行并检测是否成功

if(!OCIExecute($this -> I_stmtID,OCI_DEFAULT))

{

echo "<font color=red><b>执行出错:</b></font>SQL Error:<font color=red>$C_sql</font><br>";

return false;

}

/*传回受影响的行数

global $I_changenum;

$I_changenum = OCINumrows($this -> I_stmtID);*/

释放句柄，传回值

OCIFreeStatement($this -> I_stmtID);

return true;

}

函数名：db_delete($C_sql)

作 用：delete

参 数：C_sql sql语句

返回值：布尔值

备 注：该函数只是为了使用直观,本质调用db_change()

function db_delete($C_sql)

{

return $this -> db_change($C_sql);

}

函数名：db_insert($C_sql,A_bind)

作 用：insert

参 数：C_sql sql语句

A_bind 绑定

返回值：布尔值

备 注：该函数只是为了使用直观,本质调用db_change()

function db_insert($C_sql,$A_bind="")

{

return $this -> db_change($C_sql,$A_bind);

}

函数名：db_update($C_sql,A_bind)

作 用：update

参 数：C_sql sql语句

A_bind 绑定

返回值：布尔值

备 注：该函数只是为了使用直观,本质调用db_change()

function db_update($C_sql,$A_bind="")

{

return $this -> db_change($C_sql,$A_bind);

}

函数名：db_commit()

作 用：事务递交

参 数：无

返回值：布尔值

备 注：无

function db_commit()

{

return (OCICommit($this->I_linkID));

}

函数名：db_rollback()

作 用：事务回退

参 数：无

返回值：布尔值

备 注：无

function db_rollback()

{

return (OCIRollback($this->I_linkID));

}

函数名：db_logoff()

作 用：断开数据库连接

参 数：无

返回值：布尔值

备 注：无

function db_logoff()

{

return (OCILogoff($this->I_linkID));

}

 
 
 
免责声明：本文为网络用户发布，其观点仅代表作者个人观点，与本站无关，本站仅提供信息存储服务。文中陈述内容未经本站证实，其真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行，买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开？
 干货   2023-08-06
女子4年卖2套房花700多万做美容：不但没变美脸，面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号，网友：不要回答！
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人，苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制（强混乱强眩晕强睡眠）和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情：美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观：鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营：射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山：拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁：鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道：单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野：与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野：李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野：指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵：小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵：千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上，四周的荒凉一望無際，忽然覺得，淒涼也很美
© 2005- 王朝網路 版權所有