İnternet bağlantısı sınama

[scuba]

İnternet bağlantısı olup olmadığını macro ile nasıl bulabilirim?

 

[Levent Menteşoğlu]

Aşağıdaki linki inceleyin.

ip ye göre kitap açma

 

[noxious]

Sayım LeventM

http://www.excel.web.tr/attachment.php?attachmentid=27150&d=1194071407

Hocam adresteki dosyada Lokal IP üzerinden kontrolle izinli olup olmadığınıza bakarak açılıyor veya kapanıyor. Benim çalışmam ağ üzerinde paylaşımda ben kendi makinamın paylaşımlarını şifreleyerek korumaya aldım ve sadece çalışmama bakacak olanların izlemesi için şifrelerimi paylaştım ancak verdiğim şifreleri başkalarıda kullanarak makinam üzerindeki paylaşımdan dosyalarıma giriş yapabilir. linkteki Mahmutt beyin hazırladığı uygulama hoşuma gitti ve kullanmaya karar verdim.

Bu uygulamada şöyle bir değişiklik yapma şansımız varmı IP kontrolünden sonra sizi tanıdığı için kitap açılıyor ve msjbox içerisinde hoş geldiniz yazıyor. tanımlı IP lere isim versek mesela 192.168.0.10 nolu IP açtığında Mustafa bey hoş geldiniz, 192.168.0.11 nolu IP açıldığında Ahmet bey hoş geldiniz ..... isimlendirdiğimiz diğer IP lerede verdiğimiz isimlerle hoş geldiniz dese mümkünmü acaba

 

[noxious]

Hocam Çok Çok özür diliyerek yukarıdaki mesajı göz ardı etmenizi istirham ediyorum çok küçük bir ayrıntı gözümden kaçmış. Kodlara baktığımda sorumun cevabını gördüm tekrar özür

 

[scuba]

burada internet bağlantısının olup olmadığını TestInternetConnection fonksiyonu mu yapıyor? Ama bu değer bağlantı olsada olmasada doğru değerini döndürüyor.

 

[scuba]

sanırım çevrimdışı çalışmayı seçiyor o yüzdende bağlantı var gibi gözüküyor.