Hey, I was wondering if someone could help me convert this from PHP to VB script.
Thanks in advance :)
Code:foreach($file as $value) {
$fval .= $value;
}
if(preg_match_all('/<td><a href="hiscoreuser.cgi?.*&category=.*" class=c>(.*)<\/a><\/td>/', $fval, $matches)) {
$i = 0;
foreach($matches as $value) {
foreach($value as $value) {
if($i == 1) {
$skill[] = $value;
}
}
$i++;
}
}
if(preg_match_all('/<td align="right">\n(.*)\n<\/td><td/', $fval, $matches)) {
$i = 0;
foreach($matches as $value) {
foreach($value as $value) {
if($i == 1) {
$level[] = $value;
}
}
$i++;
}
}
function skill($sskill) {
global $skill, $level;
if(!isset($skill)) {
return '--';
}
else {
foreach($skill as $key => $value) {
if($value == $sskill) {
return $level[$key];
$i = 1;
}
}
if(!isset($i)) {
return '--';
}
}
}
$overall = skill('Overall');
$attack = skill('Attack');
$defence = skill('Defence');
$strength = skill('Strength');
$hitpoints = skill('Hitpoints');
$ranged = skill('Ranged');
$prayer = skill('Prayer');
$magic = skill('Magic');
$cooking = skill('Cooking');
$woodcutting = skill('Woodcutting');
$fletching = skill('Fletching');
$fishing = skill('Fishing');
$firemaking = skill('Firemaking');
$crafting = skill('Crafting');
$smithing = skill('Smithing');
$mining = skill('Mining');
$herblore = skill('Herblore');
$agility = skill('Agility');
$thieving = skill('Thieving');
$slayer = skill('Slayer');
$runecrafting = skill('Runecrafting');
