Vbscript Sendkeys不适用于Ajax WebEdit字段

您好，我面临在WebEdit字段中设置值的问题。我已经认出了那个物体。但无法在字段中设置值，因为该字段具有Ajax功能

Set WshShell = CreateObject("WScript.Shell")

                        Set webeditObj = webeditObject("class", "grid-dropdownbox", "index" , "0")
                        Browser(browserObj).Page(pageObj).WebTable(webtableObj).WebEdit(webeditObj).Click
                        Browser(browserObj).Page(pageObj).WebTable(webtableObj).WebEdit(webeditObj).Set refBook.Item("book")
                        wait(3)
                        WshShell.SendKeys "{DOWN}"
                        wait(1)
                        WshShell.SendKeys "{ENTER}"
                        wait(3)

我可以在输入框中看到值。但当转到下一个字段时，上一个字段的值将被清除

请帮忙

这个问题已经解决了

请参考下面的代码。但等待时间仍然不是100%确定。有时它会失败

Function setValue(browserObj, pageObj, webtableObj, webeditObj)
          Set WshShell = CreateObject("WScript.Shell")
          wait(3)
          WshShell.SendKeys "{DOWN}"
          wait(3)
          Browser(browserObj).Page(pageObj).WebTable(webtableObj).WebEdit(webeditObj).Click
          WshShell.SendKeys "{DOWN}"
          wait(5)
          WshShell.SendKeys "{ENTER}"
          wait(3)
End Function

---

在发送关键消息之前，也许你应该先把焦点放在网络编辑上。谢谢@PankajJaju！！！