<?xml version="1.0" encoding="UTF-8"?>
<rename_preset case="none" group="My" ignoreext="yes" preset="08 添加后缀 当前日期" script="yes" type="normal" version="13">
	<from>*</from>
	<to>*</to>
	<script>@script vbscript
Option Explicit
Function OnGetNewName(ByRef getNewNameData)
        Dim item
        Set item = GetNewNameData.item
        OnGetNewName = item.name_stem &amp; &quot; - &quot; &amp; date() &amp; item.Ext
End Function
</script>
</rename_preset>
