wrun em 64 bits nao funciona ???

[tonyx]

FUNCAO WRUN(ccomando)
oShell := CreateObject("WScript.Shell")
Ret := oShell:Run("%comspec% /C"+cComando,0,.T.)
oShell := Nil
return(nil)

:%

[sygecom]

Apesar de o meu está um pouco diferente do seu isso funciona sim, está mandando o caminho completo do arquivo que está abrindo ?

[tonyx]

a mesma funcao funciona no computador de 32 bits sem ploblema -- e que agora passamos usar o 64 bits e nao executou ...
--- o mais interesante de tudo e que troquei isto tudo por RUN(CCCOMANDO) E REALIZOU COM TELA FECHADA ??
JA NO 32 BITS REALIZOU COM TAIS JANELAS PRETAS


PERGUNTA: ? no xharbour tem como saber que ede 32 ou 64 bits funcao OS(0 da como wundows XP.. tem outra ?? na arquitetura ...

se for 32bits usarei o tal wrun() se for 64 bits usarei o RUN tradicional mesmo()

:%

[tonyx]

O MAIS UMA PARA APRENDER ...
deixei a funcao wrun tradicional ... funcionando normalmente no micro de 64 bits

APENAS ALTERANDO NO ICONE em propriedade retirando apenas
COMPATIBILIDADE RETIREI COLOQUEI EM BRANCO

FUNCIONOU

O COISA DE DOIDO...

[Pablo César]

Bom saber que resolveu dessa forma. Mas também seria interessante encontrar uma rotina que detectasse 64 e 32.