1--TEST-- 2Bug #33386 (ScriptControl only sees last function of class) 3--EXTENSIONS-- 4com_dotnet 5--SKIPIF-- 6<?php 7if (4 != PHP_INT_SIZE) print "skip MSScriptControl isn't available under x64"; 8?> 9--FILE-- 10<?php 11error_reporting(E_ALL); 12 13class twoFuncs { 14 public function func1() { echo " func one\n"; } 15 public function func2() { echo " func two\n"; } 16} 17 18try { 19 $ciTF = new twoFuncs; 20 21 $oScript = new COM("MSScriptControl.ScriptControl"); 22 $oScript->Language = "VBScript"; 23 24 $oScript->AddObject ("tfA", $ciTF, true); 25 foreach (array(1,2) as $i) { 26 $oScript->ExecuteStatement ("tfA.func$i"); 27 $oScript->ExecuteStatement ("func$i"); 28 } 29 $oScript->AddObject ("tfB", $ciTF); 30 foreach (array(1,2) as $i) { 31 $oScript->ExecuteStatement ("tfB.func$i"); 32 } 33} catch (Exception $e) { 34 print $e; 35} 36?> 37--EXPECT-- 38 func one 39 func one 40 func two 41 func two 42 func one 43 func two 44
