require_once ("conv.php");
require_once ("config.php");
require_once ("xtrt-xxxx-func.php");
/////////////////////////////////////////////////
$cl=0;
$sql0 = "SELECT * FROM base ";
mysql_query("SET CHARACTER SET utf8");
mysql_query("SET NAMES utf8");
$tablresult = mysql_query($sql0, $link);
$tabl_num = mysql_num_rows($tablresult);
$corp_num=$tabl_num;
echo "
Aantallen ".$sql0." ".$tabl_num." SQL ";
echo "";
// echo "Website | Taal | Gesprekspartner | Kennisdomein | Corpus |
";
while ($row = mysql_fetch_assoc($tablresult))
{
$tabl_ipad="LINGVISTICA";
$id=$row['id'];
$ipad=$row['ipad'];
$ipad_array[$ipad]=$ipad_array[$ipad]+1;
$domn=$row['domn'];
$domn_array[$domn]=$domn_array[$domn]+1;
$lnks=$row['lnks'];
$lnks_array[$lnks]=$lnks_array[$lnks]+1;
$rchs=$row['rchs'];
if ($domn == $invr_chbt)
{
$file_array[$rchs]=$file_array[$rchs]+1;
}
$taal=$row['taal'];
if ($invr_taal == null)
{
$invr_taal=$taal;
}
$levl=$row['levl'];
$datm=$row['datm'];
$taal_array[$taal]=$taal_array[$taal]+1;
$tlnks=$tlnks+$lnks;
$trchs=$trchs+$rchs;
$tlevl=$tlevl+$levl;
$file_find="";
// echo "".$ipad." | ".$taal." | ".$domn." | ".$lnks." | ".$rchs." |
";
}
// print_r($domn_array);
ksort($domn_array);
echo "
Er zijn ".count($domn_array)." gesprekspartners";
echo "";
$cl=0;
foreach($domn_array as $domn_key => $domn_val)
{
if ($cl < 4)
{
$cl=$cl+1;
// $domn_dspl= "
".$domn_key;
$domn_dspl= "".$domn_key."";
$base_rslt=xtrt_xxxx("xdotx".$domn_key,$invr_taaal,"base",0);
// print_r($base_rslt);
foreach($base_rslt as $base_key => $base_val)
{
$base_dtls=explode($base_key);
print_r($base_dtls);
}
echo "".$domn_dspl." | ";
}
if ($cl == 4)
{
$cl=0;
echo "";
}
}
echo "
";
exit;
/////////////////////////////////////////////////
echo "
INVR RCHS ".$invr_rchs;
$base_rslt=xtrt_xxxx("xdotx".$invr_rchs,$invr_taal,"base",16);
// print_r($base_rslt);
echo "";
echo "Website | Taal | Gesprekspartner | Kennisdomein | Corpus |
";
foreach($base_rslt as $subs_key => $subs_val)
{
$subs_dtls=explode("!!",$subs_key);
// print_r($subs_dtls);
$subs_scre=$subs_dtls[0];
$subs_taal=$subs_dtls[1];
$subs_domn=$subs_dtls[2];
$subs_lnks=$subs_dtls[3];
// $subs_lnks=str_replace($subs_lnks,"@",",");
$dtls_wrds=explode(",",$subs_rchs);
$subs_rchs=$subs_dtls[4];
$subs_ipad=$subs_dtls[7];
$lsubs_rchs="".$subs_rchs."";
echo "".$subs_ipad." | ".$subs_taal." | ".$subs_domn." | ".$subs_lnks." | ".$lsubs_rchs." |
";
}
echo "
";
if (count($base_rslt) > 0)
{
}
$cmds_ipad=$userip;
$cmds_bzv2=$invr_lnks."[base[".$invr_taal."[".$invr_chbt."[".$invr_rchs."[0";
// echo "
INVR BZV2 ".$cmds_bzv2;
include ("chbt-cmds-code-2.php");
// $invr_lnks=mb_strtolower($invr_lnks);
// echo "
DOMEINCONTEXT ".$invr_tabl;
// echo "
INDEX INVOER BZV1 ".$invr_bzv1;
// echo "
LINKS ".$invr_lnks;
// echo "
TABL ".$invr_tabl;
if ($invr_lnks == null)
{
$invr_lnks= "Geen invoer ontvangen";
}
if ($invr_tabl ==null)
{
$invr_tabl="base";
}
if ($invr_domn ==null)
{
$invr_domn="semantus";
}
if ($invr_taal == null)
{
$invr_taal="nederlands";
}
if ($invr_ipad == null)
{
$invr_ipad="semanta.nl";
}
if ($invr_rchs != null)
{
// $invr_rchs=$invr_rchs.",";
$rchs_itms=explode(",",$invr_rchs);
// echo "
RECHS ITMS for ".$invr_tabl."
";
// print_r($rchs_itms);
}
if ($invr_levl== "XX")
{
echo "
DELETE FUNCTIE ".$invr_levl." TABEL ".$invr_tabl." TAAL ".$invr_taal." DOMN ".$invr_domn." LINKS ".$invr_lnks." RECHTS ".$invr_rchs;
}
require_once ("config.php");
// require_once ("letr-expl-func.php");
$tabel=text_isrt($invr_taal."@tabel");
$tekst=text_isrt($invr_taal."@text");
$taal=text_isrt($invr_taal."@taal");
$domein=text_isrt($invr_taal."@domein");
$vraag=text_isrt($invr_taal."@vraag");
$uw_vraag=text_isrt($invr_taal."@uw vraag");
$antwoord=text_isrt($invr_taal."@antwoord");
if ($invr_chbt== null)
{
$invr_chbt="semantus";
}
$sql="SELECT * from $invr_tabl ";
mysql_query("SET CHARACTER SET utf8");
mysql_query("SET NAMES utf8");
$tablresult = mysql_query($sql, $link);
$tabl_num = mysql_num_rows($tablresult);
echo "
Aantallen ".$sql." ".$tabl_num;
if ($tabl_num > 0 )
{
while ($row = mysql_fetch_assoc($tablresult))
{
$lnks=$row['lnks'];
$lnks_array[$lnks]=$lnks_array[$lnks]+1;
}
}
arsort($lnks_array);
foreach($lnks_array as $lnks_key => $lnks_val)
{
echo "
".$lnks_key." ".$lnks_val;
}
$sql="SELECT * from base where rchs = '$invr_rchs' ";
mysql_query("SET CHARACTER SET utf8");
mysql_query("SET NAMES utf8");
$tablresult = mysql_query($sql, $link);
$tabl_num = mysql_num_rows($tablresult);
echo "
Aantallen ".$sql." ".$tabl_num;
$pinvr_bzv1=''.$save_bzv1.'';
$hrelt="xxxxx";
// echo "
";
if ($tabl_num > 0 )
{
echo "
INVR TAAL ".$invr_taal."TEXT TAAL ".$text_taal;
$rchs_array=array();
while ($row = mysql_fetch_assoc($tablresult))
{
$ipad=$row['ipad'];
$user_taal=$row['taal'];
$xlat_taal=text_isrt($text_taal."@".$taal);
if ($user_taal != $invr_taal)
{
// echo "
LET OP Werktaal ".$invr_taal." wijkt af van gegevenstaal".$xlat_taal;
}
// echo "
Werktaal ".$invr_taal." gegevenstaal".user_taal;
$domn=$row['domn'];
$lnks=$row['lnks'];
$rchs=$row['rchs'];
echo "UPDATE LNKS".$invr_lnks." RCHS ".$rchs." DATM ".$invr_datm;
$sql1 ="UPDATE `corp` SET `lnks`=$invr_lnks',`datm` = '$invr_datm' where `rchs` = '$file_name' ";
mysql_query("SET CHARACTER SET utf8");
mysql_query("SET NAMES utf8");
$logentry_result = mysql_query($sql1, $link);
// print_r($logentry_result);
}
}
?>