COM控件调用问题（请高手回答我给600分） ( 积分: 200 )

Z

zwd2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-25

• #1

请问如何将ASP调用COM的程序改写成DELPHI的程序
ASP程序如下：
Set Session("obj&quot = CreateObject("ConfAdmin.ConfManager&quot
dim result
dim confdatas
result = session("obj&quot.GetConfList(confdatas)
if isempty(confdatas) <> true then
conf_id = 0
while conf_id <=ubound(confdatas) //关键是这一行
Response.Write confdatas(conf_id)
Response.Write &quot;,&quot;
conf_id = conf_id + 1
wend
end if
Set Session(&quot;obj&quot = nothing

 

Z

zwd2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-25

• #2

请问如何将ASP调用COM的程序改写成DELPHI的程序
ASP程序如下：
Set Session(&quot;obj&quot = CreateObject(&quot;ConfAdmin.ConfManager&quot
dim result
dim confdatas
result = session(&quot;obj&quot.GetConfList(confdatas)
if isempty(confdatas) <> true then
conf_id = 0
while conf_id <=ubound(confdatas) //关键是这一行
Response.Write confdatas(conf_id)
Response.Write &quot;,&quot;
conf_id = conf_id + 1
wend
end if
Set Session(&quot;obj&quot = nothing

 

M

MayRoy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-25

• #3

学习，学习。
Delphi中的COM部分不熟，支持一下。请诸位大虾帮忙。我也好跟着进步啊。

 

1

14260068

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-25

• #4

给你一个例子，，也需要会帮到你
www.ftp888.com/delphiasp.rar

 

Z

zwd2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-25

• #5

14260068你好:谢谢您的例子,
我的问题不是编写ASP下使用的COM,而是如何将ASP调用COM的程序改写成DELPHI的程序,这个COM我没源码

 

S

shangshang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-25

• #6

ConfAdmin.ConfManager 对象是你自己写的吧，我怎么查不到？？
GetConfList　怎么声明的啊？　得给点资料才能帮你调试啊，MSDN上都查不着的，你这是什么组件？　什么方法？

 

Z

zwd2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-25

• #7

这是1个别人写的COM控件，不是公用的控件

 

S

shangshang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-25

• #8

笨啊，你不是希望别人帮你调通代码吗？　就不能公布一下方法声明什么的？　特别是那个
ＧｅｔＣｏｎｆＬｉｓｔ传入的是什么参数？返回的又是什么啊？你也不知道？

 

Z

zwd2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-27

• #9

我自己已经解决了，confdatas返回的是VarArray数组，这一点应该从ASP程序中看得出来，
不过还是谢谢大家了

 

F

fei_1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-27

• #10

用CreateOleObject(&quot;ConfAdmin.ConfManager&quot不行嗎？