oracle的存储过程 delphi怎么调用!!请老师们指教。我在线等后大家的指教 http://www.cnoug.org/viewthread.php?tid=17856 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.Button1Click(Sender: TObject); begin try with ADOConnection1 do begin ConnectionString:= 'Provider=OraOLEDB.Oracle.1;' + 'Password=密码;' + 'Persist Security Info=True;' + 'User ID=用户名;' + 'Data Source=数据库名;' + 'Extended Properties="PLSQLRSet=1;"'; Open; end; except showMessage('连接不成功'); exit; end; try with ADOStoredProc1 do begin Connection := ADOConnection1; Parameters.Clear; ProcedureName:= 'pkg_test.get'; Parameters.CreateParameter('p1',ftInteger,pdInput,10,1); Open; end; except showMessage('无法执行过程.'); end; end; ORACLE导出EXCEL 怎么显示建立在某张表上的trigger? 怎么查看别人的Oracle数据文件 小设计一下 能否按照DECODE条件来COUNT??? ASP+ORACLE问题 一个简单的sql语句 求助!! 关于update clob类型字段的问题 PL/SQL的问题!大家顺便介绍介绍学PL/SQL到熟练程度的经验,相互交流一下嘛! 请教从SQL SERVER复制一个表ORACLE,该怎么办呢?焦急的在线等待中 创建表空间?? oracle9i的安装问题
begin
try
with ADOConnection1 do
begin
ConnectionString:=
'Provider=OraOLEDB.Oracle.1;'
+ 'Password=密码;'
+ 'Persist Security Info=True;'
+ 'User ID=用户名;'
+ 'Data Source=数据库名;'
+ 'Extended Properties="PLSQLRSet=1;"';
Open;
end;
except
showMessage('连接不成功');
exit;
end; try
with ADOStoredProc1 do
begin
Connection := ADOConnection1;
Parameters.Clear;
ProcedureName:= 'pkg_test.get';
Parameters.CreateParameter('p1',ftInteger,pdInput,10,1);
Open;
end;
except
showMessage('无法执行过程.');
end;
end;