As the ASP code is run on the server, due to security reasons you are unable to harvest certain information about your users systems.
For the IP address, you may use:
<%
Dim UserIPAddress
UserIPAddress = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If UserIPAddress = "" Then
UserIPAddress = Request.ServerVariables("REMOTE_ADDR")
End If
%>
Whilst you could just simply use:
Request.ServerVariables("REMOTE_ADDR")
This might not work when the user is behind an office-based proxy.