如何使用FBean预言机表单仅选择文件夹而不选择文件

Question

我有示例oracle表单AWTFileDialog，其中打开对话框并选择文件，但我希望用户仅选择文件夹并获取文件夹中的所有文件。

法典：

:BL.FILE := FBean.Invoke_Char('CTRL.BEAN', 1, 'openFile' ,'Open a file...,C:');

我正在使用甲骨文表格 11g

如何实现这一目标

谢谢

Answer 1

一种选择是使用webutil_file应该附加的webutil.pll包，并且在继续程序之前，应该通过子类化来导入对象库webutil.olb。毕竟，考虑编写以下代码：

Declare
v_dir varchar2(500);
Begin    
Client_Tool_Env.Getvar('WINDIR',v_dir); 
:BL.FILE := webutil_file.file_open_dialog(v_dir,'myblock','*.*','Open a file...'); 
End;