Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Long fields with excel
Message
De
26/08/2005 09:21:39
 
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Versions des environnements
Visual FoxPro:
VFP 7 SP1
OS:
Windows XP SP2
Network:
Windows 2000 Server
Database:
Visual FoxPro
Divers
Thread ID:
01044055
Message ID:
01044269
Vues:
11
i'cant use copy to c:\yy type xls look my program

the problem is numcta field , that data is a account number of bank.

oExcel.cells(lnCells,10)=ALLTRIM(sexo)
oExcel.cells(lnCells,12)=ALLTRIM(dircorres)
oExcel.cells(lnCells,13)=ALLTRIM(ciudadcorr)
oExcel.cells(lnCells,14)=telcorresp
oExcel.cells(lnCells,17)=ALLTRIM(formapago)
oExcel.cells(lnCells,18)=' '+ALLTRIM(NUMCTA)
oExcel.cells(lnCells,20)=ALLTRIM(banco)
DO case
CASE ctacorrien=.T.
oExcel.cells(lnCells,21)='PLSANCHK'
CASE ctaahorros=.t.
oExcel.cells(lnCells,21)='PLSANSAV'
CASE TARJCREDIT=.t.
oExcel.cells(lnCells,21)='TARJCREDIT'
CASE UPPER(SUBSTR(clasetarje,1,1))='V'
oExcel.cells(lnCells,22)='PV'
CASE UPPER(SUBSTR(clasetarje,1,1))='M'
oExcel.cells(lnCells,22)='PM'
ENDCASE
oExcel.cells(lnCells,24)=ALLTRIM(dptocorres)
oExcel.cells(lnCells,25)=ALLTRIM(tmstart)
oExcel.cells(lnCells,26)=ALLTRIM(operador)
SKIP
ENDDO
Daniel Vargas.
MCP - Microsoft Certified Professional

"El callar y escuchar es cosa de sabios por ello nuestro grito nace de silencio consciente fuerte y elocuente... vivir de manera diferente es morir siendo libre"

Elkin Ramirez-Kraken

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

Click here to load this message in the networking platform