Слушая тишину хвойного леса
Приветствую тебя о EvGenius.
E> Привет Liquid,
E> Wednesday, December 6, 2006, 3:12:04 PM, you wrote:
LN>> Приятного чаепития, ИНВ!
Liquid>>>> На этот случай есть солнце, солнышко, зайчонок,
Liquid>>>> медвежонок, лапуша, лапочка,
Liquid>>>> лапонька...
И>>> ужаз!!!!...... уж лучше просто "милая"....
LN>> Наташенька, милая, не злись :)
LN>> Я ведь по-доброму, и в свои слова вложил все самые лучшие чувства :)
E> Валерия, давай отвечу я :)
E> E> ой, бля
E> перед открытием попробуйте выполнить код
#define c_buf_size 32
m.fp_in = FOPEN('[путь имя файла]',2)
IF m.fp_in > 0
* First check that we have a FoxPro table...
m.buf=FREAD(m.fp_in,c_buf_size)
IF (SUBSTR(m.buf,1,1) = CHR(139) OR SUBSTR(m.buf,1,1) = CHR(203);
OR SUBSTR(m.buf,31,1) != CHR(0) OR SUBSTR(m.buf,32,1) != CHR(0))
=fclose(m.fp_in)
DO errormsg WITH c_notfox
RETURN TO cpzero
ELSE
* Now poke the codepage id into byte 29
=FSEEK(m.fp_in,29)
=FWRITE(m.fp_in,CHR(201))
=FCLOSE(m.fp_in)
ENDIF
ENDIF
--
С уважением, Малыш
Ну а кофе на клавиатуру кто пролил? Что, тоже вирус?
Это 630 письмо от данного подписчика в лист
Номер выпуска : 51732
Возраст листа : 1129 (дней)
Количество подписчиков : 130
Адрес в архиве : http://subscribe.ru/archive/rest.interesting.flame/msg/617496
Получить правила : mailto:rest.interesting.flame-rules@subscribe.ru
Формат "дайджест" : mailto:rest.interesting.flame-digest@subscribe.ru
Формат "каждое письмо" : mailto:rest.interesting.flame-normal@subscribe.ru
Формат "читать с веба" : mailto:rest.interesting.flame-webonly@subscribe.ru