Please, i need this php script to translate into an asp script

Hi,
Im new in learning an asp language.
Is there anyone, can help to convert this php script into asp?
Need your help guys..

init.inc.php
<?

// start session
ini_set("session.use_cookies", 1);
ini_set("session.use_trans_sid", 0);

session_name("prodive");
session_start();
session_register("LoggedIn");
session_register("packages");
if (!isset($LoggedIn))
$LoggedIn = 0;

if (!$LoggedIn)
{
$LoggedIn = 1;
$handle = fopen("Packages.csv","r");
$row = 0;
while ($package = fgetcsv($handle,8192,";"))
{
$row++;
$packages["code"][] = $package[0];
$packages["description"][] = $package[1];
$packages["price"][] = $package[2];
$packages["adult"][] = 0;
$packages["subtotal"][] = 0;
}
}

global $_SERVER,$PHP_SELF,$_GET,$_POST;

$server_name = $_SERVER["SERVER_NAME"];
$admin = $LoggedIn;
$ServerRoot = substr( $_SERVER["SCRIPT_FILENAME"],0,
strpos($_SERVER["SCRIPT_FILENAME"], "/htdocs" ));

// is this running on linux/unix OS?
if ( lc( substr($ServerRoot,0,6) ) == "/home/" )
{
// next lines for safer usage on production server Linux/Unix
#ini_set("include_path", ".:$ServerRoot/htdocs/include");
// auto - enable admin on local server
$isLinux = 1;
$admin = "";
}
else
{
// next lines for safer usage on production server on WinDows
#ini_set("include_path", ".;$ServerRoot/htdocs/include;");
$admin = 1;
$isLinux = 0;
}


// ASSIGN Gets and Posts to vars
function getvar($var) {
global $_POST, $_GET, $_SERVER;
//global $_SESSION;
// $val = $_SESSION[$var];

$val = "";
if ( array_key_exists( $var, $_POST ) )
$val = $_POST[$var];
elseif ( array_key_exists( $var, $_GET ) )
$val = $_GET[$var];
elseif ( array_key_exists( $var, $_SERVER ) )
$val = $_SERVER[$var];
elseif ( !empty($var) )
{ global ${$var};
if (isset($var))
$val = "${$var}";
}
return $val;
}

function StrEqual($var1,$var2) { return strcasecmp($var1, $var2) == 0; }
function lc($var1) { return strtolower($var1); }
function uc($var1) { return strtoupper($var1); }
function createSelect ($name, $array, $selected_val, $class){
$sel = "<select name=\"$name\" id=\"$name\" class=\"$class\">\n\r";
while (list($key,$val) = each($array)){
if ($val == $selected_val){
$selected = "selected";
}
else{
$selected = "";
}
$sel .= "<option value=\"$val\" $selected>".$key."</option>\n\r";
}
$sel .= "</select>";
return $sel;
}

?>

Thank you very much..