Improve company productivity with a Business Account.Sign Up

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 352
  • Last Modified:

i AM TRYING TO FILL THIS WEBSITE TEXT BOX WITH WEB CONTROL I HAVE TRYED MANY TASK AND NONE OF THEM WORK CAN ANY ONE HELP ME

i AM TRYING TO FILL THIS WEBSITE TEXT BOX WITH WEB CONTROL I HAVE TRYED MANY TASK AND NONE OF THEM WORK CAN ANY ONE HELP ME THIS VB 6
<LABEL><font class='protrace_text'>PRO TRACE</FONT></LABEL><br>      <INPUT TYPE='text' SIZE=8 NAME='wpronumb' >

Open in new window

WEBSITE-TEXT-BOX.bmp
0
1030071002
Asked:
1030071002
  • 6
  • 5
1 Solution
 
GMGeniusCommented:
Not sure I understand
Maybe you can list what you have tried?
0
 
1030071002Author Commented:
i am tring to fill that text box with data for example "354654"
using control functions like these
example i have tryed these i did change the parends
WebBrowser.Document.forms.item(0).elements("field1").value = "myvalue"
For Each htmle In Browser.document.GetElementsByTagName("Input")
Select Case htmle.Name
Case "date"
'enter some data into the input field
htmle.InnerText = "160707"
Case "callsign"
htmle.InnerText = "QW12"
End Select
poststring = poststring & htmle.Name & "=" & htmle.InnerText & "&"
Next
webBrowser1.Document.GetElementById("FirstName").SetAttribute("value", "John")
 
 

 
0
 
1030071002Author Commented:
Okay I found out I cant get by id so i am trying to get by
getElementsByTagName
please help
 
<CENTER>
<TABLE WIDTH="70%">
<TR>
  <TD ALIGN='RIGHT'><B> Probill  #1:</B></TD>
  <TD><INPUT TYPE='text' NAME='wpro1' VALUE = '' SIZE=10></TD>
  <TD ALIGN='RIGHT'><B> Probill  #2:</B></TD>
  <TD><INPUT TYPE='text' NAME='wpro2' VALUE = '' SIZE=10></TD>
  <TD ALIGN='RIGHT'><B> Probill #3:</B></TD>
  <TD><INPUT TYPE='text' NAME='wpro3' VALUE = '' SIZE=10></TD>
</TR>
0
Get 10% Off Your First Squarespace Website

Ready to showcase your work, publish content or promote your business online? With Squarespace’s award-winning templates and 24/7 customer service, getting started is simple. Head to Squarespace.com and use offer code ‘EXPERTS’ to get 10% off your first purchase.

 
1030071002Author Commented:
Tagname ----> tbody

http://64.80.57.250/cgi-bin/cgiip.exe/Wservice=wsbroker1/logo-frame.r?language=&seskey=kimIbpiulRfgbdba"

<input type="text" name="wpro1" size="8">


<input type="text" name="wpronumb" size="8">

0
 
GMGeniusCommented:
What development application are you using?
VB.NET or VB6?
0
 
1030071002Author Commented:
any one does not matter
 
0
 
GMGeniusCommented:
I have test application (sorry cant post it here) that allows me to inspect all open web browser windows and read the forms and elements
I know what your trying to do so here are some pointers
I have added the "Microsoft HTML Object Library" to the project "MSHTML.TLB"
You can work fast with the elements if you break it down to so variables but you dont have to
eg:
    Dim oDocument   As HTMLDocument
    Dim oForm       As HTMLFormElement
    Dim oFormInput  As HTMLInputElement
    Dim oFormSelect As HTMLSelectElement
    Dim oFormArea   As HTMLTextAreaElement
    Dim oFormButton As HTMLInputButtonElement
Then you can break down each element of the document to the variables to inspect them alot easier
eg:
Set oDocument = WebBrowser.Document
Set oForm = oDocument.Forms.Item(0)   ' assign to the first form in the document
 debug.print oForm.item("userid").value
or alter a value in the form
oForm.item("userid").value = "12345"
0
 
GMGeniusCommented:
If oForm.Item("userid").nodeName = "INPUT" Then
Set oFormInput = oForm.Item("userid")
oFormInput.id
oFormInput.type
oFormInput.value
0
 
GMGeniusCommented:
I posted my source on a public site so you can download and play with it from there
http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=60699&lngWId=1
 I built this some time ago but it should work fine
0
 
1030071002Author Commented:
lhjbgvkhjb
0
 
1030071002Author Commented:
.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Easily Design & Build Your Next Website

Squarespace’s all-in-one platform gives you everything you need to express yourself creatively online, whether it is with a domain, website, or online store. Get started with your free trial today, and when ready, take 10% off your first purchase with offer code 'EXPERTS'.

  • 6
  • 5
Tackle projects and never again get stuck behind a technical roadblock.
Join Now