tilføj IP

Jeg har dette som skal tilføjes i en database, samtidig vil jeg også gerne have brugerens ip adresse skal tilføjes i databsen. Hvordan  gør jeg det  ?

    rs.AddNew
      rs(\"Chatnavn\") = Request.form(\"Chatnavn\")
      rs(\"Email\") = Request.form(\"Email\")
      rs(\"Rigtigtnavn\") = Request.form(\"Rigtigtnavn\")
      rs(\"tilfojet\") = Now()
      rs(\"rute\") = Request.form(\"rute\")
      rs(\"ski\") = Request.form(\"ski\")
      rs.Update