formuma bir web sayfası yerleştirdi. butonlara da sırası ile önce web sayfasınıaç, şifre gir, sonraki sayfaya geç, sonraki sayfaya geç gibisinden kodlar yerleştirdim. bütün bu işlemleri ayrı butonlarla yapıyorum. tek butonla bu işi çözeyim dedim. şu şekilde bir sorunla karşılaştım.
örneğin web sayfasını aç ve şifre gir kodlarını birleştirdiğimde sayfa açılmadan şifre gir kodu da aktif hale geldiğinden hata verdi. ben istiyorum ki şifre girme kodu, web sayfasının sifre girme bölümü açıldıktan sonra çalışsın. yani önce web sayfası açılsın daha sonra şifre girme bölümü aktif hale gelsin ve sonra şifre gir kodu çalışsın. acep nasıl yapılabilir (veya yapılabilr mi)?
örneğin web sayfasını aç ve şifre gir kodlarını birleştirdiğimde sayfa açılmadan şifre gir kodu da aktif hale geldiğinden hata verdi. ben istiyorum ki şifre girme kodu, web sayfasının sifre girme bölümü açıldıktan sonra çalışsın. yani önce web sayfası açılsın daha sonra şifre girme bölümü aktif hale gelsin ve sonra şifre gir kodu çalışsın. acep nasıl yapılabilir (veya yapılabilr mi)?
Kod:
Private Sub çksaç_Click()
WebBrowser1.Navigate (çksadresi.Value)
şifre.Enabled = True
End Sub
Private Sub şifre_click()
Set nm = WebBrowser1.Document.all.Item("username")
nm.Value = "deneme"
Set ps = WebBrowser1.Document.all.Item("password")
ps.Value = "deneme"
Set gir = WebBrowser1.Document.all.Item("cmdlogin")
gir.Click
sorgu.Enabled = True
End Sub
Son düzenleme: