blog 又搭工

								
					'该函数用来返回以当天日期和时间命名的字符串
					Function getFileName()
						getFileName=CSTR(Now())       '得到当前时刻的字符串
						getFileName=Replace(getFileName,"-","")  '利用Replace函数将日期中间的连线删除
						getFileName=Replace(getFileName,":","")  '利用Replace函数将日期中间的冒号删除
						getFileName=Replace(getFileName," ","")  '利用Replace函数将日期中间的空格删除
					End Function
					%>