General information
Category:
Forms & Form designer
Sorry, I forgot a few additional commands.
I use something like the following to extract RTF content
The start seems to be consistent for RTF file types.
lcFPTFile = Forceext(lcfname, '.fpt')
str1 = Filetostr(lcFPTFile )
liStart = 521 && start for RTF files, may be different for other file types
lcContent = Substr(str1, liStart)
>Ken,
>G is internally M but what would this help for? How would this strip out OLE header?
>Cetin
>
>>You can manually set the field type character in the DBF to be a Memo field
>>For this to work, make sure the first field is the General field
>>
>>Not sure where I found this code, I believe it was here.
>>
>>There may be more intelligent code out there that parses the whole DBF structure for General fields. Anyway, this worked for me.
>>
>>select em_photo from mydb where condition into dbf c:\temp.dbf
>>
>>lnHandle = Fopen(lcfname,12) && open lowlevel to change
>>
>>Fseek(lnHandle,43,0)
>>
>>lctype = FREAD(lnhandle, 1)
>>IF lctype = 'G'
>> Fseek(lnHandle,43,0)
>> Fwrite(lnHandle,'M',1) && Changing General to Memo
>>ELSE
>> ? lctype
>> WAIT 'not gen '
>> endif
>>Fclose(lnHandle)
>>
>>
>>
>>>Hey,
>>>I want to store the snaps(in JPEG Format) of employee to the database.
>>>I use a picture control to show this image on the form.
>>>While saving the snaps I can directly save it to the database using...
>>>
>>>APPEND GENERAL em_photo FROM z:\data\images\ku0001.jpg
>>>
>>>But while retriving the same, I am not able to do the same.
>>>Please suggest me a way out.
>>>Thanks in advance.
Previous
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only