|
りすりすさん、ありがとうございます。
>MENU1.SelectMenu(1);
>じゃないの?
どうも、ログオンした後の記述が不明です
(というか、理解せずに使っているのが・・・)。
Sub ie_logon()
Dim objIE As InternetExplorer
Dim objFRAME As FramesCollection
Dim objDOC As IHTMLDocument
Set objIE = CreateObject("InternetExplorer.application")
objIE.Visible = True
objIE.navigate "http://www.***.co.jp/" 'すいませんm(__)m
Call IEwait(objIE)
Set objFRAME = objIE.document.frames
Set objDOC = objFRAME(0).document
With objDOC
.all.loginName.Value = ID
.all.password.Value = PASS
.forms("login").submit
End With
Call IEwait(objIE)
' objIE.Quit
Set objDOC = Nothing
Set objFRAME = Nothing
Set objIE = Nothing
End Sub
ログオン後、どのように繋いでいけばいいのでしょうか?
お手数おかけしますが、よろしくお願いします。
|
|