COM组件中如何返回一个Record记录类型属性？？？(100分)

T

ttlove

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-01-09

• #1

COM组件中如何返回一个Record记录类型属性，供ASP程序调用？？？
如
TTempRec = record
Ar1: string[50];
Ar2: string;
Ar3: Integer;
Ar4: Boolean;
Ar5: TDateTime;
end;

以及在ASP中如何实现调用？请高手赐教

 

B

bbscom

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-01-09

• #2

type
TTempRec = record
Ar1: string[50];
Ar2: string;
Ar3: Integer;
Ar4: Boolean;
Ar5: TDateTime;
end;

var
myre:TTempRec;

myre.ar2:='bbscom';

response.write DelphiObj.ReName <-- ReName是你自己定義的方法。
支持交流QQ：136293586

 

T

thx1180

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-01-09

• #3

用 OleVariant 类型返回，这可是标准的 COM 数据类型：
http://www.delphibbs.com/delphibbs/dispq.asp?lid=2665183

 

1

13708782004

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-01-09

• #4

dim objCom
set objcom=create('server.mymetho')
ojbCom.GetREC()
呵呵

 

1

13708782004

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-01-09

• #5

呵呵
我还想出另外办法！
Ar1: string[50];
Ar2: string;
Ar3: Integer;
Ar4: Boolean;
Ar5: TDateTime;
全部做成方法，哈哈！在asp 中，你就
MY.AR1
MY.AR2
哈哈，就实现对象化了
OOP ASP !酷吧！
还可以做成素数组，也不得b了啊！

 

1

13708782004

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-01-09

• #6

哈哈，还可以继续做！
my.ar1.toString()
my.ar2.ToDatatime()
就是赛c #了，不妨叫做 aps #

 

T

ttlove

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-01-09

• #7

to thx1180:

用 OleVariant 类型返回，在ASP如何使用呢？

to 13708782004:

我现在就采用的方法就是全部做成属性，记录类型里的数据一个一个的返回，不过如果记录里的数据很多，返回的属性就很多，使用不太方便，所以我想直接返回一个类似记录类型的属性，那只要定义一个属性就行了。

 

T

thx1180

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-01-09

• #8

先判断返回如果的是一个 OleVariant 数组，然后一个一个取元素用就是了；

看来楼主没有仔细看给你的链接，因为那里面已经有答案了。

 

T

ttlove

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-01-10

• #9

接受答案了.