2012-07-11 27 views
1

我想用vbscript加载一个页面。然后我在其输入字段中输入一些虚拟值并尝试提交它。Internet Explorer自动化表单文章

这里是它的代码:

Dim ie 
Set ie = WScript.CreateObject("InternetExplorer.Application") 
ie.navigate("http://somepage.com") 

ie.width = 900 
ie.height = 600 
ie.Visible = 1 

WScript.sleep(5000) 

'Home page of user is loaded. 
'Now find the field containing mobile number and type message 




    Dim nameField, messageField 
    set nameField = ie.document.getElementById("MobileNos")'this line throws error 
    nameField.value = "somebody" 

    messageField = ie.document.getElementById("Message") 
    messageField.value = "Hi" 

    'Sending the message 
    ie.document.frmpostcomment.submit() 

但每当我尝试运行该代码不发布评论,而是刚刚刷新页面。

在此先感谢。

回答

0

期间,我应该写

ie.document.frmpostcomment.submitbtn.click 

形式这为我工作的岗位。