Results 1 to 3 of 3
  1. #1
    4 Star Lounger
    Join Date
    Mar 2005
    Location
    Leicestershire, United Kingdom
    Posts
    506
    Thanks
    0
    Thanked 0 Times in 0 Posts
    Good morning.

    I am looking to display the following within my access form, how can I achieve this?

    <script language="javascript" src="http://www.allgreatquotes.com/scripts/quoteday.js"></script>
    Best Regards,

    Luke

  2. #2
    Star Lounger
    Join Date
    Sep 2002
    Location
    Hastings, Sussex, England
    Posts
    67
    Thanks
    0
    Thanked 1 Time in 1 Post
    Hi Luke!

    I think you will need to drop an ocxWebBrowser control onto your form. Then set the URL in code (based on code by Helen Feddema) :


    On Error GoTo ErrorHandler


    dim appBrowser As Object
    dim strURL as string


    Set appBrowser = Me![ocxWebBrowser]
    Me![ocxWebBrowser].Navigate strURL

    ErrorHandlerExit:
    Set appBrowser = Nothing
    Exit Sub

    ErrorHandler:
    MsgBox "Error No: " & Err.Number _
    & " in Form_Current procedure; " _
    & "Description: " & Err.Description
    Resume ErrorHandlerExit


    Regards,

    Jules

  3. #3
    Star Lounger
    Join Date
    Sep 2002
    Location
    Hastings, Sussex, England
    Posts
    67
    Thanks
    0
    Thanked 1 Time in 1 Post
    Oops! While cycling I realised I had omitted a key line. You need to set strURL to the address of the web site, before using the variable.

    Sorry about that, but I expect everyone spotted the (non-deliberate) mistake.

    Jules

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •