This is my script 

Option Explicit
Dim obj
Dim objShell

Set obj=CreateObject("wscript.shell")

Obj.run "cmd.exe"

Set objExecObject = objShell.Exec("cmd /cd")

I am new to this so im not sure what i am doing wrong it opens cmd.exe but does not execute. Can some one please tell me how 

I can get it to execute a command