pc açılınca 10 sn. sonra hata versin

arkadaşlar bilmem olurmu ama. bi isteğim var labratuarda çalısıyorum. 30 pc var bunların 2 tanesinde internet erişimi yok şu aralarda da halledemiyoruz.istediğim kullanıcı pc nin başına oturup windows açıldıktan 10 sn sonra falan 'bu bilgisayarda donanımsal nedenlerden dolayı internet yok' diye bi mesaj versin.bunu vb ile yapmak mümkünmüdür? vb yi yeni öğreniyorum kopyala yapıştır şeklinde kullanabileceğim kodlar bulabilirmiyim?
umarım istediğimi anlatabilmişimdir.
teşekkürler....

Selam arkadaşım bir time ile yapabilirsin bu işi timerin invertal ayarını yapmayı biliyorsundur heralde kaç saniyede bir çalışsın gibisinden

msgbox " Bu Bİlgisayar Donanımsal Hatalardan Dolayı İnternete Bağlanamıyor "

en basit örneği budur ama daha gelişmiş birşey istiyorsan yarın eklemeye çalışırım :) İyi Günler

bir modul ekleyin ve içine kodları ekleyin

[ Tüm kodu seç ] [ Yeni Pencerede Göster ]

Private Declare Function InternetGetConnectedStateEx Lib "wininet.dll" (ByRef lpdwFlags As Long, ByVal lpszConnectionName As String, ByVal dwNameLen As Integer, ByVal dwReserved As Long) As LongPublic Function internetVarmi() As Boolean     Dim st As String * 255     Dim r As Long     r = InternetGetConnectedStateEx(r, st, 254, 0)     If r = 1 Then         internetVarmi = True     Else         internetVarmi = False     End If Exit Function End Function

 
form üzerine bir buton ekleyin ve içine kodu şu şekilde yazın

[ Tüm kodu seç ] [ Yeni Pencerede Göster ]

If internetVarmi = False Then MsgBox "İnternet Bağlantınızı Kontrol Ediniz!", vbInformation + vbSystemModal Exit Sub End If

 
yukarıdaki kodlar sayesinde internet var mı kontrolünü yaptık.
 
bu kodlar eklenmiş projeyi exe ye çevirdiğiniz de....
Başlat=>Programlar=Başlangıç içine hazırladığınız exe nin kısayolunu atın.
 
windows başladığında otomatik çalışır.
 
eger belirli bir süre sonra bu kodların çalışmasını istiyorsanız.
 
form üzerine eklediğiniz buton içindeki kodları timer açıp içine ekleyin ve timer in da ayarını yapın belirli bir süre sonra kodlar çalışır.

çok teşekkür ederim,denicem sonucu size bildiririm...