用fso复制文件的时候，可不是像dos命令一样操作。
把你代码中发生错误的一句修改为：

myfileobject.copyfile ("d:\txt1.txt")

FSO 对象模式各有两种方法移动、复制和删除文件，如下表所述。
任务 | 方法
----------------------------------------------------------------------------------------
移动文件 | File.Move 或 FileSystemObject.MoveFile
----------------------------------------------------------------------------------------
复制文件 | File.Copy 或 FileSystemObject.CopyFile
----------------------------------------------------------------------------------------
删除文件 | File.Delete 或 FileSystemObject.DeleteFile
----------------------------------------------------------------------------------------

下面给出一个功能完整的fso例子，演示各种操作：

下面的 VBScript 示例，在驱动器 C 的根目录中创建一个文本文件，向其中写一些信息，然后把它移动到 \tmp 目录中，并在 \temp 中做一个备份，最后把它们从两个目录中删掉。

要运行下面的示例，需要先在驱动器 C 的根目录中创建 \tmp 和 \temp 目录：


Sub ManipFiles
Dim fso, f1, f2, s
Set fso = CreateObject("Scripting.FileSystemObject")
Set f1 = fso.CreateTextFile("c:\testfile.txt", True)
Response.Write "Writing file
"
' 写一行。
f1.Write ("This is a test.")
' 关闭文件。
f1.Close
Response.Write "Moving file to c:\tmp
"
' 获取 C 的根目录(C:\)中的文件的句柄。
Set f2 = fso.GetFile("c:\testfile.txt")
' 把文件移动到 \tmp 目录。
f2.Move ("c:\tmp\testfile.txt")
Response.Write "Copying file to c:\temp
"
' 把文件复制到 \temp 目录。
f2.Copy ("c:\temp\testfile.txt")
Response.Write "Deleting files
"
' 获得文件当前位置的句柄。
Set f2 = fso.GetFile("c:\tmp\testfile.txt")
Set f3 = fso.GetFile("c:\temp\testfile.txt")
' 删除文件。
f2.Delete
f3.Delete
Response.Write "All done!"
End Sub

请仔细检查自己的代码，并参考提供的示例