Şifreli Giriş Uygulaması

Yönetici için XYZGünAySaat şeklinde özel şifresi olan

  Arka Kapısı Olan  Şifreli Giriş Örneği

 

CLS


Ay$ = LEFT$(DATE$, 2)

Saat$ = LEFT$(TIME$, 2)

Gun$ = MID$(DATE$, 4, 2) ' Araliktaki harfleri 4 sira no 2 ise kac karakter alinacagi



DO


 INPUT "Sifre Nedir"; Sifre$
 

 IF Sifre$ = "susam" OR (Sifre$ = "XYZ" + Gun$ + Ay$ + Saat$) THEN
 
        PRINT "Giris Basarili "

 ELSEIF LEN(Sifre$) = 0 THEN

       EXIT DO

 ELSE PRINT "Yanlis Sifre"

 END IF


LOOP

 

  Başlıksız İçerik______________________

19,665 Okunma Henüz yorum yapılmamış 19/10/2009 20:43:17

Yorumunuzu Ekleyin
Şifreli Giriş Uygulaması Yorumları +1 Yorum
  • mustafa ibo
    1
    mustafa ibo
    yanlış çalışma en son satırda loop olmalıydı uygulama çalışmayacaktır
    19 Ekim 2009 20:46:09, Pazartesi
Görsel Liste


SELECT CASE Uygulaması

Direnç Renk Kodları

20,289 okuma,

IF BLOK YAPILARI

19,106 okuma,

ELSEIF Kullanımı

20,239 okuma,

SELECT CASE Uygulaması

22,115 okuma,

Çaprım Tablosu Uygulaması

19,844 okuma,

INPUT Komutu

20,636 okuma,

IF Blok Yapıları

END IF nerelerde kullanılır?

21,589 okuma,

FOR NEXT Döngülerine Giriş

27,208 okuma,

DO LOOP Döngüsü

21,942 okuma,

QBasic ile Yapılmış Sayı Tahmin Oyunu

28,418 okuma,

DO WHILE - LOOP WHILE

21,205 okuma,

Basic ve Diziler

Tek Boyutlu Dizi Uygulama Örnekleri

20,769 okuma,

DO - LOOP Uygulamaları

SELECT CASE, DO-WHILE, DO LOOP

21,163 okuma,

Basic ve Diziler

Çok Boyutlu Dizi Uygulama Örnekleri

22,072 okuma,

Qbasic ve Çok Boyutlu Diziler

Çok Boyutlu Dizilerle İlgili Uygulamalar

23,006 okuma,

SUB Subroutine Kullanımı

Alt Program Kullanımı

20,629 okuma,

GOSUB Kullanımı

20,089 okuma,

FUNCTION Kullanımı

21,962 okuma,

Yükleniyor...
    Yükleniyor...