Asp组件初级入门与精通系列之五

<%
'定义,还可以把这一部分放到一个文件中,就像ado的记录集
const icfirst = 1
const icsecond = 2
const icthree = 3
const icfour = 4
const icfive = 5
const icsix = 6
const icserven = 7
const iceight = 8

set obj=server.CreateObject("fCom.fc5")
'这里可以使用iceight或者8,但是前者使代码具有更好的可读性
a= obj.CallDat(4,iceight)
Response.Write a
Response.Write "
"
a= obj.CallDat(4,8)
Response.Write a
%>