一个控件调用的问题

Question

我用vb写了一个获得文件大小的activex Dll,其中类模块的代码如下：
Option Explicit
Public LocalFileName As String
'================================================
'//获得文件大小
Public Function Getsize(ByVal pFileName As String) As Long
  LocalFileName = pFileName
  Getsize = Format(FileLen(LocalFileName) / 1024 / 1024, "0.00")
End Function
在网页中我创建了一个按钮，代码如下：
var doc=document.forms[0];
var sFile=doc.Upload.value;
if(sFile=="")
{
  alert("请先点击【浏览】选择要上传的文件");
}
else
{
var oa=new ActiveXObject("MailGetSize.clsgetsize");
var sTmpFile=sFile.substr(sFile.lastIndexOf("\\")+1,sFile.length);
                  alert(oa); '从这里看oa对象是获得了的。
oa.Getsize(sTmpFile);
}
现在点击上述按钮就有错误，错误提示：缺少对象
请各位大虾帮忙分析分析，如果那位有现成的能否发给我看看

Answer 1

在自己电脑上开发的不需要专门注册的