cmd in Full screen dosen't work using SendKeys"%{enter}"?

[hackoo]

I want to begin my application with the console MS-DOS in Full screen using SendKeys"%{enter}": simulation of ALT+ENTER but it dosen't work for me

Set variable=CreateObject("WScript.Shell")
variable.Run("cmd /C %windir%\system32\cmd.exe")
wscript.sleep 10
variable.SendKeys ("@echo off")
wscript.sleep 100
variable.appactivate "cmd.exe"
wscript.sleep 100
variable.SendKeys "%{enter}",True
'simulation of ALT+ENTER but this dosen't work

 

[markdmac]

I'm running WIndows 7 and Alt+Enter when manually execute has no effect. You sure it works on your system? I suspect that functionality was removed with Vista.

Pressing Alt does not bring up the context menu as I would expect it to as well.

I hope you find this post helpful.

Regards,

Mark

Check out my scripting solutions at

http://www.thespidersparlor.com/vbscript

Work SMARTER not HARDER. The Spider's Parlor's Admin Script Pack is a collection of Administrative scripts designed to make IT Administration easier! Save time, get more work done, get the Admin Script Pack.

 

[markdmac]

I should have done more research before posting. I have confirmed that Full Screen was removed from Vista. So what OS are you using?

Take a look at this link, it may assist you.

http://www.mydigitallife.info/2008/01/03/how-to-fully-maximize-command-prompt-window-in-vista/

I hope you find this post helpful.

Regards,

Mark

Check out my scripting solutions at

http://www.thespidersparlor.com/vbscript

Work SMARTER not HARDER. The Spider's Parlor's Admin Script Pack is a collection of Administrative scripts designed to make IT Administration easier! Save time, get more work done, get the Admin Script Pack.

 

[hackoo]

Hello,
I'm running Windows XP service Pack 3,and Alt+Enter when manually execute it works fine. But when i try to use it with my script it has no effect i don't know why ?

 

[hackoo]

Hi,
The only treak that i have found is to change the Registry like this :

dim variable
Set variable=CreateObject("WScript.Shell")
variable.regWrite "HKEY_CURRENT_USER\Console\Fullscreen", "1", "REG_DWORD"
variable.run "Taskkill /IM Explorer.exe /F", 0 ,True
wscript.sleep 5000
variable.run "Explorer.exe"
wscript.sleep 5000
variable.Run("cmd /C %windir%\system32\cmd.exe")