Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Importing Large Text in Excel Column
Message
 
 
To
30/01/2003 10:56:10
Jay Johengen
Altamahaw-Ossipee, North Carolina, United States
General information
Forum:
Visual FoxPro
Category:
Troubleshooting
Miscellaneous
Thread ID:
00747103
Message ID:
00749442
Views:
25
Hi Renoir,

Today I got a chance to take a closer look at this problem an found out that SQLTABLES return list of the sheets in Excel file with following call.
nTables = SQLTABLES(lnConnHand, ['TABLE','SYSTEM TABLE'], 'tExcelFile')
HTH

>Sergey,
>
>I get a valid handle, but the SQLTABLES creates tExcelFile with no records. Is there something else I need to do to tell it to get the Excel file as data?
>
>Regard, Renoir
>
>
>lcConnStr = ;
>"DRIVER={Microsoft Excel Driver (*.xls)};" + ;
>"FIL=Excel 97;" + ;
>"DefaultDir=D:\Tools\Tasks;" + ;
>"DBQ=D:\Tools\Tasks\TaskList.xls"
>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
>
--sb--
Previous
Reply
Map
View

Click here to load this message in the networking platform