Dim objFso,objFolder,File
Set objFso=CreateObject("Scripting.FileSystemObject")
Set objFolder=objFso.getFolder(".\temp1") '这个路径你要改哦
For Each File In objFolder.Files
If File.Name="*.txt" Then
File.Name="demo.txt"
End If
Next
美世家食通天5 故障,点击埋单后所有点的菜和数据金额都不见。如何解决