我头都搞大了，怎么这么个小程序问题出在哪里啊（学写ActiveX)

[sky9705]

我用VB写了一个完全模仿FSO的Dll控件，自己注册然后自己用Asp调用
一个问题真让我头疼了两天，只好请大家帮我看看。（新建ActiveX.dll)
工程名为MYFSO Class名称为Cmyfso
Dim fso As New FileSystemObject

Function MyCreateFolder(Foldername As String) As Folder
If Not fso.FolderExists(Foldername) Then
Set MyCreateFolder = fso.CreateFolder(Foldername)
End If
End Function

set fso=nothing
编译完后注册，在VB里都可以用，可是ASP调用的时候说
set Obj=server.createobject("myfso.cmyfso")
szpath=server.mappath("/boot/abc")
Obj.myCreateFolder szPath
问题来了
类型不匹配: 'FSO.mycreatefolder'
我就是搞不懂，我用obj.mycreatefolder "d:\boot\abc" 就可以可是用变量就是不行，大哥可以帮我看看吗，我要发神经了。趁现在还清醒，先谢谢你了。

[supergreenbean]

把声明类型的 As 类型 都去掉看看.asp里只有Variant一种类型

[sky9705]

哦，原来如此，我真是。。
暧，，怎么就没有想到呢。
晕，
可惜啊，浪费了我好多时间。。
应该可以的，我回去测试一下，可以的话，给楼上加100分

[junwhj]

试试给函数的参数加上Byval关键字：

Function MyCreateFolder(Byval Foldername As String) As Folder
If Not fso.FolderExists(Foldername) Then
Set MyCreateFolder = fso.CreateFolder(Foldername)
End If
End Function