format 函数 format时间问题

想用系统时间作为文件名使用
其中的一段代码为
filename=format(now,"short date")
xlbook.saveas=(dir1.path & "\" & "01_" & filename)
msgbox filename

在XP系统下，vb6   msgbox  =2015-07-08
在win7系统下，vb6  msgbox =2015/7/8

xp系统下中间是减号，系统认为可以作为文件名使用，运行正常。
win7系统下，中间是“/”,不能作为文件名使用，运行出错。



另外
如果想把文件名加入小时和分钟数，应如何写format
如：2015-07-08 13:22:22
文件名为2015-07-08-13-22-22，中间的减号可以不要，形式要求不严格。

哪位高人指点一下？