% Response.Buffer=true %> <% dim username username = request("username") response.write("" & VbCrLf) response.write("" & VbCrLf) response.write("
" & VbCrLf) response.write("epCMS version: 3.0.1
" & VbCrLf) strSQL = "select version() AS mySQLVersion" Set rs = LoadRSFromDB(strSQL) if not rs.EOF then response.write("MySQL version: " & rs("mySQLVersion") & "
" & VbCrLf) end if set rs = nothing response.write("