kayseri
Ana Sayfa
İletişim
Ziyaretşi defteri
Anketler
Saklı sayfalar
ıp numaran
Yeni sayfanın başlığı
asdas
asdas
Private Sub Worksheet_Activate()
Range("A65536").Select
If InputBoxsahabiye= "" Then
Range("A1").Select
Else
MsgBox ("Þifre Yanlış")
Sheets("Sayfa1").Select
End If
End Sub
Bugün 5 ziyaretçi (6 klik) kişi burdaydı!
HOSGELDİNİZ
Kullanıcı adı:
Şifre:
hosgeldin
Bu web sitesi ücretsiz olarak
Bedava-Sitem.com
ile oluşturulmuştur. Siz de kendi web sitenizi kurmak ister misiniz?
Ücretsiz kaydol