如何在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

回答

相關問題