Thorvaldsen
Administrator
Dołączył: 06 Lip 2015
Posty: 71
Przeczytał: 0 tematów
Pomógł: 1 raz
Ostrzeżeń: 0/5
|
 Wysłany: Wto 9:07, 07 Lip 2015 Temat postu: XStandard MD5 w FoxPro |
|
|
Jak najprościej (bez pisania własnej implementacji) uzyskać dostęp do funkcji skrótu MD5 w FoxPro (HermesSQL). Firma XStandard udostępnia darmowy komponent w postaci biblioteki dll właśnie w tym celu.
Pobranie
Można go pobrać albo od nich: [link widoczny dla zalogowanych].
Instalacja
w moim rozwiązaniu dołączyłem skrypt install.cmd i uninstall.cmd których treść zamieszczam poniżej:
| Kod: |
@echo off
mkdir "%ProgramFiles%\XStandard"
mkdir "%ProgramFiles%\XStandard\Bin"
copy x:\Extensions\MD5\XMD5.dll "%ProgramFiles%\XStandard\Bin\"
copy x:\Extensions\MD5\uninstall.cmd "%ProgramFiles%\XStandard\Bin\"
cd "%ProgramFiles%\XStandard\Bin"
regsvr32 XMD5.dll
icacls XMD5.dll /grant:r Wszyscy:RX
|
Po rozpakowaniu i uruchomieniu install.cmd skrypt tworzy katalog XStandard\Bin w Program Files. Kopiuje tam rzeczony komponent dll, oraz plik do deinstalacji, a następnie rejestruje bibliotekę w systemie (zgodnie z instrukcjami na stronie XStandard). Dodatkowo nadaje jej uprawnienia do odczytu dla wszystkich.
Plik uninstall sobie odpuszczę, bo on po prostu wyrejestrowuje bibliotekę z systemu.
Wykorzystanie
Z biblioteki korzystamy w funkcjach, czy innych modułach użytkownika w bardzo prosty sposób, np. aby obliczyć sumę kontrolną MD5 dla danego ciągu:
| Kod: | LOCAL objMD5, checkSum
objMD5 = CreateObject("XStandard.MD5")
checkSum = objMd5.GetCheckSumFromString("ciąg znaków")
|
Oczywiście do czego to wykorzystacie to już zależy od waszej inwencji i potrzeb. Na pewno sprawdza się przy tworzeniu sumy kontrolnej danych przesyłanych przez sieć.
Post został pochwalony 0 razy
Ostatnio zmieniony przez Thorvaldsen dnia Czw 10:49, 01 Gru 2016, w całości zmieniany 8 razy
|
|
FAQ
Szukaj
Użytkownicy
Grupy
Galerie
Rejestracja
Zaloguj się, by sprawdzić wiadomości
Zaloguj
