".chr(10)); foreach ($lista as $key => $entry) { echo("".chr(10)); } echo("".chr(10)); } $ix=0; $autor="none"; function chaveok() { extract($GLOBALS); $cha=intval($key/10000); if ($LoginOk==1 && $cha==$Chave) { $kus=$key-$cha*10000; if (($user=="v12" && $kus==$KeyJmb && $lin==$linPor) || ($user=="jp" && $kus==$KeyJpc && ($lin==$linEng || $lin==$linPor)) || ($user=="fx" && $kus==$KeyFlx && $lin==$linEsp) || ($user=="si" && $kus==$KeySal && $lin==$linIta) || ($user=="alcc" && $kus==$KeyAcc && $lin==$linBra) || ($user=="edma" && $kus==$KeyEma && $lin==$linBra) || ($user=="acam" && $kus==$KeyAca && $lin==$linBra)) { $function_ret=true; } else { $function_ret=false; } } else { $function_ret=false; } $function_ret=true; return $function_ret; } function entidade($cref,$ref) { global $lin; tab_ini(); tab_bar(5); echo(" "); link_ref($cref,$ref,$lin); echo(" "); tab_bar(5); tab_bor(); } function news_head($tit) { extract($GLOBALS); tab_ini(); tab_bar(5); ?>     =0) { ?>
       Inserir     Alterar     Eliminar     Export     Import     Load  
 "); echo("Local Export"); echo(" ->> FTP ->> "); echo("Remote import "); echo(""); echo(""); } } function news() { extract($GLOBALS); fxhead("Forix: ".$titulo[$N_NEWS]); $SQLQuery="Select year(notes.dat) as ano, month(notes.dat) as mes from notes where notes.lin=".$lin." group by year(notes.dat), month(notes.dat) order by year(notes.dat) desc, month(notes.dat) desc"; if (($result = mysql_query($SQLQuery)) and ($RSmes= mysql_fetch_array($result))) { $mes=$RSmes["mes"]; $ano=$RSmes["ano"]; } else { $mes=0; $ano=0; } if ($aa<$ano || $mm<$mes) { $mes=$mm; $ano=$aa; } $SQLQuery="Select notes.id, notes.dat, notes.titulo, notes.texto from notes where notes.lin=".$lin." and month(notes.dat)=".$mes." and year(notes.dat)=".$ano." order by notes.dat desc, notes.id"; news_head($titulo[$N_HEAD]); if (($result2 = mysql_query($SQLQuery)) and mysql_num_rows($result2) > 0) { ?>
     
   "> 
Não há notícias disponíveis
    
0) { tab_bar(8); ?> Título contem: Execute $SQLQuery); if (!$RSList->EOF) { ?>EOF) { $da=$RSList["dat"]; if ($da!=$daa) { if ($BGC==$TR1_BGC) { $BGC=$TR2_BGC; } else { $BGC=$TR1_BGC; } $dd=$fdia[$da]; $mm=$fmes[$da]; $aa=$fano[$da]; $daa=$da; ?>MoveNext; } ?>
     
   )"> 
Não há notícias disponíveis
  Título contém  
  
Execute $SQLQuery); if (!$RSList->EOF) { while(!$RSList->EOF) { $da=$RSList["dat"]; $dd=$Day[$da]; $mm=strftime("%m")$da; $aa=strftime("%Y")$da; tab_ini(); tab_bar(4); ?>    
   /   
  

MoveNext; } } ?>

       
 
