如何把vbs的变量作为参数传给bat文件？【急】

Question

vbs文件：
Dim objshell
Dim ex_date 
set objshell=CreateObject("Wscript.Shell")
ex_date=dateadd("d",-1,date)
objshell.Run("cmd /k 1.bat ex_date")

bat文件：

echo %1

运行vbs之后，cmd显示的是ex_date,而不是时间。