Convertir PHP en ASP

[cesarprt]

Hola me gustaria saber si alguien me puede ayudar a convertir este código de PHP en ASP.

<?php
$l = 'Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut aliquip ex ea commodo consequat. Duis aute irure dolor in reprehenderit in voluptate velit esse cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat cupidatat non proident, sunt in culpa qui officia deserunt mollit anim id est laborum';

for ($i = 0; $i < 10; $i++)
{
srand();
$s = rand(0, strlen($l)-10);
$e = rand($s, (strlen($l) - strlen($s))+10);
$str = substr($l, $s, $e);

echo <<<HERE_DOC
<div>
<div>
<span class="ctr">$s</span><span class="content">Request timestamp: {$_REQUEST['timestamp']} - $str
</span>
</div>
</div>
HERE_DOC;
}

?>

Gracias por adelantado a todos.

[Shiryu_Libra]

sera asi???

Código PHP:

  <%
function estampa()
    dte = now()
    yr = year(dte)
    if len(month(dte)) = 1 then mth= 0 & month(dte) else mth= month(dte) End if
    if len(day(dte)) = 1 then dy= 0 & day(dte) else dy= day(dte) End if
    if len(hour(dte)) = 1 then hr=0 & hour(dte) else hr= hour(dte) End if
    if len(minute(dte)) = 1 then min= 0 & minute(dte) else min= minute(dte) End if
    if len(second(dte)) = 1 then sec = 0 & second(dte) else sec= second(dte) End if
    estampa = yr & mth & dy & hr & min & sec
end function

Function RandomNumber(inicio, fin)
Randomize()
RandomNumber = Int((fin - inicio + 1) * Rnd + inicio)
End Function
metodo=request.ServerVariables("REQUEST_METHOD")
if metodo="POST" then
    if isnull(request.Form("timestamp")) or isempty(request.Form("timestamp")) then
        timestamp=estampa()
    else
        timestamp=request.Form("timestamp")
    end if
elseif metodo="GET" then
    if isnull(request.querystring("timestamp")) or isempty(request.querystring("timestamp")) then
        timestamp=estampa()
    else
        timestamp=request.querystring("timestamp")
    end if
end if

l = "Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut aliquip ex ea commodo consequat. Duis aute irure dolor in reprehenderit in voluptate velit esse cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat cupidatat non proident, sunt in culpa qui officia deserunt mollit anim id est laborum"
for i = 0 to 10
randomize()
s = RandomNumber(0, len(l)-10)
e = RandomNumber(s, (len(l) - len(s))+10)
str = mid(l, s, e)

response.Write "<<<HERE_DOC<div><div>"&_
"<span class=""ctr"">" & s &_
"</span><span class=""content"">Request timestamp: " &_
timestamp &" - "& str &_
"</span></div></div>HERE_DOC;"
next
%>  
   

sera???

[cesarprt]

Muchisimas gracias por tu aporte, gracias a esta conversión he encontrado los dos errores que hacian que no me funcionara un script de ajax.

Gracias nuevamente.

[Shiryu_Libra]

Saludos