Página 1 de 1

Escrevendo em arquivo texto

Enviado: 17 Out 2005 14:41
por Mário Isa
alÔ Colegas:
Tentei fazer este programa:
set printer to local.bat
set device to printer
@ 0,0 say 'start iexplore http://www.ig.com.br'
set devi to scre
set printer to
winexec(local)

Mas na hora de executar o say ele não reconhece.
Alguém tem alguma dica?
Obrigado

Enviado: 17 Out 2005 14:47
por kiko
o seu SET DEVICE esta como PRINT
entaum, eh igual no clipper...
ao inves de

Código: Selecionar todos

@ 00,00 SAY "OLA MUNDO"
é

Código: Selecionar todos

@ PROW()+00,00 SAY "OLA MUNDO"
eh isso ai

Enviado: 17 Out 2005 21:15
por Clipper
Prezado Mario

Neste caso não faz diferença alguma o uso da função PROW() já que ele está direcionando para um arquivo, tanto faz 00,00 ou prow()+00,00.

Não seria mais fácil fazer assim ?

MEMOWRIT("LOCAL.BAT","start iexplore http://www.ig.com.br")

Até logo.

Marcelo

Enviado: 22 Out 2005 16:14
por rochinha
Amiguinho

Faça assim:

...
vARQ := FCreate( "LOCAL.BAT" )
vCMD := "start iexplore http://www.ig.com.br" + Chr( 13 ) + Chr( 10 )
FWrite( vARQ, @vCMD, Len( vCMD ) )
FClose( vARQ )
WinExec("LOCAL.BAT")
...

Ou use esta função

function QueroIrPara( site )
WinExec( "start " + site )
return .t.

@braços :?)