Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Dotnetpro database performance contest
Message
De
14/05/2007 17:21:09
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
 
 
À
14/05/2007 09:40:02
Markus Winhard
Lauton Software GmbH
Nürnberg, Allemagne
Information générale
Forum:
Visual FoxPro
Catégorie:
VFP Compiler for .NET
Divers
Thread ID:
01224231
Message ID:
01225384
Vues:
27
>Hi Cetin,
>
>I already tried this before instead of the final SCAN loop:
>
>SET FIELDS GLOBAL
>SET FIELDS TO f1 = ;
>  STUFF( RTRIM( Name ), AT( " ", Name ), 1, ", " ) +", "+ ;
>  STUFF( RTRIM( Strasse ), RAT( " ", RTRIM( Strasse ) ), 1, ", " ) +", "+ ;
>  LEFT( Ort , AT( " ", Ort ) - 1 ) +", "+ ALLTRIM(SUBSTR( Ort, AT( " ", Ort ) )) +", "+ ;
>  RTRIM( eMail )
>COPY TO _FOLDER_ + "Adressen2.txt" SDF
>
>
>Unfortunately there's no difference on my machine. Did you have something different in mind?
>
>Markus

I don't have something specific in my mind. I don't even know the input and desired output yet. But it's anyway would be something to remove unnecessary function calls, unnecessary concatenation etc. For example it looks like you might instead do (not exactly same result):

SET FIELDS TO ;
f1 = strtran( Name ," ", ", ",1,1), ;
f2 = strtran( Strasse, " ", ", ",occurs(" ",strasse),1 ), ;
f3 = LEFT( Ort , AT( " ", Ort ) - 1 ),;
f4 = SUBSTR( Ort, AT( " ", Ort ) + 1 ), ;
eMail
COPY TO _FOLDER_ + "Adressen2.txt" type delimited

Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform