Visual Basic :: How Can I Obtain The Screen Position Of A Webbrowser Element?

Finding All Links Absolute Position X,Y Relatively To The Screen In VB6 WebBrowser
Finding all links absolute position X,Y relatively to the screen in VB6 WebBrowser
There is a Visual Basic 6 application with WebBrowser in it.
This application is about statistical information on what html tags were loaded, where they are being located - it's position X,Y

For example I want to find Document.getelementsbytagname("a") link and anchor position on the screen, how do I do it?
There is example in JS, that I could inject into webpage by scriptcontrol but could I do in in VB6 itself?
function getElementPosition(elemId)
{
var elem = document.getElementById(elemId);

var w = elem.offsetWidth;
var h = elem.offsetHeight;

var l = 0;
var t = 0;

while (elem)
{
l += elem.offsetLeft;
t += elem.offsetTop;
elem = elem.offsetParent;
}

return {"left":l, "top":t, "width": w, "height":h};
}

Trying by vb6 in webbrowser

Dim WithEvents doc As HTMLDocument
Dim elem As IHTMLElement
Set doc = ie.document

For x = 0 To doc.getElementsByTagName("a").length - 1

Set elem = doc.getElementsByTagName("a")(x)

I want convert this nonsense
'"-PParent=" & elem.offsetParent.offsetParent.tagName & "=" & elem.offsetParent.offsetParent.id & _
'"-3Parent=" & elem.offsetParent.offsetParent.offsetParent.tagName & _
'"-4Parent=" & elem.offsetParent.offsetParent.offsetParent.offsetParent.tagName & _
'"-4Parent=" & elem.offsetParent.offsetParent.offsetParent.offsetParent.id

To while loop, but I can't figure it out how

While (TypeOf elem Is IHTMLElement)
parentall = "-Parent Tag=" & elem.offsetParent.tagName & _
elem.id & ",l=" & elem.offsetLeft & ";t=" & elem.offsetTop & _
Set elem = elem.offsetParent
Wend

Next x

Finding All Links Absolute Position X,Y Relatively To The Screen In VB6 WebBrowser
Finding all links absolute position X,Y relatively to the screen in VB6 WebBrowser
There is a Visual Basic 6 application with WebBrowser in it.
This application is about statistical information on what html tags were loaded, where they are being located - it's position X,Y

For example I want to find Document.getelementsbytagname("a") link and anchor position on the screen, how do I do it?
There is example in JS, that I could inject into webpage by scriptcontrol but could I do in in VB6 itself?
function getElementPosition(elemId)
{
    var elem = document.getElementById(elemId);

    var w = elem.offsetWidth;
    var h = elem.offsetHeight;

    var l = 0;
    var t = 0;

    while (elem)
    {
        l += elem.offsetLeft;
        t += elem.offsetTop;
        elem = elem.offsetParent;
    }

    return {"left":l, "top":t, "width": w, "height":h};
}

Trying by vb6 in webbrowser

Dim WithEvents doc As HTMLDocument
Dim elem As IHTMLElement
Set doc = ie.document

For x = 0 To doc.getElementsByTagName("a").length - 1

Set elem = doc.getElementsByTagName("a")(x)

I want convert this nonsense
'"-PParent=" & elem.offsetParent.offsetParent.tagName & "=" & elem.offsetParent.offsetParent.id & _
'"-3Parent=" & elem.offsetParent.offsetParent.offsetParent.tagName & _
'"-4Parent=" & elem.offsetParent.offsetParent.offsetParent.offsetParent.tagName & _
'"-4Parent=" & elem.offsetParent.offsetParent.offsetParent.offsetParent.id

To while loop, but I can't figure it out how

While (TypeOf elem Is IHTMLElement)
parentall = "-Parent Tag=" & elem.offsetParent.tagName & _
elem.id & ",l=" & elem.offsetLeft & ";t=" & elem.offsetTop & _
Set elem = elem.offsetParent
Wend

Next x

Webbrowser -> Element Exists ?
I am using Webbrowser control to fill few values from database.

