Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Submitting comma delimited data
Message
De
11/05/2011 12:40:31
 
 
À
11/05/2011 12:19:38
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Versions des environnements
Visual FoxPro:
VFP 9
Divers
Thread ID:
01510319
Message ID:
01510349
Vues:
53
>>>Alright, I just tried it and it's still only giving me the first file I type in, ignoring the comma and other file I type after it... This is what the code looks like now:
>>>
>>>
NumberRecords = GETWORDCOUNT(m.bnin)
>>>			FOR i = 1 TO NumberRecords
>>>				m.bn = PADL(GetWordNum(m.bnin, i, ","),7,"0")				
>>>   			
>>>			*Opens the DBF file in the "key" folder, appends "A" and adds the user input as batch number
>>>			OpenTable(goWCServer.oConfig.oTask.cBTSPath+[key\A]+m.bn,[AppExp])
>>>			
>>>			*Select columns from table above, name them for Excel headers
>>>			SELECT 	bn as [BatchNum],;
>>>					pk as [RecNo],;
>>>					"" as [Approved],;
>>>					shdt as [ShipDate],;
>>>					canm as [Carrier],;
>>>					prno as [Pro],;
>>>					blno as [BOL],;
>>>					shnm as [Shipper],;
>>>					ozp as [OZip],;
>>>					conm as [Consignee],;
>>>					dzp as [DZip],;
>>>					wtttl as [Weight],;
>>>					"" as [ReWeigh],;
>>>					"" as [Notes],;
>>>					accd1 as [Acc1],;
>>>					acamt1 as [Amt1],;
>>>					accd2 as [Acc2],;
>>>					acamt2 as [Amt2],;
>>>					accd3 as [Acc3],;
>>>					acamt3 as [Amt3];
>>>			FROM AppExp; 
>>>			ENDFOR
>>>			
>>>*Copy data from cursor to Excel file
>>>COPY TO ("C:\test\"+[bn]+m.bn+[T2.xls])
>>
>>you've got the endfor in the wrong place, it should be after the copy to
>
>
>I just tried that too and get the same result... I don't get it.


For debugging step through and see what NumberOfRecords is
Frank.

Frank Cazabon
Samaan Systems Ltd.
www.samaansystems.com
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform