【第22期】观点:IT 行业加班,到底有没有价值?

FORM实现中打开图片,链接,文档(参考自itpub上一篇帖子,整理而来)

原创 2013年12月04日 23:11:24
FORM实现中打开图片,链接,文档
参考自itpub上一篇帖子,整理而来
1.添加PL程序库D2kwutil.pll
2.主要实现程序
/*过程参数说明:
 v_application ——打开文件的应用程序
 v_file_path   ——带详细路径的文件名
*/
PROCEDURE p_open_file(v_application VARCHAR2 , v_file_path VARCHAR2) IS
  v_app_id                PLS_INTEGER; 
  v_application_path      VARCHAR2(200); --应用程路径
  v_end_char              VARCHAR2(1);
BEGIN
  
  --读注册表获取应用程序路径
  v_application_path := Win_Api_Environment.Read_Registry('HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\'||v_application,'Path');  
  
  --为做到打开文件的统一性,对应用程序路径做相应处理
  v_end_char :=SUBSTR(v_application_path , LENGTH(v_application_path));  
  IF  v_end_char = ';' OR v_end_char = '\' THEN
    v_application_path := SUBSTR(v_application_path , 1 ,LENGTH(v_application_path)-1);
  END IF;  
  
  --打开文件
  --注意:dde.app_begin()函数的第一个参数格式为:应用程序路径 + 空格 + 文件名(含路径)
  --      由此为使文件名中含空格或桌面上的文件也能被打开,我们需给文件名加上双引号
  v_app_id :=dde.app_begin(v_application_path||'\'||v_application||' '||'"'||v_file_path||'"' ,dde.app_mode_maximized);
  
  --将光标定位到打开的文件中
  dde.app_focus(v_app_id);
EXCEPTION  WHEN OTHERS THEN
	MESSAGE('打开文件失败。');
END;	   

3.在按钮触发器调用
  --打开已存在的EXCEL文件
  BEGIN
  	p_open_file('EXCEL.EXE' ,'E:\test.xls');
  END;
  
    --打开已存在的WORD文件
  BEGIN
  	p_open_file('WINWORD.EXE' ,'e:\test.doc');
  END;
  --打开网页
  BEGIN
  	p_open_file('IEXPLORE.EXE' ,'www.163.com');
  END;  
  --打开已存在的图片文件
  BEGIN
  	p_open_file('OIS.EXE' ,'E:\test.JPG');
  END;

版权声明:本文为博主原创文章,未经博主允许不得转载。 举报

相关文章推荐

TimesTen学习笔记1(转载ITPUB的帖子)

我最初的了解了TimesTen的一些知识是在ITPUT论坛里面。下面我把论坛里面的内容转贴到我这里,如果需要看原文,可以点击下面的链接。 timesten系列一:简介 http://www.itpub.net/thread-1034746-1-1.html timesten...

DearBook + Itpub 北京区Oracle书友会图片链接

以下link来自Dearbook编辑雷钧的bloghttp://blog.csdn.net/leijungood/archive/2004/09/04/94324.aspx
  • Kamus
  • Kamus
  • 2004-09-08 02:49
  • 1311

程序员升职加薪指南!还缺一个“证”!

CSDN出品,立即查看!

几个itpub关于采购审批层次的帖子

摘自:http://gooply.blogspot.tw/2007/10/itpub.html 几个itpub关于采购审批层次的帖子 Q: 问个po审批层次的问题 在po中定...

对于最近一篇帖子"解释一下,为什么需要接口而不直接实现类"的讨论引申出对spring的思考

本人以前对spring用的甚少,基本都是搞EJB或者Seam.用spring只是在一个C/S程序中来配置一些简单类(确实比我手工创建爽多了),一直不明白spring提倡的IOC或者说DI究竟有什么好处,通过上篇帖子的辩论,重新思考了这个问题,同时感谢 深秋小雨童鞋提供的帖子[url]http://...
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

(最多只允许输入30个字)