如何写入到以日期命名的新文本(已解决)

xymc

$file="QQ.txt"

$sString = FileRead($file)

FileWrite("原文件.txt",$sString)

$sString= StringReplace($sString,'=','        ')

$sString= StringReplace($sString,'----','        ')

FileClose(FileOpen($file, 2))

FileWrite("已替换.txt",$sString)

MsgBox(0, "", "替换完成!", 10)

以上是读取QQ.TXT替换=为        分隔符，保留原文件，并写入到已替换.txt里面
我想写入到以当前日期命名的新文本的新文本里面，如201509251647.txt里面
怎么加变量，我加了不成功，不知道为什么
$TIME = @YEAR & @MON & @MDAY & @HOUR & @MIN

Huiseyu

怎么可能..

Local $TIME = @YEAR & @MON & @MDAY & @HOUR & @MIN &'.txt'
FileWrite($TIME , $TIME)
MsgBox(8096 ,$TIME ,$TIME)
If FileExists($TIME) Then ShellExecute($TIME)

xymc

怎么可能..
Huiseyu 发表于 2015-9-25 18:52

#include <Date.au3>
Local $TIME = @YEAR & @MON & @MDAY & @HOUR & @MIN &'.txt'

$file="QQ.txt"

$sString = FileRead($file)

FileWrite("原文件.txt",$sString)

$sString= StringReplace($sString,'=','        ')

$sString= StringReplace($sString,'----','        ')

FileClose(FileOpen($file, 2))

FileWrite($TIME ,$sString)

MsgBox(0, "", "替换完成!", 10)

OK,解决了