INTELLIGENT WORK FORUMS
FOR COMPUTER PROFESSIONALS

Log In

Come Join Us!

Are you a
Computer / IT professional?
Join Tek-Tips Forums!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!

*Tek-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.

Jobs

Click image link Webbrowser

RE: Click image link Webbrowser

Wrong forum, I'm afraid. Try forum329: VBScript, although you might get redirected from there ...

VB != VBA != VBScript != ASP

RE: Click image link Webbrowser

(OP)
visual basic 6 /VB6.0

RE: Click image link Webbrowser

No, sorry, unfortunately your code is not VB6. It is not VB at all. It is, at best, ASP VBScript. Indeed, given the lack of VBscript-specific code, this could equally well be JavaScript ...

RE: Click image link Webbrowser

(OP)
The code i post is html code;
how to get the link via webbrowser in vb6 and then clic the image link

RE: Click image link Webbrowser

That's clearer what you want now. So, what have you tried so far?

RE: Click image link Webbrowser

(OP)
i have a web page in webbrowser with link to click the link have a code html i posted
how to do to get the link and how to click it

thank you

RE: Click image link Webbrowser

(OP)
Dim i, eXt As Integer
Dim cUrl As String
On Local Error Resume Next
If doc.links.length > 0 Then
For i = 0 To doc.links.length - 1
cUrl = doc.links(i).href
eXt = InStr(cUrl, "toc.php")
'Debug.Print eXt
If eXt > 0 Then
'Logs.Text = "Click >" & doc.links(i).href
'Debug.Print doc.links(i).href
'Debug.Print "Clicked ------------------------"
IE.Document.links(i).Click
Pause (5)
End If
Next
End If

------------------------------

i found this it's work; but my new probleme is how to redirect the new clicked url to (ie2) webbrowser like this

ie2.Navigate2 UrlGo, , "right"


Private Sub IE_NewWindow2(ppDisp As Object, Cancel As Boolean)
Dim TextePage, sLink As String

'
Set ppDisp = IE2.object ' for hiere i would like redirect to frame the url
IEPtc.Silent = True
Visible = True

End Sub

thank you

Red Flag This Post

Please let us know here why this post is inappropriate. Reasons such as off-topic, duplicates, flames, illegal, vulgar, or students posting their homework.

Red Flag Submitted

Thank you for helping keep Tek-Tips Forums free from inappropriate posts.
The Tek-Tips staff will check this out and take appropriate action.

Reply To This Thread

Posting in the Tek-Tips forums is a member-only feature.

Click Here to join Tek-Tips and talk with other members!

Resources

Close Box

Join Tek-Tips® Today!

Join your peers on the Internet's largest technical computer professional community.
It's easy to join and it's free.

Here's Why Members Love Tek-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close