Skip to main content

AccessTr.neT


Userform üzerinde web sayfası açmak hakkında

Userform üzerinde web sayfası açmak hakkında

Çözüldü #1
Ekli dosyamda userform1 de "sorgulamalar" sekmesinde web browser bulunmakta.

Yapmak istediğim şudur.

1 - ListBox4 ten herhangi bir firmaya tıkladığımda https://intvd.gib.gov.tr/internetvd/disp..._LOGINPAGE adresini açacak.

2 - Tıkladığım firmanın "data" sekmesi "AW" sütunundaki kullanıcı kodunu açılan sitedeki "Kullanıcı Kodu" bölümüne yapıştıracak

3 - Tıkladığım firmanın "data" sekmesi "AX" sütunundaki kullanıcı parolasını açılan sitedeki "Parola" bölümüne yapıştıracak

4 - Tıkladığım firmanın "data" sekmesi "AY" sütunundaki internet şifresini açılan sitedeki "Şifre" bölümüne yapıştıracak

5- açılan sitedeki "Giriş" tuşuna basacak

Dosyanın açılış şifresi:
Kullanıcı : Admin
Şifre: 1

Not: Sayın ogulcan92 bu konuda bana daha önce yardımcı olmuştu fakat onun verdiği kodları bu çalışmama uyarlayamadığımdan sorumu tekrardan açmak zorunda kaldım

Şimdiden teşekkürler
.rar drmkayıt v1.rar (Dosya Boyutu: 270,61 KB | İndirme Sayısı: 48)
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #2
Sn:drummers
Dosyanız istediğiniz şekilde düzenlenmiştir.
.rar drmkayıt v1.rar (Dosya Boyutu: 279,11 KB | İndirme Sayısı: 74)
OĞULCAN & OLCAYTUĞ

Oğulcan Excel Web Sitesi
Excel İle Programlama
Cevapla
Çözüldü #3
yalnız şöyle bir uyarı alıyorum.

Run time error "-2147467259 880004005)':
Method ' Navigate' of object 'IWebBrovser2' failed

Birde dosyamı ilk açtığımda about:blank olarak gelse firmayı tıkladığımda ilgili linke gitse sanırım daha mantıklı olacak. Sebebi ise açılışı hızlandırmak..

Teşekürler.
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #4
Sn:drummers
Formun initalizesindeki WebBrowser1.Navigate ile başlayan kodu ya siliniz yada aşağıdaki şekilde değiştiriniz.Diğer sorununuza gelin bende herhangi bir hata vermiyor.

WebBrowser1.Navigate "about:blank"
OĞULCAN & OLCAYTUĞ

Oğulcan Excel Web Sitesi
Excel İle Programlama
Cevapla
Çözüldü #5
Run time error "-2147467259 880004005)':
Method ' Navigate' of object 'IWebBrovser2' failed

uyarısını diğer sayfalarda "excele dön" butonuna basınca veriyor.

"about:blank" işi tamamdır..
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #6
Sn:drummers
Cari Bilgileri sekmesinde Excele Dön butonunda bu hatayı vermektedir.Sebebi ise kodun son satırındaki UserForm_Initialize komutudur.Aşağıdaki kodu userform initalizeden silip activesin yazınız.

WebBrowser1.Navigate "about:blank"
OĞULCAN & OLCAYTUĞ

Oğulcan Excel Web Sitesi
Excel İle Programlama
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task