<% 'AdminID = CheckAdmin ' Wenn ein "Logout"-Befehl übergeben wurde, dann diesen User in ' der Datenbank suchen, und IP Adresse löschen If Len(Request("Logout")) > 0 Then Set DB = Server.CreateObject("ADODB.Connection") OpenDatabase DB DB.Execute "UPDATE BannerExe_Kunden SET ActiveIP='000.000.000.000' WHERE Username='" & Session("BN") & "'" CloseDatabase DB Set DB = Nothing End If ' Alle Sessions killen Session("Admin") = "N" Session("BN") = "" %> zas-index