Giriş yapmadınız. Lütfen giriş yapın yada kayıt olun.
fox4um » Web Uygulamaları » html deki değişken
arkadaşlar örnegin bir web sitesinde kullanıcı adı ve şifresini girip onay butonuna basılınca sayfa açılıyor ben bu web sitesine vfp ile kullanıcı adını ve şifresini otomatik girdirip onay butonunu tıklatmak istiyorum bunu nasıl yapabiliriz . teşekkürler
Local lWebFormRuning, lnOldSecond, lnTimeOut, loWeb as InternetExplorer.Application
lnTimeOut = 10
lnOldSecond = Seconds()
lWebFormRuning = .t.
loWeb = CreateObject("InternetExplorer.Application")
loWeb.Visible = .f. && arka planda çalışsın
loWeb.Navigate("http://www.siteadresi.com/login.asp")
DO While loWeb.Busy && bağlanana kadar bekle
If Seconds() - lnOldSecond > lnTimeOut
lWebFormRuning = .f.
Exit
EndIf
Inkey(0.2)
EndDo
If lWebFormRuning and ;
Type('loWeb.Document.Forms("FrmLogin")') = "O" and ;
!IsNull(loweb.Document.Forms("FrmLogin"))
With loWeb.Document.Forms("FrmLogin")
.FrmKullanici.value = "KullanıcAdi"
.FrmSifre.value = "Sifre"
.FrmSubmit.Click()
EndWith
EndIf
loWeb.Quit
loWeb = Null
Umarım işini görür
web sayfalarının böyle olarak kullanılabildiğini bilmiyordum. çok basitmiş... teşekkürler...
MESUT
ASAGIDAKİNİ UYGULADIM AMA OLMADI BİRDE SEN BAKARMISIN
Local lWebFormRuning, lnOldSecond, lnTimeOut, loWeb as InternetExplorer.Application
lnTimeOut = 10
lnOldSecond = Seconds()
lWebFormRuning = .t.
loWeb = CreateObject("InternetExplorer.Application")
loWeb.Visible = .t. && arka planda çalışsın
loWeb.Navigate("http://www.karnem.net/default.asp")
DO While loWeb.Busy && bağlanana kadar bekle
If Seconds() - lnOldSecond > lnTimeOut
lWebFormRuning = .f.
Exit
EndIf
Inkey(0.2)
EndDo
If lWebFormRuning and ;
Type('loWeb.Document.Forms("FrmLogin")') = "O" and ;
!IsNull(loweb.Document.Forms("FrmLogin"))
With loWeb.Document.Forms("FrmLogin")
.FrmOKULKODU.value = "1"
.FrmOGRNO.value = "aa"
.FrmSubmit.Click()
EndWith
EndIf
*loWeb.Quit
*loWeb = Null
arkadaşlar htlm ye nasıl bilgi gönderirim bilen varmı acaba
Verildiği şekilde. Sen yuklediğin formda o değişkenlerin olduğundan ve girmene izin verdiğinden emin misin?
DHTMLEdit diye bir obje var. Belki bu obje işine yarar.
Ben bu objeyi form'a activex olarak koyup bir sözlük sitesinden kelimeler indirmek için kullanmıştım. Şu anda derli toplu bir örnek yok elimde.
İnternetten aranırsa belki birşeyler bulunur.
explorer sayfasında açılınca normal giriş yapılıyor fakat ben explorer form içinde açtırıp ogr no girildiğinde o sayfanında otomatik olarak görünmesini istiyorum normal kopyala yapıştırla oluyor ama
ben programsal olarak form içinde açtıgım web broser a nasıl kopyala yapıştır yapacagımı bilmiyorum eger onu bile yapa bilsek yetecek web ole class ile form içerisinde yanda adresi actırıyorum buraya ogr noyu nasıl kopyalatıp yapıştıra bilirim umarım anlata bilmişimdir...
Ben yukarıdaki örneği denedim, gayet güzel çalışıyor. Emeğinize, ellerinize sağlık. Tek sorun aynı programı başka bir username ve password ile denemeye kalksam da ilk denediğim user ile girilmiş şekilde ekrana geliyor. Browser'ın cache'ini temizlememe rağmen, FoxPro'dan çıkıp tekrar girmeme rağmen çok ilginç ilk denediğim user ile form doldurulmuş şekilde ekrana geliyor. Bu nasıl olur ?
Kalıcı olarak bir yerlere mi kayı etti acaba ?
fox4um » Web Uygulamaları » html deki değişken