Цитата(anvarga @ 20.7.2012, 09:20  ) |
| Вот это код: |
Я сильно не уверен, что это код фокспро.
| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > Foxpro/Clipper/Dbase > Как открыт (расшифровка) строка это поля |
| Автор: anvarga 19.7.2012, 12:42 |
| Меня есть dbf файл. Как открыт (расшифровка) строка это поля INVE0, INVE1, INVE2, Можно скачать http://www.dir.uz/ru/files/get/57882/kod_ochishga_dbf |
| Автор: Данкинг 19.7.2012, 13:41 |
| Если уверен, что файл не битый - поэкспериментируй с разными кодировками при открытии файла. Добавлено через 2 минуты и 25 секунд Но судя по тому, что некоторые поля отображаются нормально (FIO), в этих кривых полях изначально битые данные. Кодировка похожа на ДОСовскую. |
| Автор: anvarga 20.7.2012, 08:20 |
| Кодирование есть этот функция charxor() Вот это код: FUNCTION RCRI_() PARAMETER I, N, K PRIVATE A1, R, P MEMVAR->P := "пбЁмозвЎ" MEMVAR->A1 := &("DMGLAI")->INVEI&I IF EMPTY(A1) MEMVAR->R := SPACE(K) ELSE MEMVAR->X := SB4(A1, N, K) IF EMPTY(X) MEMVAR->R := SPACE(K) ELSE MEMVAR->R := CHARXOR(X, P) ENDIF ENDIF Можно просмотр это поля |
| Автор: Данкинг 20.7.2012, 09:28 | ||
Я сильно не уверен, что это код фокспро. |
| Автор: anvarga 20.7.2012, 09:43 |
| Код Clipper |
| Автор: Данкинг 20.7.2012, 10:34 |
| Что-то в клиппере я тоже не помню обозначений вроде := или -> , но пусть будет он. Но однако всё равно не понял, что требуется-то с этим кодом? |
| Автор: anvarga 20.7.2012, 12:27 |
| Вот это рисунок |
| Автор: Данкинг 20.7.2012, 12:54 |
| И что мне с того скриншота? Если это зашифрованные данные - то пиши декодер на основе функции шифрования. Если это просто глюк кодировки - то ищи, в какой кодировке это изначально было сделано. |