[RESOLVED] Can't post to <textarea> tag name

**teamster** · Jul 13th, 2015, 08:40 PM

I get this from the source code:

HTML Code:

        <div class="row-fluid">
				    <div class="span12 ">
					    <div class="control-group">
						    <label class="control-label" for="firstName">Description</label>
						    <div class="controls">
							    <textarea class="m-wrap span12 wysiwyg" style="height:300px;" id="listing_description" name="listing_description">

							    </textarea>
						    </div>

I get this from firebug:

HTML Code:

<label class="control-label" for="firstName">Description</label>
<div class="controls">
<div class="redactor_box">
<ul id="redactor_toolbar_0" class="redactor_toolbar">
<iframe frameborder="0" style="width: 100%; min-height: 200px; height: 400px;">
<html>
<head>
</head>
<body contenteditable="true" dir="ltr">
<p></p>                                                      'NOTE: This is where manual typing appears
</body>
</html>
</iframe>
<textarea id="listing_description" class="m-wrap span12 wysiwyg" name="listing_description" style="height: 300px; display: none;" dir="ltr"> </textarea>

My source code looks like this:

Code:

        If (WebBrowser1.Document IsNot Nothing) Then
            Dim Elems As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("textarea")

            For Each elem As HtmlElement In Elems
                Dim NameStr As String = elem.GetAttribute("id")
                If NameStr = "listing_description" Then elem.SetAttribute("value", Form1.TextBoxReturns.Text & Form1.TextBoxExtra.Text)
            Next
        End If

Doesn't work. I even tried this...

Code:

        If (WebBrowser1.Document IsNot Nothing) Then
            Dim Elems As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("iframe")

            For Each elem As HtmlElement In Elems
                Dim NameStr As String = elem.GetAttribute("style")
                If NameStr = "width: 100%; min-height: 200px; height: 400px;" Then elem.SetAttribute("value", Form1.TextBoxReturns.Text & Form1.TextBoxExtra.Text)
            Next
        End If

No results either. What am I not doing?

**Edgemeal** · Jul 13th, 2015, 09:06 PM

For frames I use something like,...

Code:

Dim Elems As HtmlElementCollection = WebBrowser1.Document.Window.Frames("frame_name").Document.GetElementsByTagName("tag_name")

**teamster** · Jul 13th, 2015, 09:24 PM

I would too, but there is no name for this iframe.

**Edgemeal** · Jul 13th, 2015, 09:41 PM

Maybe loop thru the Frames collection and find out where it is in the array, , something like in post #5...
http://www.vbforums.com/showthread.p...=1#post4271135

**teamster** · Jul 13th, 2015, 10:07 PM

Well, this didn't work. It is at index 0 though, without a doubt. There are 4 frames on the page, and only one has no name or id.

Code:

 WebBrowser1.Document.Window.Frames(0).WindowFrameElement.InnerHtml =  Form1.TextBoxReturns.Text & Form1.TextBoxExtra.Text

**teamster** · Jul 13th, 2015, 10:19 PM

Success. This worked.

Code:

        Dim upperHTML As String = "<body contenteditable='true' dir='ltr'><p>"
        Dim lowerHTML As String = "</p></body>"

        'listing_description
        WebBrowser1.Document.Window.Frames(0).WindowFrameElement.OuterHtml = upperHTML & Form1.TextBoxReturns.Text & Form1.TextBoxExtra.Text & lowerHTML

Now I just have to format everything to html.

Thread: [RESOLVED] Can't post to <textarea> tag name

Thread Tools

Display

[RESOLVED] Can't post to <textarea> tag name

Re: Can't post to <textarea> tag name

Re: Can't post to <textarea> tag name

Re: Can't post to <textarea> tag name

Re: Can't post to <textarea> tag name

Re: Can't post to <textarea> tag name

Tags for this Thread

Posting Permissions