win32ole

    0热度

    2回答

    我正在尝试使用Win32::OLE模块来控制Windows应用程序。我知道应用程序的开发人员提供了一个OLE对象来控制它,但我不知道该对象的名称。 在一个旧版本的程序,我设法通过以下行来引用在Perl对象: $ref = new Win32::OLE 'object.name' 但该程序的新版本有不同的对象的名称。 是否有任何方法检查当前在Windows上运行的应用程序存在哪些OLE对象?

    0热度

    2回答

    dll的我已执行了这个问题中描述的步骤: Can Ruby import a .NET dll? 所以,我有此C#代码: using System; using System.IO; namespace ComLib { public class LogWriter { public void WriteLine(string line) {

    0热度

    2回答

    我在Windows上有一个Perl应用程序,它使用并行运行的线程。每个线程访问MSSQL数据库。 我明白,我不能使用Win32::OLE,因为它不是线程安全的。 你可以建议我一些这样做的另一个合适的解决方案? 创建一个Windows服务,它将作为单线程访问数据库,Perl将使用此服务? 创建另一个Perl应用程序“server”,它将作为单线程应用程序访问DB,并且Perl线程将使用此服务? 使用

    -3热度

    1回答

    我在C++ Win32应用程序工作,我实现DragAndDrop操作,我可以能够从资源管理器中的文件和文件夹拖放到使用WndProc电话与WM_DROPFILES我的应用程序,现在我尝试从Win32应用程序到资源管理器的DragAndDrop文件和文件夹。 我写了一个示例代码,将文本从应用程序拖动到资源管理器,使用Karlsson’s Drag-and-Drop C图书馆工作正常,但我的要求是将文

    3热度

    1回答

    使用win32api require "Win32API" message = "This is a sample Windows message box generated using Win32API" title = "Win32API from Ruby" api = Win32API.new('user32', 'MessageBox',['L', 'P', 'P', 'L'],'

    0热度

    1回答

    我试图打开一个应用程序:Bluezone大型机模拟器采取一些措施来自动化一些使用Ruby的大型机进程。 我试图用Win32ole打开应用程序时遇到问题。这是我到目前为止的代码: require 'win32ole' class BluezoneRunner attr_reader :app def initialize @type = WIN32OLE_TYPE

    1热度

    1回答

    我通过Ruby WIN32OLE调用AutoItX在窗口中执行一些自动操作,遇到了必须从屏幕获取像素颜色并在msg框中显示颜色的场景。 Autoit没有内置的msgbox方法,因此必须通过包含外部文件来完成。 此,如下图所示在AutoIt的正常工作: #include <MsgBoxConstants.au3> Local $iColor = PixelGetColor(10, 100)

    0热度

    1回答

    我这个挣扎,有红色的很多文章显示它应该如何工作来修改Excel中,但我没有成功: 我的系统是Windows 7与Office 2016安装并激活。 我想用一个Excel文件作为模板进行修改并将其保存到一个新的位置。这里是我的代码: sub ExcelWriter { my $Template = "../templates/template.xls"; my $ExcelFil

    0热度

    1回答

    我有一个目录充满了Outlook .msg文件,我想处理它。 处理将打开文件并保存附件。 我已成功地使用Win32 :: OLE来处理Outlook文件夹中的邮件, 但这些都是磁盘上的文件。我如何打开磁盘上的msg文件并使用perl和Win32 :: OLE处理它 ? 限制:我在不允许在机器上安装任何东西的环境中工作。特别是,我不能添加其他程序或perl模块。我坚持使用全新安装的perl附带的模块

    0热度

    1回答

    我尝试在Excel工作表中插入公式=IF(D2="";"";COUNTIF(D:D;D2))。 这里是我想要的代码: $WorkSheet->Cells($Row2Use,'L')->{Formula} = "=IF(D".$Row2Use."=\"\",\"\",COUNTIF(D:D,D".$Row2Use.")"; # =IF(D2="";"";COUNTIF(D:D;D2)) 我也用{