VB Code:
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant) Dim HTML As HTMLDocument If (pDisp Is WebBrowser1.Application) Then Set HTML = WebBrowser1.Document HTML.All.Item("User").Value = "userid" End if end sub

In the document complete event i am filling up few text box values.

Is there any way to check if the element exists in the page or not ?

For example only if the "User" element is found i need to fill the value.

Please help..

How Can You Scroll To A Precise Element Using A Webbrowser?
Anyone know?

Webbrowser INPUT Type=image Element
How can I call these object in webbrowser I have tried webbrowser1.document.forms(0)(4).value but no action or result return.

example of the object

<input type="image" name="Login" src="/images/button_login_01.gif" title="Login" /> <img src="/images/button_cancel_01.gif" title="Cancel" onclick="Effect.Fade('loginbox',{duration:0.0});" />

I have tried also webbrowser1.document.all("Login").value and still don't work

How To Check Whether Or Not An Element Exists (WebBrowser Object)
Nice title, I know .

Problem is as follows: I've got a nice WebBrowser object (wbBrowser), which I set to retrieve a webpage. That works fine. Next I want to get the content of a DIV-element with the ID "status". I accomplished that with the following code:

Code:
MsgBox (wbBrowser.Document.getElementById("status").innerHTML)

It works. But what if the element "status" does not exist? I get a "Run-time error '91': Object variable or With block variable not set". Is there a quick way to check if the given Element ID exists?

[btw, this is VB6 with VS Sp6 installed, working on a WinXP SP2 machine]

How Can You Msgbox The Form, Frame, Etc (location) Of An Element. (hard Webbrowser Q)
In a webbrowser, how would you msgbox the form, frame, and other information as to the location of an element in a webbrowser?

for example, i have an html input box in a frame loaded in a webbrowser. When i click the input box, how would i msgbox the form and frame it is located in?

How To Find Out Which Element Is Selected In Webbrowser Control Whilst In Designmode
Hi

How do you find out which element the user has selected in edit mode?

I'm using mshtml.tlb and webbrowser. The info for the dhtml activex control is no use as the methods etc for the mshtml object library are different. I have implemented almost all of the functions through playing with script so even a script example (VB) would be a great help.

Thanks in advance!

How To Obtain Users Screen Size Then Make That The Forms Size
i want to form load my form to fit the size of the users screen.. so make the height and width = to the screens height and width.. whats the easiest way?

also for components inside the form. like if i resized the form i want the components to stay the same size and resize with it?? i know it has something to do with scaleheight..ect..

thanks

Screen Position?
Hi..
How i can retain the position of my application on screen.. like whenever i open up my application (like MSN Messenger), and move it into the screen across screen... on desktop... then i exit it.. if i open a program again, how i can open it to a same place in desktop it was closed?

Position On Screen
Hi,

When the user selects any cell in column #2 in my Data Grid control I want a combo box to be placed in the exact position of that cell (same left, top, height, width as the cell clicked).

I already know how to make the combo box appear at the same left, height, and width, but I cant figure out how to make it appear at the right top (y-axis position).

How do you find out the top position of the current row the user is currently in???

Thanx

Screen Position
I have compiled a program every time it starts up it is in the bottom right hand corner of the screen.
Is there a way of making it start into a full screen every time ?

Last One I Promise - Screen Position
Didnt know if this was "graphics" or not - so i stuck it in here..

I want an object (textbox, picture, whatever) displayed at the top right corner of my form (in fullscreen). My problem is that I am using a large monitor. If a user has a smaller monitor, it cuts off part of the picture, or doesnt show it at all. How can I code it to position itself at the top right corner????

How do I also make it display center screen?

Form Screen Position
I am wanting to detect (ie. fire an event) when a user has finished moving a form around the screen. I want the user to be able to click on the capiton bar, move the form and then when the form has finished moving output the new form co-ordinates in a message box or debug window. I can gather the co-oridinates before but getting them after is the problem. Any ideas?

Starting Screen Position
When I run my VB Program the bottom is cut off by the monitor and I have to move it up. Is there any way to set the program to automatically open at the top of the screen instead of the middle?

Get The Screen Position Of The Cursor
Hi