Execute $SQLQuery); if (!$RSnotes->EOF) { fxhead("Forix: Notas"); entidade($RSnotes["cref"],$RSnotes["ref"]); tab_bar1(4); $da=$RSnotes["dat"]; ?>
Data 
 Autor 0) { ?> ()
 Título 
Texto 
0) { $SQLQuery=$SQLQuery." or notes.lin=".$lin_base[$lin]; } $SQLQuery=$SQLQuery.") and notes.id=".$ix; if (($result = mysql_query($SQLQuery)) and ($RSnotes= mysql_fetch_array($result))) { fxhead("Forix: ".$RSnotes["titulo"]); tab_ini(); tab_bar(5); if ($RSnotes["cref"]!=$REF_TEXT) { ?>    


[Edit]

Execute $SQLQuery); if (!$RSnotes->EOF) { fxhead("Forix: Notas"); entidade($RSnotes["cref"],$RSnotes["ref"]); while(!$RSnotes->EOF) { tab_bar1(4); $da=$RSnotes["dat"]; ?>
,
0) { ?> () [&i=&c=">Editar]
MoveNext; } news_tail($ix); fxtail(); } return $function_ret; } function notes_autor() { extract($GLOBALS); $SQLQuery="Select notes.*, contactos.* from notes inner join contactos on notes.autor=contactos.sig where contactos.name like '".$autor."%' order by notes.marca desc Limit 10"; $dbc->Execute $SQLQuery); if (!$RSnotes->EOF) { fxhead("Forix: Notes"); tab_ini(); tab_bar(5); ?>Notes
0) { ?>
EOF) { if ($BGC==$TR1_BGC) { $BGC=$TR2_BGC; tab_bar2(6); } else { $BGC=$TR1_BGC; tab_bar1(6); } $args_local="z=".$zip."&k=".$key."&l=".$RSnotes["lin"]; ?>


Update:  [&i=&c=">Editar]
MoveNext; } tab_fim(); fxtail(); } return $function_ret; } function news_1u() { extract($GLOBALS); $SQLQuery="Select notes.id from notes where notes.lin=".$lin." order by notes.dat desc, notes.id desc Limit 1"; $dbc->Execute $SQLQuery); if (!$RSList->EOF) { $ix=$RSList["id"]; news_1(); } return $function_ret; } function news_1p() { extract($GLOBALS); fxhead("Forix: ".$titulo[$N_NEWS]); ?> Execute $SQLQuery); if (!$RSnotes->EOF) { $da=$RSnotes["dat"]; tab_ini(); tab_bar(4); ?>    
   /   
  
Notícia não disponívelFechar esta janelaClose; $dbc=null; ?>

Date  [dd-mm-yyyy]   Name    E-mail 
Type   Store    Mode    Page 
Date  [dd-mm-yyyy]
 Author 
 Title 
Text 
0 && strlen($dmes)>0 && strlen($ddia)>0 && strlen($tit)>0 && strlen($txt) && strlen($user)>0) { $data= fdata($dano,$dmes,$ddia); $SQLQuery="Insert into notes (dat, lin, tipo, modo, store, iid, cref, ref, page, autor, titulo, texto) Values (".$data.",".$lin.",".$tipo.",".$modo.",".$store.",".$iid.",".$cref.",".$ref.",".$page.",'".$user."','".mysql_escape_string($tit)."','".mysql_escape_string($txt)."')"; mysql_query($SQLQuery); $SQLQuery="Select id from notes order by id desc Limit 1"; $RSnotes= mysql_fetch_array(mysql_query($SQLQuery)); $ix=$RSnotes["id"]; news_redir($cref,$ref,$page,$tipo,$ix); } else { fxhead("Forix: Notícias: Inserir"); news_head("Notícia NÃO inserida!"); tab_bar1(4); ?>
Data:0) { ?>Erro - dia não especificado!-0) { ?>Erro - mês não especificado!-0) { ?>Erro - ano não especificado!
Titulo:0) { ?>Erro - título não especificado!
Texto:0) { ?>Erro - texto não especificado!
"); echo(""); echo(""); if ($cref==$REF_QUE || $cref==$REF_GOLD) { $tit=$RSList["titulo"]; $i=(strpos($tit,"|") ? strpos($tit,"|")+1 : 0); if ($i>0) { $user=substr($tit,0,$i-1); $email=substr($tit,strlen($tit)-(strlen($tit)-$i)); } else { $user=$tit; $email=""; } ?>
Type"); sel_box ("tipo", $stipo, array(0 => "Normal", 1 => "Sempre", 2 => "Comentário", 7 => "Especial", 3 => "Dúvida", 4 => "Ligação", 5 => "Solto", 6 => "Participação")); echo("   Store "); sel_box ("store", $sstore, array(0 => "Normal", 1 => "Externo")); echo("   Mode "); sel_box ("modo", $smodo, array(0 => "Publico", 1 => "Clube", 2 => "Privado", 3 => "Total")); echo("   Page 
Date "); echo(""); echo(" [dd-mm-aaaa]
Name    E-mail 
 Author " name="aut" SIZE="12">
 Title 
Text 
0 && strlen($dmes)>0 && strlen($ddia)>0 && strlen($tit)>0 && strlen($txt)>0) { $data= fdata($dano,$dmes,$ddia); $SQLQuery="Update notes set tipo=".$tipo.",store=".$store.",dat=".$data.",autor='".$user."', titulo='".mysql_escape_string($tit)."', texto='".mysql_escape_string($txt)."' where notes.id=".$ix; mysql_query($SQLQuery); $SQLQuery="Select notes.*, contactos.copynote from notes inner join contactos on notes.autor=contactos.sig where notes.id=".$ix; $RSnotes= mysql_fetch_array(mysql_query($SQLQuery)); $cref=$RSnotes["cref"]; $ref=$RSnotes["ref"]; $page=$RSnotes["page"]; $tipo=$RSnotes["tipo"]; news_redir($cref,$ref,$page,$tipo,$ix); } else { fxhead("Forix: Notícias: Alterar"); news_head("Notícia NÃO alterada!"); tab_bar1(4); ?>
Data:0) { ?>Erro - dia não especificado!-0) { ?>Erro - mês não especificado!-0) { ?>Erro - ano não especificado!
Titulo:0) { ?>Erro - título não especificado!
Texto:0) { ?>Erro - texto não especificado!
  

Enter translation :
"> "> "> "> "> "> "> ">

Please enter the translation for the above text:
Your name:    Your e-mail:
   
0 && strlen($mail)>0 && strlen($txt)>0) { $s=substr($lin+100,strlen($lin+100)-(2))." - ".substr($c_ref+100,strlen($c_ref+100)-(2))." - ".$n_ref; $t=$user." ".$mail.chr(13).chr(10)."http://127.0.0.1:82/asp/notes.asp?l=".$lin."&i=".$ix."&c=".$cmdTra.chr(13).chr(10).$tit.chr(13).chr(10).$txt.chr(13).chr(10)."(".$titulo[$N_TRAN].": ".$user.")"; log_file("No_",$s.chr(13).chr(10).$t); mail ($email_jpc, $s, $t, "From: notes@forix.com\r\n"); ?> 
Translation submited.

Thanks for your contribution!

 Continue
Translation will not be processed because:

    User name was not specified.
    E-mail address was not specified.
    There was no translation text.

 

Return    Cancel Execute $SQLQuery); if (!$RSList->EOF) { ?>EOF) { if ($BGC==$TR1_BGC) { $BGC=$TR2_BGC; } else { $BGC=$TR1_BGC; } $da=$RSList["dat"]; ?>MoveNext; } ?>
             )"> 
