+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Webbrowserdaki Resim (/konu-webbrowserdaki-resim.html)
Webbrowserdaki Resim - ceminsay - 30/06/2015
formdaki webbrowserdan açtığım "https://uyg.sgk.gov.tr/SigortaliTescil/amp/loginldap" adresindeki güvenlik anahtarı resmini formdaki bir resim nesnesine aktarmak istiyorum. En hızlı ve basit yolu nedir?
Yardımlarınız için şimdiden teşekkürler..
Cvp: Webbrowserdaki Resim - ozanakkaya - 30/06/2015
En basit yol aşağıdaki örnek uygulamada mevcuttur.
Dim HTML_Body, HTML_Img As Object, AlinanResim As Object
Dim TempDir As String
Set HTML_Body = WebBrowser1.Document.all.tags("Body").Item(0)
Set HTML_Img = HTML_Body.getElementsByTagName("img")
Set AlinanResim = HTML_Img(14)
TempDir = Environ("Temp")
URLDownloadToFile 0, AlinanResim.src, TempDir & "\1.png", 0, 0
Me.resim1.Picture = TempDir & "\1.png"option compare databasePrivate Declare Function URLDownloadToFile Lib "urlmon" _
Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, _
ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Longkodunu da kendi uygulamanıza ekleyiniz. Bu kod ile webbrowserdaki resim temp klasörüne kaydedilir.
Ayrıca,giriş butonunu tıklamak için "HTML.Forms("formA").submit" kodunu kullanmalısınız, aksi takdirde yeni Html sayfası açılır.
Cvp: Webbrowserdaki Resim - ceminsay - 30/06/2015
Hocam teşekkür ederim... Yine çok yardımcı oldunuz..