| Server IP : 103.6.199.200 / Your IP : 3.144.20.66 Web Server : Microsoft-IIS/10.0 System : Windows NT EMPUSA 10.0 build 20348 (Windows Server 2016) i586 User : EMPUSA$ ( 0) PHP Version : 7.4.33 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : OFF | Perl : OFF | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : C:/Domains/sspucom/ssp2u.com/wwwroot/ |
Upload File : |
<!-- #INCLUDE FILE="doc2.asp" -->
<!-- #INCLUDE VIRTUAL="/xlib/x_aupx.asp" -->
<%
DIM r, i
v.GetReqNum "dx"
v("dx") = D_DateToDX(DATE)
'IF Application("Site.Bonus.Active") = 0 THEN Response.End
Server.ScriptTimeout = 5000
StartDoc "AUP Run of " & D_DXText(v("dx"))
IF Application("AUPX") = 0 THEN
Application.Lock
Application("AUPX") = 1
i = HOUR(NOW)
IF i MOD 2 = 0 THEN
OpenDatabase
'SET r = db.LockRs
B_RunAUP
PTS "End"
END IF
Application("AUPX") = 0
Application.Unlock
ELSE
PTS "Other process running."
END IF
EndDoc
%>