CrLf

FileName:="d:\data.txt",ReadOnly:=True,Format:=6,Delimiter=:"|"

这是 vba 的参数赋值方法，不适用于 vbs
vbs 不能跳着赋值，只能挨个填坑：

set xlsfile=oExcel.Workbooks.Open( "d:\data.txt",,True,6,,,,,"|")COPY

CrLf

回复 6# 普大喜奔


    vbs 没有 FileName:=arg 这种用法

CrLf

回复 8# 普大喜奔


    我的意思是 vbs 没有 := 运算符

CrLf

回复 10# 普大喜奔


    没注意前面有个 set，已修改，但运行到那里应该会报错退出才是，你是怎么打开的...

CrLf

回复 12# 普大喜奔


    同样的代码，已测无误，可能是版本差异。
    我这里 MsgBox oexcel.Version 的结果是 11.0
    你可以去下一个 vbsedit 或者直接用 excel 的宏编辑器，利用自动提示看下 .open 方法的参数说明，把参数对上位置就行