Featured Articles and Information DatabasePlatform Lab strives to bring the best value in IT testing to our global clientbase. In the area of IT testing, developments happen on a daily basis, and staying ahead of the game is crucial in order to provide the best technolgoies, test tools and information to our clients. Our featured articles and information database will not only allow clients to stay up to date with the ever increasing capabilities of Platform Lab, but it will also allow them to access additional information related to IT testing. Feel free to browse the articles below to learn more about Platform Lab's capabilities, partnerships and additional information about IT testing. <% dim dtNow dim objConn dim objRs dim sOHNPostDate dim sOHNPost dim bExists bExists = false Set objConn = Server.CreateObject("ADODB.Connection") Set objRs = Server.CreateObject("ADODB.Recordset") objConn.open APPLICATION("CONNECTIONSTRING") sSQL = "select top 1 ohnpostdate, ohnpostdata from ohnpost order by ohnpostid desc" objRs.Open sSQL,objConn if objRs.EOF = false then sOHNPostDate = objRs.Fields.item("ohnpostdate").value sOHNPost = objRs.Fields.item("ohnpostdata").value bExists = true end if objRs.Close if bExists then Response.Write "" & sOHNPostDate & "" & VBCRLF Response.Write "
" & VBCRLF end if sSQL = "select top 25 ohnfileid, ohnfiledate, ohnfiletitle, ohnfiletype, datalength(ohnfiledata) as bytes from ohnfile order by ohnfileid desc" objRs.Open sSQL,objConn if objRs.EOF = false then Response.Write " Files" & VBCRLF Response.Write "
" & VBCRLF end if objRs.Close objConn.Close %>
|