[#23805] net/smtp — 佐藤 大輔 <densuke@...2.so-net.ne.jp>

佐藤です。

26 messages 2000/07/12
[#23806] Re: net/smtp — matz@... (Yukihiro Matsumoto) 2000/07/12

まつもと ゆきひろです

[#23808] Re: net/smtp — 佐藤 大輔 <densuke@...2.so-net.ne.jp> 2000/07/12

佐藤です。

[#23809] Re: net/smtp — matz@... (Yukihiro Matsumoto) 2000/07/12

まつもと ゆきひろです

[#23811] Re: net/smtp — Minero Aoki <aamine@...> 2000/07/12

あおきです。

[#23812] Re: net/smtp — matz@... (Yukihiro Matsumoto) 2000/07/12

まつもと ゆきひろです

[#23890] Ruby Entry Package and cygwin1.dll — Noritsugu Nakamura <nnakamur@...>

25 messages 2000/07/18
[#23895] Re: Ruby Entry Package and cygwin1.dll — WATANABE Hirofumi <eban@...> 2000/07/18

わたなべです.

[#23896] Re: Ruby Entry Package and cygwin1.dll — Noritsugu Nakamura <nnakamur@...> 2000/07/18

[#23897] Re: Ruby Entry Package and cygwin1.dll — Katsuyuki Komatsu <komatsu@...> 2000/07/19

小松です。

[#23898] Re: Ruby Entry Package and cygwin1.dll — WATANABE Hirofumi <eban@...> 2000/07/19

わたなべです.

[#23899] Re: Ruby Entry Package and cygwin1.dll — Katsuyuki Komatsu <komatsu@...> 2000/07/19

小松です。

[#23923] Re: [ruby-dev:10353] Re: should prohibit `module_function' for class Class — Masatoshi SEKI <m_seki@...>

11 messages 2000/07/19

[#23940] String#unpack と scanf の関係 — kiwamu <kiwamu@...>

こんにちは。岡部@東京都立大学と申します。

16 messages 2000/07/20

[ruby-list:24042] Re: win32ole

From: Koji Arai <JCA02266@...>
Date: 2000-07-29 06:06:28 UTC
List: ruby-list #24042
新井です。

From: arton <arton@geocities.co.jp>
Date: 29 Jul 2000 03:13:42 +0900
Subject: [ruby-list:24040] Re: win32ole

> artonです。
> 
> win32oleのconst_loadを使用すればできます。

おっ、そんな便利なものがありましたか。
昔、win32ole-0.0.4 を使ったときもないのかなぁっと思ってたのですが、
今はドキュメントにもちゃんと書いてますね。失礼しました。
# 読んでも使い方わからなかったかも(^^;

毎回ロードしてると時間がかかる処理のようですので、以下のスク
リプトで一旦ファイルに出力して、それを require することにし
ました。

#!/usr/local/bin/ruby

require 'win32ole'
class WIN32OLE
  module Constants
  end
end

WIN32OLE.const_load(WIN32OLE.new('Word.Application'),
		    WIN32OLE::Constants)

print <<END
class WIN32OLE
  module WORD_CONST
END
WIN32OLE::Constants.constants.each {|v|
  print '    ', v, ' = ', eval("WIN32OLE::Constants::#{v}"), "\n"
}
print <<END
  end
end
END

word.Quit

exit

どうも、ありがとうございました。

ところで、2つめの質問です。

#!/usr/local/bin/ruby -Ks	# -*- Coding: sjis-dos -*-

require 'win32ole'

word = WIN32OLE.new('Word.Application')
word.visible = true
doc = word.Documents.Add
doc.Activate
p doc.name
word.Selection.InsertBefore("テスト")
# doc.Close
# word.Quit

を実行すると、Wordに

テスト□

などと出力されます。最後の"□"(実際は小さい四角、なにかよく
わからないコードです)がなぜでてくるのかわからないんですがな
んでしょこれ。VBで単純に Selection.InsertBefore("テスト") し
てもこうはなりません。

仕方ないので

word.Selection.InsertBefore("テスト")
word.Selection.Collapse WdCollapseEnd
word.Selection.Delete WdCharacter, -1

などとして凌いでます(これで定数が必要だったわけでした)。

Windows98 Second Edition 4.10.2222 A で、
Word 97 です。

よろしくお願いします。

--
新井康司 (Koji Arai)

In This Thread