Take the agent, display the client IP address

zhaozj2021-02-16  79

Dim user_IP As String 'proxy If Not Request.ServerVariables ( "HTTP_VIA") Is Nothing Then user_IP = Request.ServerVariables ( "HTTP_X_FORWARDED_FOR"). ToString () Else user_IP = Request.ServerVariables ( "REMOTE_ADDR"). ToString () End If 'Client IP Address TextBox1.text = User_ip' Server Name TextBox2.text = Server.Machinename

转载请注明原文地址:https://www.9cbs.com/read-13027.html

New Post(0)