Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to convert Excel 2007 to dbf
Message
 
 
À
09/08/2008 04:02:36
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP SP2
Network:
Windows 2000 Server
Database:
Visual FoxPro
Divers
Thread ID:
01337704
Message ID:
01372197
Vues:
50
Thanks a lot Tore, 39 helped. Can you give me define for it, so I would not use the "magic" number?

>>I need to convert a Excel 2007 to dbf
>>It's worked in Excel 3003
>>
>>TIA
>
>lcFile='yourfile.xls'
>Erase (Forceext(lcFile,'xxx'))
>ox=Createobject('excel.application')
>owb=ox.Workbooks.Open(lcFile)
>lcFile=Forceext(lcFile,'xxx')
>ox.DisplayAlerts= .F.
>owb.SaveAs(lcFile,39)
>owb.close()
>owb=.null.
>ox=.null.
>Release owb
>Release ox
>Close Databases all
>Create table yourtable...
>Append From (lcFile) xls
>Erase (lcFile)
If it's not broken, fix it until it is.


My Blog
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform