#39930 [Opn->Fbk]: Error passing Word macro arguments

ID: 39930 Updated by: edink@php.net Reported By: poon dot fung at gmail dot com -Status: Open +Status: Feedback Bug Type: COM related Operating System: Windows XP PHP Version: 5.2.0 New Comment: Please try using this CVS snapshot: http://snaps.php.net/php5.2-latest.tar.gz For Windows: http://snaps.php.net/win32/php5.2-win32-latest.zip Previous Comments: ------------------------------------------------------------------------ [2006-12-22 07:34:47] poon dot fung at gmail dot com Description: ------------ I can call a Word macro without any argument ok. But when I pass a string arguement to a Word macro, I get the following exception. Source: Unknown Description: Unknown I discovered the following problem: 1. It works when a macro does not have argument. The macro can be in the default macro file "Module/NewMacros" or other module file such as "Module/MyMacros". 2. It works when a macro has one or more arguements when the macro is in default macro file "Module/NewMacros". It does not work when the same macro is copied to a different module file such as "Module/MyMacros". Reproduce code: --------------- <?php // C:\testme.doc is any Word document $word = new COM('Word.Application') or die('Start Word automation failed.'); $word->Documents->Open('c:\testme.doc'); $arg1 = 'Some value'; // First test --> This works fine //$word->Application->Run('phptest1'); // Second test --> This works fine //$word->Application->Run('phptest2', $arg1); // Third test --> This works fine //$word->Application->Run('phptest3', $arg1, $arg1); // Forth test --> This works fine //$word->Application->Run('Normal.MyMacros.phptest1'); // Fifth test --> FAILED $word->Application->Run('Normal.MyMacros.phptest2', $arg1); // Sixth test --> FAILED //$word->Application->Run('Normal.MyMacros.phptest3', $arg1, $arg1); $word->Quit(); $word = null; /* // Word macros Sub phptest1() End Sub Sub phptest2(arg1 As String) End Sub Sub phptest3(arg1 As String, arg2 As String) End Sub */ ?> Expected result: ---------------- To run the test: 1. Create a dummy Word document C:\testme.doc". 2. Copy the three dummy procedures (phptest1, phptest2 and phptest3) to Word's macro file "Normal/Module/NewMacros". 3. Create a new macro file "Normal/Module/MyMacros" and paste the same three procedures in it. 4. Uncomment the line after each test case and keep lines for other test cases commented. 5. Run each test case. Case 1-4: No output. Just finish without error. Case 5-6: Show the error below. Actual result: -------------- PHP Fatal error: Uncaught exception 'com_exception' with message 'Source: Unknown Description: Unknown' in C:\bug2.php:21 Stack trace: #0 C:\bug2.php(21): variant->Run('Normal.MyMacros...', 'Some value') #1 {main} thrown in C:\bug2.php on line 21 ------------------------------------------------------------------------ -- Edit this bug report at http://bugs.php.net/?id=39930&edit=1