I am trying to find a way to make the mouse cursor move to the keyboard cursor position in an application. For example, I use an application called Enterprise Guide, and I control this application using Dragon naturally speaking as I have a disability that makes using the keyboard quite difficult.

I often have to say the name of an object to make to be the active or highlighted object. However to do something such as drag and drop in Dragon NaturallySpeaking , I need to have the mouse at the same position that I want to drag from.

I know there are functions such as GetCursorPos - but this appears only to work in terms of the mouse position. What I would like to do is to find the coordinates of the current active highlighted object. An example of this could be, in windows explorer, if your mouse position is on the right-hand side of your screen, but you have a folder highlighted in the left pane. How could you move the mouse cursor to the location where the highlighted object is?

I would appreciate any suggestions, or any links to any sites that may assist me.

Thank you for your help

Doug

How To Position The VB Exe At The Center Of The Screen Always?
Dear All,

When I double click an VB exe, I want the form EXE should always appear at the center of the screen rather than randomly appear each time when I click the exe to lauch the application.
I 've tried form layout window to position the screen center. But first few times it looks ok, if I close and open the same exe for a couple of times, its postition started moving diagnally down little bit and starting from left top again.

Please advise me for the above issue.

Regrads
N.Surendran

Screen Position Of The InputBox
I'm using VB6 Prof. When you call the InputBox it appears centered in the screen but it covers part of my Control Array of Check Boxes, making it difficult for the user to see just what to select. Is there any way to move this InputBox Down into the lower right hand section of the screen? If I could changel the "Top" and "Left" properties it would do it. Thanks in advance for any help. JungleJim.

Control Position On Screen
Any fast way to find a controls screen position other then getting the Left value of each parent all the way down to the form?

I want to replace the pixels in my picture box with the pixels of the DesktopDC but i gotta figure out the pixel position.

Mouse Position In Screen
(1) I need to detect mouse position on the screen.

(2) I also need to find out whether you are dragging the mouse.

I guess you need to use a API function for that.

Can u tell me how this is done……

Janaka.

Position Form To The Top Right Of The Screen??
how can I position a form to the top right of the screen, independent of the screen resolution??

And keep in count the form width ?

Thanks.

WebBrowser Scroll Position
hi, i have a webbrowser control called WebBrowser1, and i want to return the Y axis scrollbar position in Text1, and it updates everytime i change the scrollbar position, how could this be done?

HELP! Check For A Programs Position On Screen
how can i run a check as my main form is moved to see if it is within 50 pixels away from the left side of the screen and as you move it if it is, then make it jump or dock to the left side?

i also need it to dock to the top and right of the screen but i think i can figure those out once i learn how to check while i'm moving th form.

the only way i can think of is by using a timer but is there any other way?

Get Screen Coords Of Caret Position In RTB
Looks like they don't have that (GetCaretPos) API there anymore...
Do you have another link?

Get Screen Coords Of Caret Position In RTB
Hi all,

Does anyone know how to do this.. I'm not talking about the screen coordinates of the mouse in the RTB, thats easy.. but the current screen coordinates of the caret where the user is typing..

Thanks,

FreakOz.

Change Msgbox Screen Position?
app x has a messagebox which pops up from items in an array, each time. user then locates the entity, and modified it, then hit's ok in msgbox, which goes to the next entity, and so on. well the user, has to move the message box, to work on the creen- is there a way to position a message box on show, like you position a form?

Saving A Forms Screen Position
Hi again...

I would like to save my forms position after the user has re-positioned it and then to have it load next time my program is run.

I have tried saving the forms position in Form_terminate as a .dat file
but the position that keeps getting written to the file is the forms top and left as stated at design time in the form properties.

is there a 'form move' event that i can code ??

Any help will be muchos appreciated..

TIA.
Osk.

Position Form At Top Centre Of Screen.
Subject says it all. Any suggestions?

My project starts up as maximized but when I press the "normal" button (the one between the maximize and minimize) the form is located in the centre of the screen.

Form's Position In Relation To The Screen
I actually have two questions for you brilliant minds to ponder on...

