タイトル : IEの自動ログイン 投稿日 : 2015/04/10(Fri) 16:02 投稿者 : はなまるき
連投失礼します。 DB内にあるサイトのURL,LoginID,Passwordを登録しておき、 そのサイトをリストから選択すれば自動でログインできる ものを作成しています。 IE上のTextBoxに値を入れるコードは以下になります。 Public Sub IEInputTextbox(ByRef objIE As Object, str As String, Value As String) On Error Resume Next Dim objInput As Object Dim str1 As String For Each objInput In objIE.document.getElementsByTagName("Input") If InStr(1, objInput.outerHTML, str, vbTextCompare) <> 0 Then objInput.Value = Value Exit For End If Next End Sub あるサイトの結果として InputタグのouterHTML:objInput.outerHTML <input name="pass" class="inputText login" type="password"> 検索要素str :"pass" なのですが、instr関数の戻り値が0になります。 これはなぜでしょうか? TextBoxを特定するのにおいて、サイトによりnameを使うのかIDを使うのか まちまちであるためouterHTMLという大枠での検索にしています。 |