Ошибка выполнения Microsoft VBScript с: требуется объект: '[String: строка "advfee.txt"]'
Дим офиле, офилесис,офилеадвфеемаа, офилеадвфее
set oFilesys = CreateObject("Scripting.Filesystemobject, с")
wscript.echo "строка 2"
множество oFileADVFEEMAA = oFilesys.Метод Getfile ("D:\NDM\Upload\BPS_JE\BPSFile\ADVFEEMAA.txt")
wscript.echo "строка 3"
набор oFileADVFEE= oFilesys.Метод Getfile ("D:\NDM\Upload\BPS_JE\BPSFile\ADVFEE.txt")
wscript.echo "строка 4"
набор oFile = oFilesys. GetFileName(oFileADVFEE.Имя) –“ ошибка выполнения Microsoft VBScript с: требуется объект: '[String: строка "ADVFEE.txt"]'”---errror здесь
wscript.echo "имя файла “ & oFile
если офилеадвфеема.Тогда Размер = 1
офилеадвфеема.Удалить
wscript.echo "файл ADVFEEMAA удален."
объект WScript.бросить курить 0
Еще
Если oFileADVFEEMAA.Size>1 и oFileADVFEE.Размер >1 тогда
wscript.echo "Проблема 2 файлы ADVFEE с данными."
объект WScript.бросить курить 1
Еще
Если oFileADVFEEMAA.Size>1 и oFileADVFEE.Тогда Размер = 1
офилеадвфи.Удалить
офилеадвфеема.Имя = oFile
script.echo "ADVFEEMAA переименован в" & oFileADVFEEMAA.Name
объект WScript.бросить курить 0
Конец, Если
Конец, Если
Конец, Если
Что я уже пробовал:
Дим офиле, офилесис,офилеадвфеемаа, офилеадвфее
set oFilesys = CreateObject("Scripting.Filesystemobject, с")
wscript.echo "строка 2"
множество oFileADVFEEMAA = oFilesys.Метод Getfile ("D:\NDM\Upload\BPS_JE\BPSFile\ADVFEEMAA.txt")
wscript.echo "строка 3"
набор oFileADVFEE= oFilesys.Метод Getfile ("D:\NDM\Upload\BPS_JE\BPSFile\ADVFEE.txt")
wscript.echo "строка 4"
набор oFile = oFilesys. GetFileName(oFileADVFEE.Имя) –“ ошибка выполнения Microsoft VBScript с: требуется объект: '[String: строка "ADVFEE.txt"]'”---errror здесь
wscript.echo "имя файла “ & oFile
если офилеадвфеема.Тогда Размер = 1
офилеадвфеема.Удалить
wscript.echo "файл ADVFEEMAA удален."
объект WScript.бросить курить 0
Еще
Если oFileADVFEEMAA.Size>1 и oFileADVFEE.Размер >1 тогда
wscript.echo "Проблема 2 файлы ADVFEE с данными."
объект WScript.бросить курить 1
Еще
Если oFileADVFEEMAA.Size>1 и oFileADVFEE.Тогда Размер = 1
офилеадвфи.Удалить
офилеадвфеема.Имя = oFile
script.echo "ADVFEEMAA переименован в" & oFileADVFEEMAA.Name
объект WScript.бросить курить 0
Конец, Если
Конец, Если
Конец, Если