| 楼主 水星钓鱼 |
Q：如何判断是否已经登录了ET？ A：运行以下代码可以判断是否已经登录ET。 Sub xyf() On Error Resume Next Dim oIE Set oIE = CreateObject("internetexplorer.application") oIE.navigate " Do Until oIE.ReadyState = 4 DoEvents Loop oIE.Document.getElementById ("ls_username") If Err.Number <> 0 Then MsgBox "请先登陆ET" Else MsgBox "您已登录ET" End If End Sub |
| 2楼 jackenjun |
强啊，楼主！ |
| 3楼 海洋之星 |
水星，厉害，如果把代码规范一下，我加分 |
| 4楼 wise |
 学习一下 |
| 5楼 芐雨 |
 |