VBA: Как установить значение для textarea в типе объекта internetexplorer.application

Question

Я пытался записать некоторый текст в элемент textarea формы aspnet, используя объект internetexplorer.application в макросе, используя VBA

Когда я добавляю часы к объекту после установки атрибута «Значение», я получаю текст, который настраиваю (используя MsgBox), но браузер, похоже, не получает текст, когда я отправляю его.

Я использую IE 8.0.6001 и Office 2003.

Любая помощь / комментарий будет очень признателен.

Спасибо

Sub Test2()

Dim Title As String
Dim Comments As String



Set wb = CreateObject("internetexplorer.application")
wb.navigate2 "http://tudrintra01/ads/Lists/Tasks1/NewForm.aspx?RootFolder=%2Fads%2FLists%2FTasks1&ContentTypeId=0x01030062FE73EDFA7DA644A27CE244EA983DA4&Source=http%3A%2F%2Ftudrintra01%2Fads%2FLists%2FTasks1%2FMyItems%2Easpx" 

wb.Visible = True

 Title = "TITULO PRUEBA"
 Comments = COMENTARIO PRUEBA" '"Comentario"


Do Until wb.readyState = 4 ' wait for page to load
 DoEvents
 Loop

    'Si el objeto es el Titulo del task
    wb.Document.getElementByID("ctl00_m_g_c0644918_3730_4e2c_8434_7b760939e3d4_ctl00_ctl04_ctl00_ctl00_ctl00_ctl04_ctl00_ctl00_TextField").Value = Title

    'Si el objeto es el Comment
    wb.Document.getElementByID("ctl00_m_g_c0644918_3730_4e2c_8434_7b760939e3d4_ctl00_ctl04_ctl14_ctl00_ctl00_ctl04_ctl00_ctl00_TextField").Value = Comments



    ' Clean up
    Set wb = Nothing

End Sub

Answer 1

Вы не получили ответа в течение нескольких дней, поэтому я прокомментирую ваш вопрос сейчас. Я успешно автоматизировал IE через объект WebBrowser, а не через объект Internetexplorer.Application. Webbrowser не откроет экземпляр приложения IE, а просто «окно документа» в элементе управления Webbrowser в форме в приложении Access. Поэтому, если вы не используете Access или по какой-либо другой причине, это может быть не очень полезным для вас.

Это не ответ на ваш вопрос, поэтому я ждал некоторое время, чтобы дать свой комментарий, но это мой лучший комментарий, и я сделал все возможное с моделью DOM через объект wb и никогда не сталкивался с такой проблемой, как ваша не мог решить. Так что вы можете попробовать переписать свой саб с использованием веб-браузера.