🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.bazy-danych.msaccess
Article #137562

Re: Funkcja porównująca dwa hasła.

#137562
From: Krzysztof Naworyta
Date: Mon, 13 Nov 2017 19:56
52 lines
2925 bytes
1. Obydwa argumenty funkcji są typu variant a więc mogą być Null oraz mogą być dowolnymi obiektami.
Nie chce mi się sprawdzać, ale dla Null chyba zwróci True.

2. Po co sprawdzanie tego rodzaju? Funkcja StrComp z trzecim argumentem = 0 nie wystarczy?

3. Zapamiętywanie haseł to nienajlepsza praktyka. 
Trochę wprawy, podpięcie pliku jako biblioteki by w przeglądarce obiektów przeglądnąć funkcje, potem w Notepad++ poszukać nazwę funkcji i wyłapać vComp (tak w ogólności).
Jak już, to przechowywać hasze i tylko hasze porównywać.
(skoro pytasz o opinię - ale jak piszesz dla zwykłego end-usera/komara to nie mówmy o armatach)

KN


W dniu poniedziałek, 13 listopada 2017 19:24:25 UTC+1 użytkownik mi...@onet.pl napisał:
> Witam,
> Popełniłem funkcję sprawdzającą 2 hasła.
> Wprowadzone z klawiatury z drugim w kodzie aplikacji.
> 
> Czy widzicie jakieś braki w tej funkcji?
> Nie przewidziane działanie?
> 
> 
> ______________________________
> Public Function CzyPoprawne(vHaslo, vComp) As Boolean
> 
> If Len(vHaslo) <> Len(vComp) Then
> CzyPoprawne = False
> GoTo Exit_CzyPoprawne
> End If
> 
> For i = 1 To Len(vHaslo)
> If Asc(Mid(vHaslo, i, 1)) <> Asc(Mid(vComp, i, 1)) Then
> CzyPoprawne = False
> GoTo Exit_CzyPoprawne
> End If
> Next i
> 
> CzyPoprawne = True
> 
> Exit_CzyPoprawne:
> Exit Function
> 
> End Function
> 
> 
> 
> ************
> 
> 
> Proszę o komentarze.
> 
> MF
Technical Details
Message-ID: <2fc613cc-920a-4efd-8ef9-ede116a79ff5@googlegroups.com>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!news.nask.pl!news.nask.org.pl!news.unit0.net!weretis.net!feeder6.news.weretis.net!feeder.usenetexpress.com!feeder-in1.iad1.usenetexpress.com!border1.nntp.dca1.giganews.com!nntp.giganews.com!p44no165731qtj.0!news-out.google.com!t48ni198qtc.1!nntp.google.com!p44no165726qtj.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
References: <4491d454-550b-4465-8a5d-3b498a731fb6@googlegroups.com>

Show Full Headers
Complete Article Headers
X-Received: by 10.237.58.65 with SMTP id n59mr12315322qte.43.1510603016932;        Mon, 13 Nov 2017 11:56:56 -0800 (PST)
X-Received: by 10.31.157.131 with SMTP id g125mr1530996vke.14.1510603016785; Mon, 13 Nov 2017 11:56:56 -0800 (PST)
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!news.nask.pl!news.nask.org.pl!news.unit0.net!weretis.net!feeder6.news.weretis.net!feeder.usenetexpress.com!feeder-in1.iad1.usenetexpress.com!border1.nntp.dca1.giganews.com!nntp.giganews.com!p44no165731qtj.0!news-out.google.com!t48ni198qtc.1!nntp.google.com!p44no165726qtj.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: pl.comp.bazy-danych.msaccess
Date: Mon, 13 Nov 2017 11:56:56 -0800 (PST)
In-Reply-To: <4491d454-550b-4465-8a5d-3b498a731fb6@googlegroups.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=94.254.154.68; posting-account=EWosigkAAAB3n6VJ-PQjvn6MezTGyoMJ
NNTP-Posting-Host: 94.254.154.68
References: <4491d454-550b-4465-8a5d-3b498a731fb6@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <2fc613cc-920a-4efd-8ef9-ede116a79ff5@googlegroups.com>
Subject: Re: Funkcja porównująca dwa
 hasła.
From: Krzysztof Naworyta <k.naworyta@datacomp.com.pl>
Injection-Date: Mon, 13 Nov 2017 19:56:56 +0000
Lines: 60
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit