Hello John,
Try this code:
*************************************
LcFlSrcXls="c:\book1.xls"
import from (LcFlSrcXls) xls
alter table book1 alter column (field(3)) M
oleapp = CREATEOBJECT("Excel.Application")
OleApp.DisplayAlerts = .f.
=oleapp.Workbooks.Open(LcFlSrcXls)
sele book1
iscan=0
scan
iscan=iscan+1
replace (field(3)) with oleapp.ActiveSheet.Range("C"+alltr(str(iscan))).Text
endscan
oleapp.Workbooks.Close
OleApp.Quit
RELEASE oleapp
*************************************
Succes!
Liviu.
________________________________
From: John Weller <[email protected]>
To: [email protected]
Sent: Tuesday, February 12, 2013 12:43 PM
Subject: Import From Excel
I have some data in the form of an Excel spread sheet which I want to import
into a table. The problem is that one column has some entries that are more
than 254 characters. I want to import that into a memo field but APPEND
does not support appending into memo fields and APPEND MEMO appears to just
append one text file to one field.
Any suggestions? If all else fails I will split them by hand into 200
character blocks and then concatenate them once they are imported but as
there are about 300 rows I'd prefer to do it as a programme.
John Weller
01380 723235
07976 393631
_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message:
http://leafe.com/archives/byMID/profox/[email protected]
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
--- StripMime Report -- processed MIME parts ---
multipart/alternative
text/plain (text body -- kept)
text/html
---
_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message:
http://leafe.com/archives/byMID/profox/[email protected]
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
