% 'Set fs = CreateObject("Scripting.FileSystemObject") 'if Request.ServerVariables("REMOTE_ADDR") <> "129.22.253.78" then 'if Request.ServerVariables("REMOTE_ADDR") <> "127.0.0.1" then 'Set fs = CreateObject("Scripting.FileSystemObject") 'DoesFileExist = fs.FileExists("c:\log.txt") 'if DoesFileExist = "False" then 'Set a = fs.CreateTextFile("c:\log.txt", True) 'a.WriteLine("Date & Time" & Chr(9) & Chr(9) & "Remote IP" & Chr(9) & "User's Browser" & Chr(13) & Chr(10)) 'a.Close 'end if 'set LogFile = fs.OpenTextFile("c:\log.txt", 8) 'write log entry 'RemoteAddress = Chr(9) & Request.ServerVariables("REMOTE_ADDR") 'RemoteAgent = Chr(9) & Request.ServerVariables("HTTP_USER_AGENT") & Chr(13) & Chr(10) 'LogFile.write(now & RemoteAddress & RemoteAgent) 'end if 'end if %>
Crane Control Festoon Systems Custom Machine Controls PLC Based Process Control Industrial Auxiliary Controls Operator Stations Parts & Accessories Resistors Brakes & Wheels Reconditioned Contols & Motors
|
Apex Control Systems
provides customers with a wide range of products and services for industrial
purposes. Please feel free to investigate our product line to the left. If you
have any questions regarding our products or services, contact us.
Company Information
|