Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Importing Large Text in Excel Column
Message
From
30/01/2003 09:30:39
Jay Johengen
Altamahaw-Ossipee, North Carolina, United States
 
General information
Forum:
Visual FoxPro
Category:
Troubleshooting
Miscellaneous
Thread ID:
00747103
Message ID:
00747117
Views:
21
Thanks Sergey! It's good to need to be around...

I haven't gotten the help files for VFP loaded yet (server access issue), but the TEXT TO doesn't seem to set any values to anything. When I get to the lnConnHand = line it bombs as lcConnStr has no value. I'm just trying to go from an Excel sheet to a standalone DBF. Sorry about the formatting, but it's been so long I can't recall the codes show code snips properly.

Renoir

lcExcelFile = GETFILE()

TEXT TO lcConnStr TEXTMERGE NOSHOW
DRIVER=Microsoft Excel Driver (*.xls);
FIL=excel 8.0;
DefaultDir=<>;
DBQ=<>;
ENDTEXT

lnConnHand = SQLSTRINGCONNECT(lcConnStr)
IF lnConnHand > 0
STORE SQLTABLES(lnConnHand, 'TABLE', 'tExcelFile') TO nTables
IF nTables > 0
SELECT tExcelFile
lcSheet=ALLTRIM(tExcelFile.Table_Name)
lnSqlRes = SQLEXEC(lnConnHand, [SELECT * FROM "]+lcSheet+["],'tImport')
ENDIF
ln=SQLDISCONNECT(lnConnHand)
USE IN tExcelFile
USE IN tImport
ENDIF

>Nice to see you around. :)
>You can use ODBC as shown in Re: Append from (cFileName) xl8 -- Truncation Thread #743344 Message #745579.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform