Need help with win320le word interface

ruby-talk
1

I'm writing a report generator which uses word for formatting. In
expermeniting with win32ole this code works:

require 'win32ole'

w = WIN32OLE.new('Word.Application')
w.visible=TRUE
w.Documents.Add
doc=w.ActiveDocument
doc.Content.Font.Name = 'Arial'
doc.Content.Font.Size = 10
doc.Content.Font.Bold = TRUE
selection = w.selection
selection.typetext "Hello World"

However when I add this line to get the cursor positon:

curpos = selection.Information['wdHorizontalPositionRelativeToPage']

I get this error. does anyone know why? thanks for the help.

C:/PROGRA~1/Ruby/work/bell05/efo~7.rb:14:in `method_missing': Information
(WIN32OLERuntimeError)
    OLE error code:0 in <Unknown>
      <No Description>
    HRESULT error code:0x8002000e
      Invalid number of parameters. from
C:/PROGRA~1/Ruby/work/bell05/efo~7.rb:14

The offending command works when executed in VBWord.

2

Use the Object Inspector in VBA to see what is the numeric value of
wdHorizontalPositionRelativeToPage, and pass that in, instead of the
tag.

Win32OLE doesn't know about those constants or enumerations.

It's the same hoop to jump through with VBScript, too...

···

On 7/5/05, andyh47 <andyh@synplicity.com> wrote:

I'm writing a report generator which uses word for formatting. In
expermeniting with win32ole this code works:

require 'win32ole'

w = WIN32OLE.new('Word.Application')
w.visible=TRUE
w.Documents.Add
doc=w.ActiveDocument
doc.Content.Font.Name = 'Arial'
doc.Content.Font.Size = 10
doc.Content.Font.Bold = TRUE
selection = w.selection
selection.typetext "Hello World"

However when I add this line to get the cursor positon:

curpos = selection.Information['wdHorizontalPositionRelativeToPage']

I get this error. does anyone know why? thanks for the help.

C:/PROGRA~1/Ruby/work/bell05/efo~7.rb:14:in `method_missing': Information
(WIN32OLERuntimeError)
    OLE error code:0 in <Unknown>
      <No Description>
    HRESULT error code:0x8002000e
      Invalid number of parameters. from
C:/PROGRA~1/Ruby/work/bell05/efo~7.rb:14

The offending command works when executed in VBWord.

3

"andyh47" <andyh@synplicity.com> asked:

require 'win32ole'

...

curpos = selection.Information['wdHorizontalPositionRelativeToPage']

The above is not a correct translation of the VB code you are using:
    curpos = Selection.Information(wdHorizontalPositionRelativeToPage)

wdHorizontalPositionRelativeToPage is a constant integer whose value is 5.
(Try printing it or displaying it in a msgbox from Word/VBA.

Furthermore, Information has a required argument, and you need to pass that
as a Ruby argument rather than using the operator as you're doing here.

Try this:
    WdHorizontalPositionRelativeToPage = 5
    curpos = selection.Information(WdHorizontalPositionRelativeToPage)
or this:
    module Word; end # you can use whatever name you like instead of Word
    WIN32OLE.const_load(w, Word)
    curpos = selection.Information(WdHorizontalPositionRelativeToPage)

Cheers,
Dave

4

Thanks very much for your post and the one from Corey. The advice worked
like a charm. Thanks very much for your help.

"Dave Burt" <dave@burt.id.au> wrote in message
news:V%Cye.15665$oJ.2679@news-server.bigpond.net.au...

···

"andyh47" <andyh@synplicity.com> asked:

require 'win32ole'

...

curpos = selection.Information['wdHorizontalPositionRelativeToPage']

The above is not a correct translation of the VB code you are using:
   curpos = Selection.Information(wdHorizontalPositionRelativeToPage)

wdHorizontalPositionRelativeToPage is a constant integer whose value is 5.
(Try printing it or displaying it in a msgbox from Word/VBA.

Furthermore, Information has a required argument, and you need to pass
that as a Ruby argument rather than using the operator as you're doing
here.

Try this:
   WdHorizontalPositionRelativeToPage = 5
   curpos = selection.Information(WdHorizontalPositionRelativeToPage)
or this:
   module Word; end # you can use whatever name you like instead of Word
   WIN32OLE.const_load(w, Word)
   curpos = selection.Information(WdHorizontalPositionRelativeToPage)

Cheers,
Dave