Changeset 97 for trunk/Packages/CoolWeb/Modules/UUser.pas

Timestamp:

Oct 2, 2012, 9:42:35 AM (12 years ago)

Author:

chronos

Message:

• Upraveno: Stránky přesunuty do modulu ZděchovNET.
• Přidáno: Instalace a odinstalace modulu ZděchovNET.

File:

• trunk/Packages/CoolWeb/Modules/UUser.pas (modified) (1 diff)

trunk/Packages/CoolWeb/Modules/UUser.pas

@@ -68 +68 @@
     end else begin
       // Create new record
-      Database.Query(DbRows, 'INSERT INTO `UserOnline` (`User`, `ActivityTime`, `SessionId`) ' +
-        'VALUES (1, NOW(), "' + HandlerData.Request.Cookies.Values['SessionId'] + '")');
+      Database.Query(DbRows, 'INSERT INTO `UserOnline` (`User`, `ActivityTime`, `SessionId`, `ScriptName`) ' +
+        'VALUES (1, NOW(), "' + HandlerData.Request.Cookies.Values['SessionId'] + '", "")');
       Id := Database.LastInsertId;
       User := 1;