Need help with PHP to ASP

conversion php to asp

[breeze76]

Here is the code I need converted to ASP... can any one do this for me.. I do not know anything about PHP, and since it is a small file I thought I would ask if someone could do it..

<?
$y=1;
$i=1;
$track = '';

$rbsPath = 'sounds/';
$rbsExt = '.rbs';

if ($dir = opendir('.')) {
while (false!== ($file = readdir($dir))) {
if ($file{0}!= '=') {
if ( strrchr($file,'.') == $rbsExt) {
$last_mod = filemtime($file);
$track[$last_mod] = utf8_encode($file);
$i++;
}
}
}
}
closedir($dir);

header ("Content-type: text/xml");
echo "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n";
echo "<tracks>\n";
if ($track!= '') {
krsort($track);
while (list ($key,$val) = each ($track)) {
echo "<track trackMod=\"".$key."\" title=\"".utf8_encode(htmlentities(substr($val,0,strrpos($val,'.'))))."\" path=\"".$rbsPath.htmlentities($val)."\"/>\n";
$y++;
}
}

echo "</tracks>";
?>

[cmatcme]

Welcome To [webmasterworld.com] Webmasterworld [webmasterworld.com]

Do you have any idea on what it does?

Knowing few php myself, I've only managed to translate the first part:

<?
$y=1;
$i=1;
$track = '';

$rbsPath = 'sounds/';
$rbsExt = '.rbs';

//Insert the rest of the non-translated code here

?>

To..

<%

y = 1
i = 1
track = ""

rbsPath = "sounds/"
rbsExt = ".rbs"

'Insert the rest of the translated code here

%>

and that the echo " " command should be change to response.write " "

cmatcme