Blog

Sys(2007 и странный CRC32

Разрабатываю интерфейс для работы со сторонним АПИ (ПРРО Украина). Для определенных функций они требуют передачи контрольной суммы строки. У них в документации приведен пример вычисления CRC32: cHashStr = "179625192271939,20082020,142338,10,4000002411,10,cdd68bb111f8993f3603f0179341571b35b73a07d5acee9b28fbfb714698e1b3" nCRC32: HEX = 0xbddbbda6, UInt = 3185294758 Пытаюсь на Фоксе получить...

Читать далее  

Refox!!! срочно, прога на FPD 26

привет всем! слезно прошу помощи. на работе есть программа расчетов с физ.лицами. она стоит на старом серваке, а сервак еле дышит. от проги есть EXE-шник и некоторые файлы. где-то нашла reFox 7 версии, сделала декомпиляцию, но в процессе декомпиляции выдается...

Читать далее  

аналог в vfp функции vba chrb()

Здравствуйте! Помогите пожалуйста перенести на vfp код из vba:[code]Function StringToMB(S) Dim I, B For I = 1 To Len(S) B = B & ChrB(Asc(Mid(S, I, 1))) Next StringToMB = B End Function[/code]

Читать далее  

SOS! Программе стал недоступен COM-порт, Штрих-М

Нихрена понять не могу. Работало себе работало и резко перестало. Схема такая. Фискальный регистратор (кассовый аппарат Штрих-М) каким-то образом подключается к компьютеру. Там несколько способов подключения, вопрос не в этом. Способ соединения настраивается в драйвере кассы. Драйвер выступает как com-сервер,...

Читать далее  

Очистить текстовый файл

Получаю с 1С текстовый файл. Читаю его: [code]Local gnFileHandle,nSize,cString gnFileHandle = FOPEN(VDTXTFILE) *Поиск конца файла nSize = FSEEK(gnFileHandle, 0, 2) IF nSize <= 0 * Если файл пустой THIS.prj_AppName = '' THIS.prj_UserLogin = '' ELSE * Если файл не пустой,...

Читать далее  

Про соглашения Visual Foxpro

Очень хочется совместными усилиями допинать черновой проект (готового не было, если у кого есть - делитесь!). Написан по аналогии с корпоративными требованиями к языку Java, все префиксы взял из книги Славы Клепинина. Ну, может еще что-то добавил. Просьба - покритиковать...

Читать далее  

popup не закрывается.

код кнопки [code]DEFINE POPUP pop1 FROM 10,10 TO 20,30 FONT 'CourierNew',14 IN SCREEN PROMPT FIELD pop_sql.price ON SELECTION POPUP pop1 _vfp.activeform.ch_msp() ACTIVATE POPUP pop1 [/code] Подскажите, пожалуйста, чего не хватает, чтобы при выборе popup закрывался Вот тут пример https://forum.foxclub.ru/read.php?29,201856,201954#msg-201954 Вложения:...

Читать далее  

Сокеты на API

Добрый день! Есть клиент-серверное решение использующее сокеты Winsock.OCX Нужно на клиенте перейти на API-шный вариант. Всякие socket()-connect()-sendData() победил. Остался вопрос по приему данных от сервера. Наверное можно по колхозному: запустить таймер и каждые 500 мс проверять буфер приема. Но хочется...

Читать далее  

How to Virtualize your VFP Application

https://www.macrosoftinc.com/how-to-virtualize-your-vfp-application/?utm_content=f8722b9923ff6c305b83045e14d43283&utm_campaign=utm_campaign%3Dvirtualize&utm_source=Robly.com&utm_medium=email

Читать далее  

select sql runtime error

Уважаемые знатоки! Понадобилось расширить работающую SQL-команду. Раньше команда была такая: [code]Select smetarab->nrazd, Min(razdel->naimrazd) As naimrazd, Sum(Round(smetarab->tekstoim,cop)) As sum_razd; from smetarab, razdel Where smetarab->nrazd=razdel->nrazd Group By smetarab->nrazd Order By smetarab->nrazd Into cursor tabrazd [/code] и она работала. После изменения (понадобилось увеличить...

Читать далее  

Авторизация
*
*
Генерация пароля