以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]调用系统截图程序  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=124755)

--  作者:无限5180
--  发布时间:2018/9/13 9:31:00
--  [求助]调用系统截图程序
我在示例“狐狸通信-开发版1.1”中看到窗口button控件click事件中有这个代码能调用截图程序:
Dim Proc As New Process \'定义一个新的Process
Proc.File = ProjectPath & "Attachments\\screencapture.exe" \'指定要打开的文件
Proc.WaitForClose=True \'直到关闭外部程序,才会执行接下来的代码
Proc.Start()

但我在自己的项目中复制这个代码,就没法调用,出现运行错误提示:”系统找不到指定的文件“
请高手指定,拜托!!!

--  作者:有点甜
--  发布时间:2018/9/13 9:34:00
--  

改成

 

Dim proc As new Process
proc.File = ApplicationPath & "capture.exe"
proc.WaitForClose = True
proc.Start
If ClipBoard.GetImage IsNot Nothing Then
    ClipBoard.GetImage.save("d:\\test.jpg")
    msgbox("保存到了d盘")
End If


--  作者:无限5180
--  发布时间:2018/9/13 9:52:00
--  
谢谢,我刚查出来,原来示例中是先复制了搜狐输入法中的截图程序在项目文件夹下然后调用的。