Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Printing to a file
Message
De
09/07/2003 16:38:20
 
 
À
09/07/2003 15:07:32
Brian Weber
Ohio Department of Development
Columbus, Ohio, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Problèmes
Divers
Thread ID:
00808601
Message ID:
00808684
Vues:
15
Brian,

Give this a shot...I don't think I made any typos, but ya never know :)

Putting it into a text file is only another line of code...using COPY TO command.
create cursor nameList (lastName c(3))
with thisform.pageframe.page3.list3
    for i = 1 to .listCount
        insert into nameList values (left(.list(i),3))
    next i
endwith

select * from c:\phonebook\addresses.dbf ;
    where lastname in (select * from nameList) ;
    into table c:\phonebook\temp.dbf
>Thanks but it still isnt working like it should. Now it is asking me for what file to put everything into with each record that I want to print into it. When your printing 2000 records that gets annoying :) Does anyone know of a way to print this into a data base file or txt file that works? I have been trying to get this working for a about 2 days and havent had much luck.
>
>this is what the code currently looks like
>
>do while x < thisform.pageframe.page3.list3.listcount
> x=x+1
> m.lastname = left(thisform.pageframe.page3.list3.list(x),3)
> append from c:\phonebook\addresses for lastname = m.lastname
> COPY TO C:\phonebook\temp.dbf
> MODIFY FILE C:\phonebook\temp.dbf
> use
>enddo
Steve Gibson
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform