<% Stop Dim i ,arFid_rec,obj2 obj2 = Server.CreateObject("lsnObj.eveCLS") obj2.SIT_NO = Session("SIT_NO") arFid_rec = obj2.arFsd_fid i = 0 Do until i > 5 obj1.getVar arFid_rec(0) response.Write obj2.EVE_NO & "
" Loop Set obj2 = Nothing %> 560891215004 560891215004