oversætte følgende PHP kode til Visual Basic
HejEr der nogen som kan omskrive nedenstående kode til visual basic - jeg bruger det på nettet ifb. med en mysql database - men skal nu også have det til at køre i en access database i et lokalt netværk:
<?php
$antal = 4;// Antal generationer
$hund[0]['id'] =$_GET['id'];// valgt hunds ID
$dog = array();
$res = mysql_query("select id, name, img_path, hipp_score from hunde where id=".$hund[0]['id']);
$row = mysql_fetch_assoc($res);
$iddog[1]=$row['id'];
$dog[1] = $row['name'];
$img_path[1] = $row['img_path'];
$hipp_score[1] = $row['hipp_score'];
for ($i=1;$i<=$antal;$i++) {
$hund = hent($hund);// Kalder funktionen hent()
foreach ($hund as $id) {
$navne = name($id);// Kalder funktionen navn()
foreach ($navne['id'] as $item) {
$iddog[] = $item;
}
foreach ($navne['name'] as $item) {
$dog[] = $item;
}
foreach ($navne['img_path'] as $item) {
$img_path[] = $item;
}
foreach ($navne['hipp_score'] as $item) {
$hipp_score[] = $item;
}
}
}
?>
<?PHP
//FUNKTIONER
function hent($hund) {// Henter id's (sire & dam) på hundene i arrayet
for ($i=0;$i<count($hund);$i++) {
foreach ($hund[$i] as $id) {
$res = mysql_query("select sire, dam from hunde where id=$id");
$row[] = mysql_fetch_assoc($res);
}
}
return $row;
}//function hent slut
function name($id) {// Henter name på sire og dam
$res = mysql_query("select id, name, img_path, hipp_score from hunde where id=".$id['sire']." OR id=".$id['dam']) or die(mysql_error());
while ($row = mysql_fetch_assoc($res)) {
$data['id'][]=$row['id'];
$data['name'][] = $row['name'];
$data['img_path'][] = $row['img_path'];
$data['hipp_score'][] = $row['hipp_score'];
}
return $data;
}//function name slut
?>
