Pegar ip do visitante da página

<div id=connectArea style="display: none">

    <center>

        <table>

            <tr>

                <OBJECT language="vbscript" ID="MsRdpClient"

                        onerror="OnControlLoadError"

                        onreadystatechange="OnControlLoad"

                        CLASSID="CLSID:7584c670-2274-4efb-b00b-d6aaba6d3850"

                        CODEBASE="msrdp.cab#version=5,2,3790,3959"

                        WIDTH=<% resWidth = Request.QueryString("rW")

                        if  resWidth < 200 or resWidth > 1600 then

                            resWidth = 800

                        end if

                        Response.Write resWidth %>

                        HEIGHT=<% resHeight = Request.QueryString("rH")

                        if  resHeight < 200 or resHeight > 1200 then

                            resHeight = 600

                        end if

                        Response.Write resHeight %>>

                </OBJECT>

            </tr>

            <tr>

                <br>

                    <font size="1" color="#000000" id="srvfontname" face="Verdana, Arial, Helvetica">

                        <div id=connectDisplay style="display:none"/>

                        <div Conectado a $$$$$$$$$$$ - IP = [size=18]<% Request.UserHostAddress %>[/size] /> 


                    </font>

                </br>

            </tr>