WSHでフォームの自動入力をするサンプルスクリプトを教えてください。

回答の条件
  • URL必須
  • 1人2回まで
  • 登録:2005/08/09 11:17:20
  • 終了:--

回答(2件)

id:niwatorisan No.1

niwatorisan回答回数9ベストアンサー獲得回数02005/08/09 11:50:00

ポイント25pt

http://www.hatena.ne.jp/1123553840#

人力検索はてな - WSHでフォームの自動入力をするサンプルスクリプトを教えてください。

WSHではなくrubyでしたら知っています。

以下はYahooにログインするスクリプトです。WSHでないのでポイントはいりません。


require ’win32ole’


ie = WIN32OLE.new(’InternetExplorer.Application’)

ie.Navigate(”http://login.yahoo.co.jp/config/login?.src=www&partner=&...”)

ie.Visible = true

while ie.busy

sleep 1

end


loginid = ie.document.all.Item(”login”)

loginid.Value = ”xxxx”


passwd = ie.document.all.Item(”passwd”)

passwd.Value = ”xxxx”


g = ie.document.all.Item(type=”.save”)

g.click()


while ie.busy

sleep 1

end

id:robin04 No.2

robin04回答回数8ベストアンサー獲得回数02005/08/09 13:10:58

ポイント25pt

http://www.atmarkit.co.jp/fwin2k/operation/wsh01/wsh01_01.html

@IT:運用 Windows管理者のためのWindows Script Host入門 第1回 WSHの内部構造 1.Windows管理にWSHを活用しよう

URLはWSHの参考ページです。


フォームというのが何のフォームか分からないので正確な解答ではないかもしれませんが、何かしらWSHで入力したいということであれば、以下のスクリプトは参考になるでしょうか?

(ワードパッドを開いて、文章を入力するだけのものです。はずしていたらポイント不要です。)


---- 以下、サンプル ----

Dim WSHShell

Set WSHShell = WScript.CreateObject(”WScript.Shell”)

WSHShell.Run ”wordpad.exe”


WScript.Sleep(1000)

WSHShell.SendKeys(”Write Anything you like”)

WScript.Sleep(1000)

WSHShell.Popup ”Complete !!”,0,”Sample Script”,vbInformation

----

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません