Типы VS FoxPro encodings

Question

Я пытаюсь декодировать некоторые строки в DBF (созданный приложением Foxpro), и меня интересуют методы кодирования/шифрования FoxPro.

Вот пример закодированные строки: "òÙÛÚÓ ½kê3ù [ƒ~øžÃ + ™ Thoa-KH- гой" "| øHñyäEük @ ‰ fç9æ × İYİ ±:"

Может кто-нибудь сказать мне, метод кодирования этой строки, ИЛИ дать мне какое-либо предложение о методах кодирования Foxpro?

Спасибо!

Answer 1

Это зависит от версии FoxPro, самая последняя структура DBF (VFP 9) документирован здесь: https://msdn.microsoft.com/en-us/library/aa975386%28v=vs.71%29.aspx

Answer 2

Похоже, ваш текст может быть результатом «_Crypt.vcx», который займет заданную строку, применять любую кодовую фразу и генерировать выводную зашифрованную строку.

VFP имеет класс, который доступен в папке «FFC», где VFP будет по умолчанию установлен (через HOME (путь), в результате таких, как

C:\PROGRAM FILES (X86)\MICROSOFT VISUAL FOXPRO 9\ 

Вот пример набора кода для подключения к _crypt класс и образец, чтобы зашифровать строку, а затем расшифровать зашифрованную строку. Ваша строка отображается зашифрованной (очевидно), но если вы не знаете больше о шифровании (например, найти парольную фразу/ключ, вы можете быть немного застряли и в дальнейшем исследовать) ...

lcCryptLib = HOME() + "FFC\_Crypt.vcx" 
IF NOT FILE(lcCryptLib) 
    MESSAGEBOX("No crypt class library.") 
    RETURN 
ENDIF 
SET CLASSLIB TO (lcCryptLib) ADDITIVE 

oCrypt = CREATEOBJECT("_CryptAPI") 
oCrypt.AddProperty("myPassKey") 
oCrypt.myPassKey = "Hold property to represent some special 'Key/pass phrase' " 

*/ Place-holder to get encrypted value 
lcEncryptedValue = "" 
? oCrypt.EncryptSessionStreamString("Original String", oCrypt.myPassKey, @lcEncryptedValue) 

*/ Show results of encrypted value 
? "Encrypted Value: " + lcEncryptedValue 

*/ Now, to get the decrypted from the encrypted... 
lcDecryptedValue = "" 
? oCrypt.DecryptSessionStreamString(lcEncryptedValue, oCrypt.myPassKey, @lcDecryptedValue) 

? "Decrypted Value: " + lcDecryptedValue 


*/ Now, try with your string to decrypt 
lcYourString = [òÙÛÚÓ ½kê3ù[ƒ˜øžÃ+™Þoa-Kh— Gó¯ý""|øHñyäEük@‰fç9æ×ϯyi±:] 
lcDecryptedValue = "" 
? oCrypt.DecryptSessionStreamString(lcYourString, oCrypt.myPassKey, @lcDecryptedValue) 

? "Decrypted Value: " + lcDecryptedValue