vb.net WebService 取得IP

_
Public Function GetIP() As String
Dim ClientIP As String
ClientIP = HttpContext.Current.Request.UserHostAddress 'Request.UserHostAddress
Return ClientIP
End Function