(Resolvido) Capturar URL e jogar numa variável

[Gilmar Silva Londrina]

Olá, sou novo aqui no fórum e estou iniciando algumas dúvidas em relação ao ASP (não asp.net).

Minha dúvida: como faço em ASP uma função para capturar a URL em que estou para poder compartilhar no FACEBOOK, melhor explicando ...

Em PHP eu achei esse código, testei e funcionou perfeitamente ..., porém em ASP, é meio novo para mim ..., vai o código e os exemplos ...

<?php

$server = $_SERVER['SERVER_NAME'];

$endereco = $_SERVER ['REQUEST_URI'];

$urlatual = "http://".$server.$endereco;

?>

Porque, baseado nesse procedimento, consegue-se fazer com que os compartilhamentos efetuados no facebook leve a página correta e vincule também os comentários naquela que foi feita (por exemplo, num site de classificados que permite comentários do FACEBOOK no anúncio...)

<iframe src="http://www.facebook.com/plugins/like.php?href=<?php echo $urlatual;?>

&send=true&layout=standard&width=450&show_faces=true

&action=like&colorscheme=light&font&height=80" scrolling="No" frameborder="0"

style="border:none; overflow:hidden; width:320px; height:30px;" allowtransparency="true"></iframe>

Em suma, preciso capturar a URL da página; jogar numa variavel e substituir aquela linha do PHP do IFRAME do exemplo acima ..

Muito grato pelo apoio.

[Gilmar Silva Londrina]

CONSEGUI RESPOSTA A MINHA DÚVIDA (fora do fórum)..., ACREDITO QUE DEVERÁ SERVIR PARA OUTROS NECESSITADOS DE INFORMAÇÕES NESSE QUESITO, SEGUE RESOLUÇÃO:

Copiar e colar o código abaixo, na primeira linha de seu código fonte:

<%
    dim server, endereco, urlatual
    server = Request.ServerVariables ("SERVER_NAME")
    endereco = Request.ServerVariables ("URL")
    urlatual = "http://" & server & endereco
%>

Abaixo, é o código que chama a variável <%Response.Write(urlatual )%> Exemplificando: Logo abaixo da TAG "body", copiar e colar esse código:

<div id="fb-root"></div>
< script>(function(d, s, id) {
  var js, fjs = d.getElementsByTagName(s)[0];
  if (d.getElementById(id)) return;
  js = d.createElement(s); js.id = id;
  js.src = "//connect.facebook.net/pt_BR/all.js#xfbml=1";
  fjs.parentNode.insertBefore(js, fjs);
}(document, 'script', 'facebook-jssdk'));</script>

Em seguida, copiar e colar o código abaixo na tabela onde ficará o botão "enviar/compartilhar" do FACEBOOK e pronto, funciona perfeitamente !:

<div class="fb-send" data-href="<%Response.Write(urlatual )%>" data-font="arial"></div>