Copied from:

http://windowsitpro.com/article/articleid/98551/enable-remote-desktop-over-a-network-on-demand.html

::RemoteDesktopTool.bat Built by Steve Signorelli. 
::
Inspired by —Alex K. Angelopoulos and InstantDoc #98551

@ECHO OFF
:Prompt
::Prompting technician for machine name/IP which to connect
SET /P TargetMachine=Please enter the machine name or IP address: 
CLS
ECHO Remote Desktop Check on \\%TargetMachine%
:Menu
ECHO.
ECHO 1. Remote Desktop Check (Enabled 0x0 or disabled 0x1)
ECHO 2. Remote Desktop On (0x0)
ECHO 3. Remote Desktop Off (0x1)

set choice=
set /choice=Please type in your choice and press enter.
if not '%choice%'==set choice=%choice:~0,1%
if '%choice%'=='1goto RemoteDesktopCheck
if '%choice%'=='2goto RemoteDesktopOn
if '%choice%'=='3goto RemoteDesktopOff
ECHO "%choice%" is not valid please try again
ECHO.
goto Menu

::Listing 3: CheckRD.cmd
:RemoteDesktopCheck
@reg query 
"\\%TargetMachine%\HKLM\SYSTEM\CurrentControlSet\Control\Terminal Server" /v fDenyTSConnections
GOTO Prompt

::Listing 4: RDOn.cmd
:RemoteDesktopOn
@reg add 
"\\%TargetMachine%\HKLM\SYSTEM\CurrentControlSet\Control\Terminal Server" /v fDenyTSConnections /t REG_DWORD /0 /f
GOTO Prompt

::Listing 5: RDOff.cmd
:RemoteDesktopOff
@reg add 
"\\%TargetMachine%\HKLM\SYSTEM\CurrentControlSet\Control\Terminal Server" /v fDenyTSConnections /t REG_DWORD /1 /f
GOTO Prompt