winexec telnet

[MarcoBoschi]

Why this program does not run telnet in windows 7
in XP it works fine

#include "fivewin.ch"
FUNCTION MAIN()
winexec( "telnet" )
RETURN NIL

P.S. telnet is enabled

[ADutheil]

May be because telnet is not enabled by default in win 7. Can you run it from prompt?
Sorry I did not seen telnet is enabled.

[MarcoBoschi]

P.S. is enabled!

[Rick Lipkin]

Marco

Try it this way and see what happens

Code: Select all  Expand view

 WaitRun( "Telnet",1 )  
 

Rick

[MarcoBoschi]

Rick,
nothing

If I copy telnet.exe in the same folder of program
IT RUNS

bye

[Rick Lipkin]

Marco

Test this :

Code: Select all  Expand view

WaitRun( "c:\windows\system32\Telnet.exe",1 )
 

If this works you can pull the "c:\windows" variable from the environment or this might work

Code: Select all  Expand view

WaitRun( GetWinDir()+"\system32\Telnet.exe",1 )
 

Rick

[ADutheil]

This works for me but it prompts for the user password.

Code: Select all  Expand view

cStrg := "runas /noprofile /user:" + GetEnv( "COMPUTERNAME" ) + "\" + GetEnv( "USERNAME" ) + " TELNET"
winexec( cStrg )

@Rick: when you use winexec waitrun etc... it seems you loose elevated privileges. My login has administrator privileges for my computer. If i open a prompt with start button I can run telnet. If I open the prompt with waitrun or winexec telnet does not appear even with dir c:\windows\system32.

[MarcoBoschi]

ok
many thanks