Oversætte function fra php til asp

Nedenstående function er skrevet i php. Er der et multitalent derude som kan oversætte den til asp?

<?
function SendSMS ($host, $port, $username, $password, $phoneNoRecip, $msgText) {

$fp = fsockopen($host, $port, $errno, $errstr);
if (!$fp) {
echo "errno: $errno \n";
echo "errstr: $errstr\n";
return $result;
}

fwrite($fp, "GET /?Phone=" . rawurlencode($phoneNoRecip) . "&Text=" . rawurlencode($msgText) . " HTTP/1.0\n");
if ($username != "") {
$auth = $username . ":" . $password;
$auth = base64_encode($auth);
fwrite($fp, "Authorization: Basic " . $auth . "\n");
}
fwrite($fp, "\n");

$res = "";

while(!feof($fp)) {
$res .= fread($fp,1);
}
fclose($fp);


return $res;
}
if (isset($_GET['phone'])) {
if (isset($_GET['text'])) {
$x = SendSMS("195.249.159.142", 8800, "username", "password", $_GET['phone'], $_GET['text']);
echo $x;
}
else {
echo "ERROR : Meddelse ikke sendt - Ingen tekst!\r\n";
}
}
else {
echo "ERROR : Meddelse ikke sendt - Ingen modtager!\r\n";
}

?>

Kør overstående med www.linktil.dk/fil.php?phone=11223344&besked=Hej