看上去很简单，我怎么就怎么都调用不了啊，程序如下，
<script language="vbscript">
sub disk()
a=20
msgbox a
end sub
</script>

<%
disk()
%>
一调用就出错，Microsoft VBScript 运行时错误 (0x800A000D) 类型不匹配: 'disk'，垃圾百度竟然搜不到任何相关信息。

<script language="vbscript">
sub disk() 
a=20
msgbox a
end sub
disk()
</script>

楼上的xd误会我的意思了，我要求的是在asp的<%  %>里面调用。因为我的vb子程序要吧调用wmi后得到的数据存入数据库中的。

这是不行的

不行啊，那么自定义函数的数据无法传送给asp的话，自定义的函数价值何在啊。