提醒：從Excel VBA

在Internet Explorer訪問PHP對象我想要自動化的Excel上傳過程中，我們必須爲我們的數據倉庫。從Excel VBA中，我啓動一個IE會話到我們的數據倉庫>用我的憑證登錄>然後導航到要上傳的頁面，但這是我遇到問題的地方。提醒：從Excel VBA

瀏覽這個網站的時候，它在PHP中被編碼的URL不會改變，我相信。因此，我需要點擊具體圖片 - 但我不知道如何。

在我的代碼下面，我將自己的意見和調試時我收到錯誤消息。我還添加了網站圖片，我嘗試點擊的按鈕，並檢查了元素。請提前幫忙，謝謝大家！ < 3堆棧溢出！

簽名，道鮮

Private Sub CommandButton2_Click() 
Dim objIE As InternetExplorer 
Dim aEle As HTMLLinkElement 
Dim ele As Object 
Dim y As Integer 
Dim result As String 

Set objIE = New InternetExplorer 
objIE.Visible = True 
objIE.navigate "http://kpionline.bitam.com/english/memberlogin.php" 
Do While objIE.Busy = True Or objIE.readyState <> 4: DoEvents: Loop 
objIE.document.getElementById("user_name").Value = "[email protected]" 'not real 
objIE.document.getElementById("user_pwd").Value = "Bimbo2017" 'not real 
objIE.document.getElementById("Login").Click 
Do While objIE.Busy = True Or objIE.readyState <> 4: DoEvents: Loop 
objIE.navigate "https://kpionline7.bitam.com/artus/genvi_test/LoadStage.php?txtRepositorio=fbm_bmd_0030&txtUser=xxxxxxx&txtPassword=xxxxx" 
Do While objIE.Busy = True Or objIE.readyState <> 4: DoEvents: Loop 

'************************************************************************** 
'How do I click this icon??? 

    objIE.document.getElementById("ENL8").getElementsByTagName("img")(0).Click 
    Do While objIE.Busy = True Or objIE.readyState <> 4: DoEvents: Loop 

'Please see image for php/js website code 
'ERROR: Run-time error '424': Object required 
'************************************************************************** 

objIE.Quit 
End Sub

來源

2017-07-28 Doug Fresh

您可以對應該點擊圖片就行了破發點？然後放置一個手錶，除了'.Click'之外，看看它的範圍是否正確。 – nbayly

嘗試objIE.document.getElementById("ENL8").Click

來源

2017-07-28 21:13:33 jsotola

相同的運行時錯誤msg .... :( –

提醒：從Excel VBA

回答

相關問題