咱们不能创建对象.....????????????????急

[matataxu]

Private Sub Command1_Click()
Dim f As Object
mkdir "c:\ppp"
Set f = CreateObject("Scripting.FileSystemObject") '--->出现错误
f.copyfile "c:\001.bmp", "c:\ppp\001.bmp", overwrite
End Sub

错误:说activex不能创建对象,....
我想这个是程序的问题,还是机器vb的问题.

[TechnoFantasy]

程序没有问题，可能是没有注册FSO对象。你可以利用regsvr32.exe注册Windows/System目
录下的scrrun.dll先，然后再运行程序。

[hzh_wen_x]

你是SP3吧！！ 把你的VB更新一下吧，最新的SP5试试看

[qaymuic]

没有必要用SCRIPTING。直接用filecopy src,des不是更好嘛？