0

私はVBScriptまたはその問題に関するスクリプト作成に非常に慣れていません。

スクリプトで画像が読み込まれているかどうかを確認したい。以下は、私が行き詰まったところまでのスクリプトです。

strURL="https://www.Test.com/" 

strUser="******" 

strPass="******" 

Set oIE = WScript.CreateObject("InternetExplorer.Application","IE_")  
Timeout=20 'seconds  
oIE.visible=1 : BeginTimer = Timer  
oIE.Navigate strURL  
i=0 : bElementsLoaded=false  
Set CODA_Element_1 = Nothing
Do While (oIE.ReadyState<>4 Or Not(bElementsLoaded)) And i < Timeout  
WScript.Sleep(1000):i=i+1  
On Error Resume Next 

  Set CODA_Element_1 = oIE.Document.getElementById("user")
  Set CODA_Element_2 = oIE.Document.getElementById("password")
  Set CODA_Element_3 = oIE.Document.getElementById("next")


   If     (Not(CODA_Element_1 is Nothing)) Then  

    bElementsLoaded=true  

   End If 

On Error Goto 0  

Loop 

CODA_Element_1.value=strUser 
CODA_Element_2.value=strPass 
CODA_Element_3.Click()

ここから先はわかりません.... ロードされていることを確認したい画像は /codaprod/images/portal.jpg です

以下のソースコードのスニペットで

<DIV id="esisplitpanelower" class="scroller" style="height:100%; overflow:auto">
<TABLE cellpadding=0 cellspacing=0  height="100%" width="100%">
<TR><TD width="100%" height="100%"><TABLE cellpadding=0 cellspacing=0  height="100%" width="100%">
<TR><TD align="center" valign="top" width="100%" height="100%"><TABLE cellpadding=0 cellspacing=3  align="center" valign="top" height="100%" width="100%">
<TR><TD align="center" width="100%" height="100%"><TABLE cellpadding=0 cellspacing=3  align="center" height="100%" width="100%">
<TR><TD align="center"><IMG src="/codaprod/images/portal.jpg" title="Home Page">
</TD>
</TR></TABLE>
</TD>
</TR></TABLE>
</TD>
</TR></TABLE>
</TD>
</TR></TABLE>
</DIV>

この画像が読み込まれているかどうかを確認する方法を教えてください。ロードされたディスプレイmsgbox "Working!"とイメージがロードされていない場合msgbox "Not Working!"

4

2 に答える 2

0

1 つの方法は、<img>の onload() メソッドを使用することです。

<script type="text/vbscript">
sub loadImage()
  msgbox "Image is loaded"
end sub
</script>

<img src="anyold.gif" onload="loadImage">

W3Schools は同じものの JavaScript バージョンを提供します: http://www.w3schools.com/jsref/event_img_onload.asp

于 2013-06-04T21:21:00.633 に答える