如何在vb6中填充textarea

-1

我试图在网页中填写textarea。首先我打电话如何在vb6中填充textarea

site.navigate "www.mysite.com"

这里是我的代码为textarea改变内容：

Private Sub Command1_Click() 
    site.Document.All.Item("message").Value = "mycontent" 
End Sub

我也试过以下任一：

site.Document.All.Item("message").innerhtml = "mycontent" 

site.Document.All.Item.form("message").Value = "mycontent"

代码不会因为工作它是textarea，而不是input。

来源

2013-04-10 user1925151

你也可以显示相关的HTML吗？什么是'网站'？ – 2013-04-10 17:02:15

你可以在这里添加更多的细节吗？ HTML会很有用。 – 2013-04-12 00:14:56

我假设“网站”是标准的WebBrowser控件。尝试使用非标准属性innerText。它在Micorosft的VB浏览器控件中工作。

Private Sub Command1_Click() 
    site.Document.All.Item("message").innerText = "mycontent" 
End Sub

来源

2013-04-10 21:45:57 jac

我创建了一个简单的HTML的一部分：

<HTML> 
    <HEAD> 
     <TITLE>Test</TITLE> 
    </HEAD> 
    <BODY> 
     <FORM ID="Tart"> 
      <TEXTAREA ID="Lemon">Lots of text.</TEXTAREA> 
     </FORM> 
    </BODY> 
</HTML>

而且我可以很高兴地从我的浏览器控制<使用访问称为 “柠檬” textarea的WB >：

wb.Document.All.Item("Lemon").Value = "More Text."

...甚至...

wb.Document.All.Lemon.Value = "More Text"

也许你没有正确设置你的元素ID？

来源

2013-04-10 23:04:11

如何在vb6中填充textarea

回答

相关问题