SetAttribute拒绝使用TextArea?

时间:2014-08-23 07:30:22

标签: vb.net visual-studio-2012

嗨,新来的,所以我尽量保持具体,但如果不是,请告诉我,我会在下面提供更多信息。 :)

我目前正在为游戏ROBLOX制作一个自动发送邮件的发件人,之前我已经开始工作了,但他们最近改变了界面,基本上整个网站的设计/构建都破了,我就遇到了一个问题。

所以我熟悉SetAttribute,以及它在更新之前使用的内容。但显然有些东西在这里不起作用

我目前有这个:

    Private Sub connect_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles connect.DocumentCompleted
        Try
            connect.Document.GetElementById("subject").SetAttribute("value", Form1.subject.Text)
            connect.Document.GetElementById("body").SetAttribute("value", Form1.enter.Text) ' This is the line I'm having issues with
            connect.Document.GetElementById("send-btn").InvokeMember("click")
        Catch ex As Exception
            MsgBox(ErrorToString())
        End Try
    End Sub
End Class

主题行和按钮工作正常,但它没有填写TextArea以进入"输入"

这是ROBLOX网站上textarea的代码,记住我不能在那里工作,所以我无法改变它以满足我的需求。

<textarea rows="2" cols="20" id="body" class="messages-reply-box text-box text" style="padding:5px;width:675px;"></textarea>

所以我不太确定为什么它不起作用,我的ID是正确的,它适用于其他文本框(主题)

这是Visual Basic,仅供参考。

1 个答案:

答案 0 :(得分:0)

&#34;价值&#34; textarea的属性不是属性,而是textarea元素的InnerText(HtmlElement.InnerText property)(值在开始和结束标记之间)。

更改

connect.Document.GetElementById("body").SetAttribute("value", Form1.enter.Text)

connect.Document.GetElementById("body").InnerText = Form1.enter.Text