Subversion Repositories DevTools

Rev

Rev 7261 | Rev 7281 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7261 Rev 7277
Line 73... Line 73...
73 
Set rsTemp = OraDatabase.DbCreateDynaset( Query, ORADYN_DEFAULT )
 73 
Set rsTemp = OraDatabase.DbCreateDynaset( Query, ORADYN_DEFAULT )
74 
 
 74 
 
75 
Dim mData(3)
 75 
Dim mData(3)
76 
While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
 76 
While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
77 
	mData(0) = IIf (CStr(rsTemp("daemon_mode")) = "M", "Master", "Slave")
 77 
	mData(0) = IIf (CStr(rsTemp("daemon_mode")) = "M", "Master", "Slave")
78 
	mData(1) = CStr(rsTemp("gbe_value"))
78 
	mData(1) = NiceCStr(rsTemp("gbe_value"), "")
79 
	mData(2) = CStr(rsTemp("gbe_buildfilter"))
 79 
	mData(2) = NiceCStr(rsTemp("gbe_buildfilter"), "-Default-")
80 
    BuildInfo.Add CStr(rsTemp("display_name")), mData
 80 
    BuildInfo.Add CStr(rsTemp("display_name")), mData
81 
    rsTemp.MoveNext
 81 
    rsTemp.MoveNext
82 
WEnd
 82 
WEnd
83 
rsTemp.Close
 83 
rsTemp.Close
84 
Set rsTemp = nothing
 84 
Set rsTemp = nothing