FCLT#91738 Aantal gebruikers vandaag tellen voor portal

svn path=/Website/branches/v2025.4/; revision=71131

APPL/FAC/fac_scan_users.asp

@@ -209,6 +209,14 @@ var JSON_Result = true;
     }
     oRs.Close();
 
+    // Recente users telling vandaag
+    var sql = "SELECT COUNT(*) aantal"
+            + "  FROM prs_perslid d "
+            + " WHERE prs_perslid_login > TRUNC(SYSDATE)";
+    var oRs = Oracle.Execute(sql);
+    result.recentvandaag = oRs("aantal").Value;
+    oRs.Close();
+
     try
     {
         var WshShell = new ActiveXObject("WScript.Shell");