1) How can I capture a mouse click anywhere on the screen?
2) How can I find the location of a form (or any other window) in realation to the screen. For instance, it's left most edge and it's upper most edge.

Thank you for your help,
Squirrelly1

Detecting Mouse Position On The Screen
I would like to show my form if the mouse moves to the top corner of the screen. Is this possible? If so How? Thanks for any replies

Loading Form's Screen Position
while i'm waiting on the webbrowser to load some stuff..i know how to make my form appear..but how do i make it appear on top of my webbrowser control..in the center..and stick there?

Common Dialogue Screen Position
I am using the API method as described by John Percival on the vb-search site. I want to position the common dialogue box in the center of the screen as opposed to the top left corner of the screen. Does anyone know of a parameter to allow me to accomplish this goal? How can I control where the box appears on the screen?

Thanks,
Brian

Window Position Vs Screen Size
I'm using the SetWindowPos API to open an instance of Word exactly the same size as a control on my form and in exactly the same place as that control (don't ask me why - odd users...). Problem is, I have to apply different factors depending on the screen resolution. For example, this factor of 12 works with my resolution of 1280*1024 and large fonts:

VB Code:
Option Explicit Private Declare Function SetWindowPos Lib "user32" _ (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, _ ByVal x As Long, ByVal y As Long, ByVal cx As Long, _ ByVal cy As Long, ByVal wFlags As Long) As LongPrivate Declare Function FindWindow Lib "user32" Alias "FindWindowA" _ (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Sub cmdWord_Click() Dim blnAlreadyOpen As Boolean Dim lngHWnd As Long Dim appWord As Word.Application Const klngHwndTopmost = -1 Const klngHwndNoTopmost = -2 Const klngSwpNoActivate = &H10 Const klngSwpShowWindow = &H40 Const klngLEFT_ADJUST As Long = 50 Const klngTOP_ADJUST As Long = 335 Const klngFACTOR As Long = 12 '# If Word is already open, refer to it; otherwise open it blnAlreadyOpen = (FindWindow("OpusApp", vbNullString) <> 0) If blnAlreadyOpen Then Set appWord = GetObject(, "Word.Application") Else Set appWord = CreateObject("Word.Application") End If '# Get the handle of the Word instance lngHWnd = FindWindow("OpusApp", vbNullString) '# Set the position and activate it SetWindowPos lngHWnd, klngHwndNoTopmost, _ (Me.Left + txtSizeTest.Left + klngLEFT_ADJUST) / klngFACTOR, _ (Me.Top + txtSizeTest.Top + klngTOP_ADJUST) / klngFACTOR, _ txtSizeTest.Width / klngFACTOR, txtSizeTest.Height / klngFACTOR, _ klngSwpNoActivate Or klngSwpShowWindow appWord.Visible = True appWord.Activate End Sub
... but it doesn't work when I reduce it to 800*600 with small fonts - Word is too large when it opens.

Any idea how to find out the resolution and adjust for it?

Thanks...

How To Arrange Position Windows In The Screen?
i have to arrange a lot of .exe files in the screen so as to send mouse click..how do i accomplish it..plus its a redistributable program that i am building..now i want it to work with every screen size..is there a way to do it ?

Change Screen Position Of Msgbox
hi, the subject says it all:

i would like to be able to specify where on the screen a msgbox will appear (namely top centre)

thanks

How To Got A X && Y Position At The Screen And S309PictureBox Question???
Could anyone help me, cause I am losing to much time to finding a solution to got a X and Y position on th pocket PC screen.
And how can I put another object(ex: icon) on the frontground of the S309picturebox, because no matter what I put it's always stay behind/background of the picture, so I can not see the icon or textbox.

Thank u

Position Of Picture Box In A Windows Screen
Help me friends,
i have a problem, how to get coordinate X & Y in pixel scale of our object controls such as form or picture box. I want to know where top & left properties of picture box in our windows screen.
Our screen can be in different resolution.

Cursor Position In Webbrowser Control
Hi,
Does anyone have an idea on how to get the cursor position from the WebBrowser control.

Thanks

Calender View Control Position On Screen
Hi All

I click a number of buttons to open a calender view

Can anyone tell me how to get my calender view to always open next to the button i pressed to open it

thanks

Gibbo

Returning Screen Position Of Objects In Pixels...
how do i return the position of an object in pixels instead of twips?

Form Screen Position - Monitor Size
How would I set the form position to the the bottom right of the screen area.. I am basically thinking of the different sizes of monitor's and resolutions...

The Left and Top properties can be set of course, but...

Thanks in advance

'click' On Button Based On Screen Position
is there vb code where after setting the focus on a window i can then 'click' on an X/Y screen coordinate position?

Screen Position To Form Control Math.... HELP!
I am using the

Private Declare Function GetCursorPos Lib "user32" (lpPoint As _
POINTAPI) As Long

Private Type POINTAPI
x As Long
y As Long
End Type
Dim a As POINTAPI
Dim b As Long
Dim c As Long

API to read the position of the mouse.
Now I need my form to use twips since I dynamically am adjusting position of all form controls on form resize and I tried pixels and it was a mess.

Now I use the mouse position in conjunction with Microsoft HTML Object library pointing to the currently loaded page in the webbrowser control.

Say a link is on the page. I use the mouse X,Y to check if it is over a link.
BUT
The API returns positions that to not work with the browser.
I will be like 30 pixels above a link and it thinks I am on it.
I tried adjusting it and it still didn't work.

Is there some math solution to get the returned X and Y to be X and Y for the browser control? Wouldn't it have to account for different screen resolutions and form sizes?

The code attached is in VB 5.

Thank you for any help

Mike

Resetting Image Position When It Reaches End Of The Screen?
I was wondering how I would reset the images position to 0 when it reaches the edge of the screen. I tried this:

VB Code:
If bomb_yellow.Left = 3480 Thenbomb_yellow.Left = 0End If

3840 is the furthest position on the screen. Am I on the right track even?

Initial Startup Screen Size/position?
hi,

I've been running into this problem every once in awhile with my end-users.

The problem has to do with the screen size of my application the first time they launch it. I do save the last screen size and location upon exiting the program, but when they run the program for the first time, it obviously runs with the settings that were saved when I compiled the program.

I am using a 21" monitor with a 1024x768 resolution. I usually just make the main window small enough to view everything and keep it in the center of my screen when I compile it. But I guess customers with smaller screens or lower resolution are saying that my program is off to the far right of their screen when they first start it up.

So I guess my question is, what is the standard/accepted practice for the window size and position when you compile your programs?

Any help would be appreciated..

Dan

How To Use VB6.0 To Make A Tray (the Position At The Screen Right Botton)
I want to make its ico in the tray.
how can i do?
please help me.

Pass Array Element's As ParamArray Element's
Sorry, I'm brasilian and I don't know the english language.
I'm creating a function that the last argument is a ParamArray argument.
In the calling of this function, I have an array of values and each
element of this array must be
an element of the ParamArray argument.
How do I to pass this array's element as ParamArray's argument element?

Eg.:

Function Test(ParamArray aValue() as Variant) as string
Dim A As Integer, Msg As String
For A = LBound(aValue) to UBound(aValue)
Msg = Msg & aValue(A)
Next A
Test = Msg
End Function

----

Private Sub Command1_Click()
Dim MyArray(2) as String

Msgbox Test("hello1", "hello2", "hello3")

'to have the same result using MyArray variable (without specifing _
yours element, eg. MyArray(0))

MyArray(0) = "hello1"
MyArray(1) = "hello2"
MyArray(2) = "hello3"

Msgbox Test(MyArray()) 'in this line an error occur

Msgbox Test(MyArray) 'in this line an error occur

Msgbox Test(MyArray(0), MyArray(1), MyArray(2)) 'this _
line don't resolve my problem

End Sub

How Can I Obtain The Screen Position Of A Webbrowser Element?

I have one element of the webbrowser document, an I need to draw the border of this element in the screen so I need know its position. How can I do in Visual Basic?Thanks

I have one element of the webbrowser document, an I need to draw the border of this element in the screen so I need know its position. How can I do in Visual Basic?

Thanks