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..

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 database

kodunun altındaki

Private 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 Long

kodunu 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.

Hocam teşekkür ederim... Yine çok yardımcı oldunuz..