carlchapman
Registered User.
- Local time
- Today, 22:26
- Joined
- Jul 25, 2006
- Messages
- 29
Hi,
I have implemented access web browser into my database to display a companies website >
Private Sub orgURL_AfterUpdate()
On Error Resume Next
' If the user has entered an address (URL) in this control,
' attempt to navigate to the address.
If Len(Me!orgURL) > 0 Then
orgBrowse.Visible = True
orgBrowseLabel.Visible = True
Me!orgBrowse.Navigate Me!orgURL
End If
End Sub
Now if a page cannot be displayed (http 404 response) i want to display a lable
Private Sub orgURL_AfterUpdate()
On Error Resume Next
' If the user has entered an address (URL) in this control,
' attempt to navigate to the address.
If Len(Me!orgURL) > 0 Then
orgBrowse.Visible = True
orgBrowseLabel.Visible = True
Me!orgBrowse.Navigate Me!orgURL
Else
cannotBeDisplayed.Visible = True
End If
End Sub
Of course this doesnt work because the IF statement works fine, but i some how need to talk to http within the browser to give an IF 404 display this, else display web browser. if i can create web pages n network etc, VBA must have a way to do this in access. Any advice ?
I have implemented access web browser into my database to display a companies website >
Private Sub orgURL_AfterUpdate()
On Error Resume Next
' If the user has entered an address (URL) in this control,
' attempt to navigate to the address.
If Len(Me!orgURL) > 0 Then
orgBrowse.Visible = True
orgBrowseLabel.Visible = True
Me!orgBrowse.Navigate Me!orgURL
End If
End Sub
Now if a page cannot be displayed (http 404 response) i want to display a lable
Private Sub orgURL_AfterUpdate()
On Error Resume Next
' If the user has entered an address (URL) in this control,
' attempt to navigate to the address.
If Len(Me!orgURL) > 0 Then
orgBrowse.Visible = True
orgBrowseLabel.Visible = True
Me!orgBrowse.Navigate Me!orgURL
Else
cannotBeDisplayed.Visible = True
End If
End Sub
Of course this doesnt work because the IF statement works fine, but i some how need to talk to http within the browser to give an IF 404 display this, else display web browser. if i can create web pages n network etc, VBA must have a way to do this in access. Any advice ?