Excel kullanarak e izin sayfasına kullanıcı adı ve şifresini otomatik girmek

Noyan Temuçin

Kayıtlı Kullanıcı
CMNet Üyesi
Kayıt
6 Şubat 2009
Mesajlar
282
Beğeniler
117
#1
öncelikle excelde araçlar makkro viisual basic düzenleyicisini açıyoruz
daha sonra insert menüsünden userforma tıklıyoruz ve userformumuz geliyor
bundan sonra ? işaretinin olduğu yerde toolbox dan bir tane commandbutton oluşturuyoruz.
oluşan command buttona userformdayken çift tıklıyoruz ve kod kısmı geliyor .
şimdi kodlarımızı yazıyoruz
Private Sub CommandButton1_Click()

Set evn = CreateObject("internetexplorer.application")
With evn
.navigate "http://izinlisans.cevreorman.gov.tr/Yetki/KullaniciGiris.aspx"
Do While .busy: DoEvents: Loop
Do While .readystate <> 4: DoEvents: Loop
With .document.all
.ctl00_CPH_txtKullaniciAdi.Value = "kullanıcı adınız"
.ctl00_CPH_txtSifre.Value = "şifreniz"
.ctl00_CPH_btnTamam.Click
End With
Do While .busy: DoEvents: Loop
Do While .readystate <> 4: DoEvents: Loop
.Visible = True
.navigate "http://izinlisans.cevreorman.gov.tr/default.aspx"
End With
Set evn = Nothing
End Sub
işte bu kadar kodları nerden bulduğumu hatırlayamadım ama
çevre izin sayfasına göre düzenledim denenmiştir çalışıyor
 

Noyan Temuçin

Kayıtlı Kullanıcı
CMNet Üyesi
Kayıt
6 Şubat 2009
Mesajlar
282
Beğeniler
117
#2
Cevap: excel kullanarak e izin sayfasına kullanıcı adı ve şifresini otomatik girmek

kullanıcı adı ve şifre kısımlarını ve web sayfa ayarlarını ben yaptım kısaca e izin sayfasını açtım ve oradaki formdaki elemanların idleri ni aldım ve forma ekledim
 

Yukarı