%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
IP : <% Dim temp, ip temp = Request.ServerVariables("HTTP_X_FORWARDED_FOR") If temp<>"" Then ip = temp Else ip = Request.ServerVariables("REMOTE_ADDR") End If Response.Write(ip) %>