制作ASP的ACTIVEX控件，怎么添加函数（我只会添加过程，但是我需要返回值！）

Question

制作ASP的ACTIVEX控件，怎么添加函数（我只会添加过程，但是我需要返回值！）

Answer 1

一样的啊你平常怎么用，现在还怎么用
难道你平常不使用function的吗

Answer 2

参数的类型必须是指针，并保证为out, retval就可以了（点参数旁边的…）

Answer 3

fengjn(颗粒)是对的。
补充一点：
要返回整数使用 long*
要返回字符串用 BSTR*
下拉列表中可能没有，手工输入即可。

Answer 4

Good 没什么可以说的了，不要给我分了，罐点水 哈

Answer 5

我实验成功了，我想有一个输入参数是字符形的，输出参数也是字符形的，开始老是出错，后来我全写成VARIANT形的了，就好用了。另外我添加了一个ReadOnly的Propoty,系统生成的就是函数，真有意思！
我返回整数用的是int也好用，系统给我变成了SYSINT，如下：
    //对文件解密，是一个Propoty,函数名是系统自己生成的
    function Get_DecryptFile(const InputFile,OutputFile: WideString): SYSINT;
      safecall;
    //对文件加密，是一个Propoty,函数名是系统自己生成的
    function Get_EncryptFile(const InputFile,OutputFile: WideString): SYSINT;
      safecall;
    //对字符串加密，是一个Propoty,函数是系统自己生成的
    function Get_DecryptStr(InputStr: OleVariant): OleVariant; safecall;
    //对字符串解密，是一个Propoty,函数是系统自己生成的
    function Get_EncryptStr(InputStr: OleVariant): OleVariant; safecall;
    //判断明文和译文是否匹配
    function Get_CanMatch(const Translation, Cryptograph: WideString): SYSINT;
      safecall;象我这么写确实好用，不知道为什么，请大家详细帮我讲讲，谢谢。