Application.FollowHyperlink from a chosen item on a list box.

[fpesante]

Hi,

I I'm trying to create a form on database that user can choose and adress from a list box then click on a command button and they will be able to open the site. I am not able to retreive the item from the list box, so i may use the Application.FollowHyperlink. Below is code that I am using.


Private Sub Command0_Click()
On Error GoTo Err_Command0_Click
Dim strHttp As String

Screen.PreviousControl.SetFocus

Application.FollowHyperlink List3.Tag, , True

Exit_Command0_Click:


Exit Sub

Err_Command0_Click:
MsgBox Err.Description
Resume Exit_Command0_Click

End Sub

I've tried a couple of thins and no luck. It seems kinda of simple, but its kicking my @$$.

Any Suggestions.

THANKS

[FishVal]

Hi,

I I'm trying to create a form on database that user can choose and adress from a list box then click on a command button and they will be able to open the site. I am not able to retreive the item from the list box, so i may use the Application.FollowHyperlink. Below is code that I am using.


Private Sub Command0_Click()
On Error GoTo Err_Command0_Click
Dim strHttp As String

Screen.PreviousControl.SetFocus

Application.FollowHyperlink List3.Tag, , True

Exit_Command0_Click:


Exit Sub

Err_Command0_Click:
MsgBox Err.Description
Resume Exit_Command0_Click

End Sub

I've tried a couple of thins and no luck. It seems kinda of simple, but its kicking my @$$.

Any Suggestions.

THANKS

Hi!

Are you sure that List3.Tag returns hyperlink address?
I mean Tag property is a single property of the whole ListBox control, does your ListBox contain only ONE(???) hyperlink?
If not so please provide structure of the table/query which is the RowSource of List3.

[fpesante]

Hi!

Are you sure that List3.Tag returns hyperlink address?
I mean Tag property is a single property of the whole ListBox control, does your ListBox contain only ONE(???) hyperlink?
If not so please provide structure of the table/query which is the RowSource of List3.

Thanks for responding to my post!

I am showing only one field (taken from a table that i created) in my list box, which contains an address. Now I want to click on the field from the list box and with a command button open the site(contained in the field.) The field is from a table in access also. The above code was just me trying to make this happen. I kow how to program in VBA and this would be much easier but I have to do it in Access.

Are you understanding me now?

Thanks

[FishVal]

Thanks for responding to my post!

I am showing only one field (taken from a table that i created) in my list box, which contains an address. Now I want to click on the field from the list box and with a command button open the site(contained in the field.) The field is from a table in access also. The above code was just me trying to make this happen. I kow how to program in VBA and this would be much easier but I have to do it in Access.

Are you understanding me now?

Thanks

Nice. Its much more certain now.

I was just curious what a special reason do you have for using the ListBox.Tag property.
For your particulary needs you shoud use ListBox.Value property which is default by the way instead of ListBox.Tag one.

Application.FollowHyperLink List3, , True

[fpesante]

Nice. Its much more certain now.

I was just curious what a special reason do you have for using the ListBox.Tag property.
For your particulary needs you shoud use ListBox.Value property which is default by the way instead of ListBox.Tag one.

Application.FollowHyperLink List3, , True

Thanks alot.
We're getting somewhere but now the value that is using as a hyperlinlk is the index orcolumn order number. I need it to use the field from the list box that I am clicking.

Thanks

[FishVal]

Thanks alot.
We're getting somewhere but now the value that is using as a hyperlinlk is the index orcolumn order number. I need it to use the field from the list box that I am clicking.

Thanks

What is your current settings for List3
.RowSourceType
.RowSource
.ControlSource
.BoundColumn
properties.

[fpesante]

What is your current settings for List3
.RowSourceType
.RowSource
.ControlSource
.BoundColumn
properties.

The following:

RowSourceType Table/query
.RowSource PC Names
.ControlSource Blank ""
.BoundColumn 1

[FishVal]

The following:

RowSourceType Table/query
.RowSource PC Names
.ControlSource Blank ""
.BoundColumn 1

"PC Names" --> Use Function1. :) Is it more clear now?
Would you be so kind to be more certain next time?
Anyway you can retrieve value of particular field from current selection in multicolumn ListBox via ListBox.Column property.

With Me.List3
FollowHyperLink .Column(<ColumnNum>, .ListIndex)
End With