UtterAccess.com
X   Site Message
(Message will auto close in 2 seconds)

Welcome Guest ( Log In | Register )

 
Reply to this topicStart new topic
> Animated Gif With Webbrowser Activex    
 
   
jfgrenier
post May 30 2012, 08:21 PM
Post #1

New Member
Posts: 5



I'm using the WebBrowser activeX control to display an animated gif on an Access 2007 form (activity in progress). What I'd like to do is instead of setting a direct path to the gif (...navigate CurrentProject.Path & "\spinblue.gif"), I'd like to be able to point to an embeded gif in a table (ole object) Any idea? Merci! Here is the working code if this can help someone.. no border, no margin and no scrollbar.
CODE
Private Sub Form_Load()
    Me.WebBrowser.Object.Navigate CurrentProject.Path & "\spinblue.gif"
End Sub

Private Sub WebBrowser_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    Me.WebBrowser.Document.Body.Style.border = "none"
End Sub

Private Sub WebBrowser_NavigateComplete2(ByVal pDisp As Object, URL As Variant)
    Me.WebBrowser.Object.Document.Body.Scroll = "no"
    Me.WebBrowser.Object.Document.Body.TopMargin = "0"
    Me.WebBrowser.Object.Document.Body.LeftMargin = "0"
End Sub
Go to the top of the page
 
+

Thank you for your support! Reply to this topicStart new topic

Jump To Forum:
 



RSS Go to Top  ·  Lo-Fi Version Time is now: 20th May 2013 - 05:39 PM