Não há notícias disponíveis
0 && strlen($pass)>0 && strlen($ling)>0) { ?>= 0"; $Team_db->Execute $SQLQuery); if (!$RSList->EOF) { $nivel=$RSList["nivel"]; $ling=$RSList["lin"]; $user=$RSList["autor"]; } $Team_db->Close; $Team_db=null; } if ($nivel>=1000) { // Regista a entrada no ficheiro "teamlog.txt" teamlog($user,$ling); if ($user=="v12") { $key=$Chave*10000+$KeyJmb; } else if ($user=="jp") { $key=$Chave*10000+$KeyJpc; } else if ($user=="fx") { $key=$Chave*10000+$KeyFlx; } else if ($user=="si") { $key=$Chave*10000+$KeySal; } else if ($user=="alcc") { $key=$Chave*10000+$KeyAcc; } else if ($user=="acam") { $key=$Chave*10000+$KeyAca; } else if ($user=="edma") { $key=$Chave*10000+$KeyEma; } $dbc->Close; $dbc=null; header("Location: "."notes.asp?z=".$zip."&k=".$key."&l=".$ling."&u=".$user."&c=".$cmdTit."&m=".$mm."&y=".$aa); } else { fxhead("Forix: Notícias: Identificação"); news_head("Identificação"); tab_bar1(8); if ($LoginOk==1) { ?>

Nome
Senha
 
Identificação suspensa
temporariamente
 Export "); tab_bar(4); tab_fim(); // Eliminar registos $SQLQuery="Delete from z_notes"; mysql_query($SQLQuery); // Seleciona registos alterados hoje e copia-os $SQLQuery="Select * from notes where marca>=".$hiso." order by id"; $result = mysql_query($SQLQuery); $seq=0; while ($RSList= mysql_fetch_array($result)) { $SQLQuery="Insert into z_notes Values (".$RSList["id"].",".$RSList["marca"].",".$RSList["dat"].",".$RSList["lin"].",".$RSList["tipo"].",".$RSList["modo"].",".$RSList["store"].",".$RSList["iid"].",".$RSList["cref"].",".$RSList["ref"].",".$RSList["page"].",'".$RSList["autor"]."','".mysql_escape_string($RSList["titulo"])."','".mysql_escape_string($RSList["texto"])."')"; mysql_query($SQLQuery); $seq=$seq+1; } print "Notes (".$seq.")
".strftime("%m/%d/%Y %H:%M:%S %p")."
"; if ($cmd == $cmdExp2) { echo("Copy into 'forix1'
"); $ext = array ("frm", "myd", "myi"); for ($i=0; $i<3; $i++) copy("d:/forix/mybd/forix/z_notes.".$ext[$i], "d:/forix/mybd/forix1/z_notes.".$ext[$i]); } fxtail(); } // Imports from 'z_notes' function notes_import() { extract($GLOBALS); fxhead("Forix: Import"); tab_ini(); tab_bar(2); echo(" Import "); tab_bar(4); tab_fim(); if ($cmd == $cmdImp2) { echo("Get update table from 'forix1'
"); $sql = "rename table forix.z_notes to forix1.z_notes33, forix1.z_notes to forix.z_notes"; mysql_query($sql); } $SQLQuery="Select * from z_notes order by id"; $result = mysql_query($SQLQuery); $seq=0; while ($RSList= mysql_fetch_array($result)) { $marca=$RSList["marca"]; // Check if register already exists $SQLQuery="Select marca from notes where id=".$RSList["id"]; if (($result2 = mysql_query($SQLQuery)) and ($rs= mysql_fetch_array($result2))) { if ($rs["marca"]==$marca) print "Bypass: ".$RSList["id"].", ".$marca."
"; else { $SQLQuery="Update notes set marca=".$marca.",dat=".$RSList["dat"].",lin=".$RSList["lin"].",tipo=".$RSList["tipo"].",modo=".$RSList["modo"].",store=".$RSList["store"].",iid=".$RSList["iid"].",cref=".$RSList["cref"].",ref=".$RSList["ref"].",page=".$RSList["page"].",autor='".$RSList["autor"]."',titulo='".mysql_escape_string($RSList["titulo"])."',texto='".mysql_escape_string($RSList["texto"])."' where id=".$RSList["id"]; mysql_query($SQLQuery); print "Update: ".$RSList["id"].", ".$RSList["marca"]."
"; } } else { $SQLQuery="Insert into notes Values (".$RSList["id"].",".$marca.",".$RSList["dat"].",".$RSList["lin"].",".$RSList["tipo"].",".$RSList["modo"].",".$RSList["store"].",".$RSList["iid"].",".$RSList["cref"].",".$RSList["ref"].",".$RSList["page"].",'".$RSList["autor"]."','".mysql_escape_string($RSList["titulo"])."','".mysql_escape_string($RSList["texto"])."')"; mysql_query($SQLQuery); print "Inserted: ".$RSList["id"].", ".$RSList["marca"]."
"; } } if ($cmd == $cmdImp2) { echo("Delete table from 'forix1'
"); $sql = "drop table forix1.z_notes33"; mysql_query($sql); } fxtail(); } /* // Loads from files 'bd/notes.txt' function notes_load() { extract($GLOBALS); fxhead("Forix: Load notes"); tab_ini(); tab_bar(2); ?> Load from notes.txt OpenTextFile $base_dir."/bd/notes.txt"); $flog->ReadLine; $seq=0; $On$Error$Resume$Next; while($err->number==0) { $head=""; while($err->number==0 && strlen($head)<4) { $head=$flog->ReadLine; } if ($err->number==0) { $i=(strpos($head,",") ? strpos($head,",")+1 : 0); $data=intval(substr($head,0,$i-1)); $head=substr($head,strlen($head)-(strlen($head)-$i)); $i=(strpos($head,",") ? strpos($head,",")+1 : 0); $ling=intval(substr($head,0,$i-1)); $head=substr($head,strlen($head)-(strlen($head)-$i)); $i=(strpos($head,",") ? strpos($head,",")+1 : 0); $tipo=intval(substr($head,0,$i-1)); $head=substr($head,strlen($head)-(strlen($head)-$i)); $i=(strpos($head,",") ? strpos($head,",")+1 : 0); $modo=intval(substr($head,0,$i-1)); $head=substr($head,strlen($head)-(strlen($head)-$i)); $i=(strpos($head,",") ? strpos($head,",")+1 : 0); $store=intval(substr($head,0,$i-1)); $head=substr($head,strlen($head)-(strlen($head)-$i)); $i=(strpos($head,",") ? strpos($head,",")+1 : 0); $iid=intval(substr($head,0,$i-1)); $head=substr($head,strlen($head)-(strlen($head)-$i)); $i=(strpos($head,",") ? strpos($head,",")+1 : 0); $cref=intval(substr($head,0,$i-1)); $head=substr($head,strlen($head)-(strlen($head)-$i)); $i=(strpos($head,",") ? strpos($head,",")+1 : 0); $ref=intval(substr($head,0,$i-1)); $head=substr($head,strlen($head)-(strlen($head)-$i)); $i=(strpos($head,",") ? strpos($head,",")+1 : 0); $page=intval(substr($head,0,$i-1)); $user=substr($head,strlen($head)-(strlen($head)-$i-1)); $tit=$flog->ReadLine; $txt=""; $linha=$flog->ReadLine; while($err->number==0 && strlen($linha)>4) { $txt=$txt.$linha; $linha=$flog->ReadLine; } $SQLQuery="Insert into notes (dat, lin, tipo, modo, store, iid, cref, ref, page, autor, titulo, texto) Values (".$data.",".$ling.",".$tipo.",".$modo.",".$store.",".$iid.",".$cref.",".$ref.",".$page.",'".$user."','".mysql_escape_string($tit)."','".mysql_escape_string($txt)."')"; $dbc->Execute$SQLQuery; $seq=$seq+1; ?>: lin=,ref=,len=
close; $flog=null; $fs=null; return $function_ret; } */ $KeyAutor=78; $LoginOk=1; $KeyJmb=5482; $KeyJpc=9237; $KeyFlx=3391; $KeySal=3791; $KeyAcc=4491; $KeyAca=1546; $KeyEma=2380; $cmdTit=0; $cmdDia=1; $cmdNot=2; $cmdNjan=3; $cmdUlt=4; $cmdList=5; $cmdText=6; $cmdIns=12; $cmdInsx=13; $cmdAlt=14; $cmdAltx=15; $cmdEli=16; $cmdPesq=17; $cmdMarc=18; $cmdTra=19; $cmdExp=44; $cmdExp2=45; $cmdImp=77; $cmdImp2=78; $cmdLoad=88; $cmdLog=99; $user=get_arg("u"); $cref=intval(get_arg("x")); $ref=intval(get_arg("r")); $page=intval(get_arg("p")); $cmd=intval(get_arg("c")); $autor=str_replace("+"," ",get_arg("a")); $tip=intval(get_arg("t")); // Block outsiders... if ($super_modo<$Modo_total && $key!=$KeyAutor && $cmd!=$cmdText && $cmd!=$cmdTra) { header("Location: "."f1.asp?".$args); } if ($cmd!=$cmdText && $cmd!=$cmdTra) { $pub_part=0; $boneco=-1; } $dd=intval(get_arg("d")); if ($dd<=0 || $dd>31) { $dd=$hdia; } $mm=intval(get_arg("m")); if ($mm<=0 || $mm>12) { $mm=$hmes; } $aa=intval(get_arg("y")); if ($aaintval($anoFin+1)) { $aa=$hano; } $ix=get_arg("i"); if (!isset($ix) || empty($ix)) { $ix=-1; } $ix=intval($ix); if ($key==$KeyAutor) { $key=0; $args="z=".$zip."&k=".$key."&l=".$lin; notes_autor(); } else { if ($cmd==$cmdLog) { news_login(); } else if ($cmd==$cmdTit) { news(); } else if ($cmd==$cmdDia) { news_d(); } else if ($cmd==$cmdNot) { news_1(); } else if ($cmd==$cmdText) { news_text(); } else if ($cmd==$cmdNjan) { $nobkg=1; news_1p(); } else if ($cmd==$cmdUlt) { news_1u(); } else if ($cmd==$cmdList) { news_list(); } else if ($cmd==$cmdPesq) { news_p(); } else if ($cmd==$cmdTra) { notes_trad(); } else if ($cmd==$cmdMarc) { news_marca(); } else if (chaveok()) { $pub_part=0; if ($cmd==$cmdIns) { news_n(); } else if ($cmd==$cmdInsx) { news_i(); } else if ($cmd==$cmdAlt) { news_a(); } else if ($cmd==$cmdAltx) { news_u(); } else if ($cmd==$cmdEli) { news_e(); } else if ($cmd==$cmdExp or $cmd==$cmdExp2) { notes_export(); } else if ($cmd==$cmdImp or $cmd==$cmdImp2) { notes_import(); } else if ($cmd==$cmdLoad) { notes_load(); } } } ?>