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;

相关文章推荐

python爬取某个贴吧帖子留下的邮箱,并自动发送相应链接

python爬虫正则匹配获得邮箱,写邮件把获得邮箱列表循环发送邮件。----根据网上的视频教程介绍,编写的 # -*- coding: UTF-8 -*- __author__ = 'Intgrp'...

:angularjs学习总结(~~很详细的教程) 很不错的一篇帖子 适合快速了解angularjs整体结构 有个整体印象

1 前言 前端技术的发展是如此之快,各种优秀技术、优秀框架的出现简直让人目不暇接,紧跟时代潮流,学习掌握新知识自然是不敢怠慢。 AngularJS是google在维护,其在国外已经十分火热...

一篇介绍 Websocket 和 Http 的很好的帖子

原文地址:http://www.tuicool.com/articles/7zyMvy6 一、websocket与http WebSocket是HTML5出的东西(协议),...
  • su_sai
  • su_sai
  • 2016年09月17日 15:12
  • 286

一篇关于魅族M82D游戏开发的帖子,详细介绍了M8上DDraw的使用,DDraw同时适用于WinCE系统

原文地址::http://www.j2megame.com/html/xwzx/ty/512.html 相关网帖 1.M8SDK教程-游戏开发心得(一): 游戏程序框架----...

一篇-蜘蛛天天爬,但是就是不收录-的帖子

对于网站内容,我说一个例子,刚才在seowhy论坛上看到一篇《蜘蛛天天爬,但是就是不收录!》这样的文章,~他的网址就不说了,上面写着的内容:现在网站只是充实内容和用作百度收录,这些完成后会更换服务器....

转一篇讲解网络子系统的帖子

Linux强大的网络功能是如何实现的,让我们一起进入Linux内核的网络系统了解一下吧。 7.1. sk_buff结构 在Linux内核的网络实现中,使用了一个缓存结构(struct sk...

一篇鸡肋似得,关于u-boot中 _start 和 _armboot_start关系的帖子

以下内容来自笔者在中国Linux论坛Linux嵌 入技术讨论区的张贴: aaronwong: u-boot中代码的疑问(_armboot_start与_start)?  -------...

csdn上关于字符集的一篇帖子

转自:http://topic.csdn.net/u/20110524/23/E1E169B6-DF47-4D8D-BD9E-391F319ADC26.html    相信大家很多人跟我一样,对于编码...

他是如何通过一篇帖子年赚几百万的_0

作为中国人气最旺的天涯论坛,有着无数的人气,也有着无数的机会让你可以赚钱。不少的朋友都以为那里只是一个发发牢骚,聊聊生活的地方。大家可能还不知道其实有很多人在上面赚到大钱,赚少的一个月赚几千块,赚多的...

C#操作Word总结(二)——设置文档格式并添加文本内容、超链接、添加图片

设置文档格式并添加内容 #region 设置文档格式并添加文本内容、超链接 /// /// 设置文档格式并添加内容 /// /// 文件名 /// public static bool Add...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:FORM实现中打开图片,链接,文档(参考自itpub上一篇帖子,整理而来)
举报原因:
原因补充:

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