ActiveX DLL中怎么加入控件？

[King]

想开发一个ASP组件，实现发送邮件一类的功能，需要使用Winsock、Internet Transfer等控件，但不知道怎么操作，请指教。

[Un1]

1.工程插入一个Form1, 在Form上放控件, 比如Winsock1.
2.在类中声明:"
Dim f As Form1

[Un1]

1.工程插入一个Form1, 在Form上放控件, 比如Winsock1.
2.在类中声明:"
Private f As Form1
Private WithEvents Winsock1 As Winsock

3.在类的初始化中加入:

Set f = New Form1
Load f

Set Winsock1 = f.Winsock1

4.在类中编写你的Winsock1处理代码

5.在类终结加入代码:
Set Winsock1 = Nothing

Unload f
Set f = Nothing

[「已注销」]

你用什么开发?

[Un1]

是！

[King]

我用VB开发。
还有一个附带的问题：
我从一些资料中找到Public Sub FunctionName(PassedScriptingContext As ScriptingContext)可以在ASP中传递参数到OCX函数，但没有说如何返回结果，请再点拨一下。

[King]

是不是标准的窗体就可以？