diff options
author | Joachim Lingner <jl@openoffice.org> | 2002-08-06 11:47:52 +0000 |
---|---|---|
committer | Joachim Lingner <jl@openoffice.org> | 2002-08-06 11:47:52 +0000 |
commit | 3cff98445b2d370bf3c86d60a093009e574e4058 (patch) | |
tree | 92f46e83454bbb125329d10ae5c37210cbbfee6e /extensions/test/ole/ScriptTest.html | |
parent | db5c13e5034222efebff1af86f825743211a36a0 (diff) |
#102081#
Diffstat (limited to 'extensions/test/ole/ScriptTest.html')
-rw-r--r-- | extensions/test/ole/ScriptTest.html | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/extensions/test/ole/ScriptTest.html b/extensions/test/ole/ScriptTest.html index 1017b9a04706..9c1ee84977ba 100644 --- a/extensions/test/ole/ScriptTest.html +++ b/extensions/test/ole/ScriptTest.html @@ -648,7 +648,8 @@ Function runVBTest( Log) document.writeln("================================================================================<br>") document.writeln("VB Script<br>") document.writeln("================================================================================<p>") -Set factory= GetObject("", "com.sun.star.ServiceManager") +'Set factory= CreateObject("", "com.sun.star.ServiceManager") +Set factory= CreateObject("com.sun.star.ServiceManager") Set oletest= factory.createInstance("oletest.OleTest") Dim arrInt |