Help for this page

Select Code to Download


  1. or download this
    $word = Win32::OLE->GetActiveObject('Word.Application')
         || Win32::OLE->new('Word.Application');
    $mydoc = $word->Documents->Open($xfile);
    
  2. or download this
    use Win32;
    use Win32::OLE;
    ...
    use Win32::OLE::Const 'Microsoft Word';
    use Win32::OLE::Const 'Visual Basic For Applications';
    use Win32::OLE::Variant;