Microsoft vbscript运行时错误：所需对象：'[string：" advfee.txt"]' [英] Microsoft vbscript runtime error: object required: '[string: "advfee.txt"]'

问题描述

Dim oFile，oFilesys，oFileADVFEEMAA，oFileADVFEE

set oFilesys = CreateObject（Scripting.FileSystemObject）

wscript.echoLine 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.Name） - Microsoft VBScript运行时错误：需要对象：'[string：ADVFEE.txt]' - 这里错误

wscript.echo文件名& oFile
如果oFileADVFEEMAA.Size = 1则
然后

oFileADVFEEMAA.Delete

wscript.echoADVFEEMAA文件被删除。

wscript.quit 0

否则

如果oFileADVFEEMAA.Size> 1和oFileADVFEE.Size> 1那么

wscript.echo问题2带有数据的ADVFEE文件。

wscript.quit 1

否则

如果oFileADVFEEMAA.Size> 1和oFileADVFEE.Size = 1则

oFileADVFEE.Delete

oFileADVFEEMAA.Name = oFile

script.echoADVFEEMAA重命名为& oFileADVFEEMAA.Name

wscript.quit 0

结束如果

结束如果

结束如果



我尝试了什么：



Dim oFile，oFilesys，oFileADVFEEMAA，oFileADVFEE

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.Name） - Microsoft VBScript运行时错误：需要对象：'[string：ADVFEE.txt]' - 这里错误

wscript.echo文件名& oFile
如果oFileADVFEEMAA.Size = 1则
然后

oFileADVFEEMAA.Delete

wscript.echoADVFEEMAA文件被删除。

wscript.quit 0

否则

如果oFileADVFEEMAA.Size> 1和oFileADVFEE.Size> 1那么

wscript.echo问题2带有数据的ADVFEE文件。

wscript.quit 1

否则

如果oFileADVFEEMAA.Size> 1和oFileADVFEE.Size = 1则

oFileADVFEE.Delete

oFileADVFEEMAA.Name = oFile

script.echoADVFEEMAA重命名为& oFileADVFEEMAA.Name

wscript.quit 0

结束如果

结束如果

结束如果

解决方案

删除这些行：

设置oFile = oFilesys。 GetFileName（oFileADVFEE.Name） - Microsoft VBScript运行时错误：需要对象：'[string：ADVFEE.txt]'--- errror here 
 wscript.echo文件名& oFile 

并直接使用oFileADVFEE.Name：

 wscript.echo文件名& oFileADVFEE.Name 

Dim oFile, oFilesys,oFileADVFEEMAA, oFileADVFEE
set oFilesys = CreateObject("Scripting.FileSystemObject")
wscript.echo "Line 2"
set oFileADVFEEMAA = oFilesys.GetFile ("D:\NDM\Upload\BPS_JE\BPSFile\ADVFEEMAA.txt")
wscript.echo "Line 3"
set oFileADVFEE= oFilesys.GetFile ("D:\NDM\Upload\BPS_JE\BPSFile\ADVFEE.txt")
wscript.echo "Line 4"
set oFile = oFilesys. GetFileName(oFileADVFEE.Name) –" Microsoft VBScript runtime error: Object required: '[string: "ADVFEE.txt"]'"---errror here
wscript.echo "File Name " & oFile
if oFileADVFEEMAA.Size = 1 Then
oFileADVFEEMAA.Delete
wscript.echo "ADVFEEMAA file is Deleted."
wscript.quit 0
Else
If oFileADVFEEMAA.Size>1 and oFileADVFEE.Size >1 Then
wscript.echo "Problem 2 ADVFEE files with data."
wscript.quit 1
Else
If oFileADVFEEMAA.Size>1 and oFileADVFEE.Size = 1 Then
oFileADVFEE.Delete
oFileADVFEEMAA.Name = oFile
script.echo " ADVFEEMAA renamed to " & oFileADVFEEMAA.Name
wscript.quit 0
End If
End If
End If

What I have tried:

Dim oFile, oFilesys,oFileADVFEEMAA, oFileADVFEE
set oFilesys = CreateObject("Scripting.FileSystemObject")
wscript.echo "Line 2"
set oFileADVFEEMAA = oFilesys.GetFile ("D:\NDM\Upload\BPS_JE\BPSFile\ADVFEEMAA.txt")
wscript.echo "Line 3"
set oFileADVFEE= oFilesys.GetFile ("D:\NDM\Upload\BPS_JE\BPSFile\ADVFEE.txt")
wscript.echo "Line 4"
set oFile = oFilesys. GetFileName(oFileADVFEE.Name) –" Microsoft VBScript runtime error: Object required: '[string: "ADVFEE.txt"]'"---errror here
wscript.echo "File Name " & oFile
if oFileADVFEEMAA.Size = 1 Then
oFileADVFEEMAA.Delete
wscript.echo "ADVFEEMAA file is Deleted."
wscript.quit 0
Else
If oFileADVFEEMAA.Size>1 and oFileADVFEE.Size >1 Then
wscript.echo "Problem 2 ADVFEE files with data."
wscript.quit 1
Else
If oFileADVFEEMAA.Size>1 and oFileADVFEE.Size = 1 Then
oFileADVFEE.Delete
oFileADVFEEMAA.Name = oFile
script.echo " ADVFEEMAA renamed to " & oFileADVFEEMAA.Name
wscript.quit 0
End If
End If
End If

解决方案

Remove these lines:

set oFile = oFilesys. GetFileName(oFileADVFEE.Name) –" Microsoft VBScript runtime error: Object required: '[string: "ADVFEE.txt"]'"---errror here
wscript.echo "File Name " & oFile

and use the oFileADVFEE.Name directly:

wscript.echo "File Name " & oFileADVFEE.Name

这篇关于Microsoft vbscript运行时错误：所需对象：'[string：" advfee.txt"]'的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！