Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Net Send/Net View
Message
De
03/07/2002 18:58:20
 
 
À
03/07/2002 16:16:34
Information générale
Forum:
Visual FoxPro
Catégorie:
Fonctions Windows API
Divers
Thread ID:
00671765
Message ID:
00675157
Vues:
17
This message has been marked as the solution to the initial question of the thread.
>Oi Alex,
> Fiz o teste e faltou pouco para atingir o esperado, e que eu preciso gerar um arq. txt com o resultado do comando, como segue:
>
>oShell.Run("NET VIEW >C:\TEMP\TESTE.TXT",SW_SHOW_MINIMIZED,.F.)
>
>Não é apresentado nenhum erro, porém não é gerado o arq.
>
>Atualmente utilizo RUN NET VIEW >c:\temp\teste.txt


OK. Tenta asim:
oShell = createobject("WScript.Shell")
STRTOFILE("NET VIEW >C:\TEMP\TESTE.TXT","TMP.BAT")
oShell.Run("TMP.BAT",SW_SHOW_MINIMIZED,.F.)
HTH


Alex Feldstein, MCP, Microsoft MVP
VFP Tips: English - Spanish
Website - Blog - Photo Gallery


"Once again, we come to the Holiday Season, a deeply religious time that each of us observes, in his own way, by going to the mall of his choice." -- Dave Barry
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform