var ns4=(document.layers)? true:false;
var ie4=((document.all)&&(!document.getElementById))? true:false;
var ope=(window.opera)? true:false;
var ie =(document.all&&!ope)? true:false;
var dom=document.getElementById;
// NAVIGATEUR
Navigateur = navigator.appName;
if ((Navigateur == 'Netscape')&&(parseInt(navigator.appVersion)<=4)) {document.write('');}
else{if (Navigateur == 'Microsoft Internet Explorer'){document.write('');}else{document.write('');}}
// POP-UP
function openWin(theURL,winName,features) { opwin = window.open(theURL,winName,features); opwin.focus(); }
// PUBLICITE
function pub() {
if (ns4 || ie4) {
if(ns4) {
document.sky.left = ((window.innerWidth/2)+392);
}
else {
document.getElementById("sky").style.left = ((window.innerWidth/2)+384);
}
}
else {
if(ie) {
sky.style.left = parseInt((document.body.clientWidth)/2)+392;
}
else {
document.getElementById("sky").style.left = ((window.innerWidth/2)+384);
}
}
}
function rotasky() {
document.write("
");
document.write("");
document.write("
");
}
// SELECT_MULTIPLE
function is_one_selected(obj)
{
for(var no=0; no < obj.length ;no++)
if(obj[no].selected)
return true;
return false;
}
// DEFILEMENT TOP & COLONNE
var marqueewidth=390;
var marqueeheight=12;
var speed=3;
var marqueecontents='... [ 08/01/2009 08:33 ] Le projet de loi "Grenelle 1", sera examiné par le Sénat à partir du 27 janvier ... ';
var scrollerwidth='115px';
var scrollerheight='160px';
var scrollerbgcolor='F3F3F3';
var scrollerbackground='';
var messages=new Array();
messages[0]="PA.13952 - 08/01/2009 Bonjour, je suis à la recherche d\'une pâture dans les alentours de Templeuve Belgique, Baisieux, Willems dans le nord de la France. Une pâture de 2 hectares environ pour 2 chevaux... ";
messages[1]="PA.13949 - 05/01/2009 Vend pour faire une opération chirugicale un tracteur john deere 6930TLS AUTOPOWER dont voici les caractéristiques: - Mise en circulation 30/10/2007 - Cabine suspendue, climatisé, ... ";
messages[2]="PA.13947 - 02/01/2009 Recherche contrat pour production herbes aromatiques et medicinales [surface exploitable 2 ha]. Merci... ";
messages[3]="PA.13946 - 02/01/2009 Recherche batiment [tunnel ou autre] ainsi que materiel [ chauffage, chaine alimentaire, silo ...] pour élevage de canards. Merci.... ";
messages[4]="PA.13945 - 31/12/2008 VEND FOURGON BOXER PEUGEOT ANNEE 1998 - 124000 KM - DISTRIBUTION ET FREINS REFAITS [10000 KM] 5000€ - CONTACT 0490318258... ";
var ie=document.all;
var dom=document.getElementById;
if (messages.length>2)
i=1;
else
i=0;
function intializemarquee() {
document.cmarquee01.document.cmarquee02.document.write(marqueecontents);
document.cmarquee01.document.cmarquee02.document.close();
thelength=document.cmarquee01.document.cmarquee02.document.width ;
document.cmarquee01.document.cmarquee02.left=200;
scrollit();
}
function scrollit() {
if (document.cmarquee01.document.cmarquee02.left>=thelength*(-1)) {
document.cmarquee01.document.cmarquee02.left-=speed;
setTimeout("scrollit()",100);
}
else {
document.cmarquee01.document.cmarquee02.left=marqueewidth;
scrollit();
}
}
function move1(whichlayer) {
tlayer=eval(whichlayer);
if (tlayer.top>0&&tlayer.top<=5) {
tlayer.top=0;
setTimeout("move1(tlayer)",5000);
setTimeout("move2(document.main.document.second)",5000);
return;
}
if (tlayer.top>=tlayer.document.height*-1) {
tlayer.top-=5;
setTimeout("move1(tlayer)",50);
}
else {
tlayer.top=parseInt(scrollerheight);
tlayer.document.write(messages[i]);
tlayer.document.close();
if (i==messages.length-1)
i=0;
else
i++;
}
}
function move2(whichlayer) {
tlayer2=eval(whichlayer);
if (tlayer2.top>0&&tlayer2.top<=5) {
tlayer2.top=0;
setTimeout("move2(tlayer2)",5000);
setTimeout("move1(document.main.document.first)",5000);
return;
}
if (tlayer2.top>=tlayer2.document.height*-1) {
tlayer2.top-=5;
setTimeout("move2(tlayer2)",50);
}
else {
tlayer2.top=parseInt(scrollerheight);
tlayer2.document.write(messages[i]);
tlayer2.document.close();
if (i==messages.length-1)
i=0;
else
i++;
}
}
function move3(whichdiv) {
tdiv=eval(whichdiv);
if (parseInt(tdiv.style.top)>0&&parseInt(tdiv.style.top)<=5) {
tdiv.style.top=0+"px";
setTimeout("move3(tdiv)",5000);
setTimeout("move4(second2_obj)",5000);
return;
}
if (parseInt(tdiv.style.top)>=tdiv.offsetHeight*-1) {
tdiv.style.top=parseInt(tdiv.style.top)-5+"px";
setTimeout("move3(tdiv)",50);
}
else {
tdiv.style.top=parseInt(scrollerheight)
tdiv.innerHTML=messages[i];
if (i==messages.length-1)
i=0;
else
i++;
}
}
function move4(whichdiv) {
tdiv2=eval(whichdiv)
if (parseInt(tdiv2.style.top)>0&&parseInt(tdiv2.style.top)<=5) {
tdiv2.style.top=0+"px";
setTimeout("move4(tdiv2)",5000);
setTimeout("move3(first2_obj)",5000);
return;
}
if (parseInt(tdiv2.style.top)>=tdiv2.offsetHeight*-1) {
tdiv2.style.top=parseInt(tdiv2.style.top)-5+"px";
setTimeout("move4(second2_obj)",50);
}
else {
tdiv2.style.top=parseInt(scrollerheight);
tdiv2.innerHTML=messages[i];
if (i==messages.length-1)
i=0;
else
i++;
}
}
function startscroll() {
if (ie||dom) {
first2_obj=ie? first2 : document.getElementById("first2");
second2_obj=ie? second2 : document.getElementById("second2");
move3(first2_obj);
second2_obj.style.top=scrollerheight;
second2_obj.style.visibility='visible';
}
else if (document.layers) {
document.main.visibility='show';
move1(document.main.document.first);
document.main.document.second.top=parseInt(scrollerheight)+5;
document.main.document.second.visibility='show';
setTimeout("window.onresize",450);
intializemarquee();
}
}
window.onload=startscroll;
// FONCTION MAIL
function is_email (emailStr) {return emailCheck(emailStr)}
function emailCheck (emailStr) {
var checkTLD=1;
var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/;
var emailPat=/^(.+)@(.+)$/;
var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]";
var validChars="\[^\\s" + specialChars + "\]";
var quotedUser="(\"[^\"]*\")";
var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;
var atom=validChars + '+';
var word="(" + atom + "|" + quotedUser + ")";
var userPat=new RegExp("^" + word + "(\\." + word + ")*$");
var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");
var matchArray=emailStr.match(emailPat);
if (matchArray==null) {return false;}
var user=matchArray[1];
var domain=matchArray[2];
for (i=0; i127) {return false;} }
for (i=0; i127) {return false;} }
if (user.match(userPat)==null) {return false;}
var IPArray=domain.match(ipDomainPat);
if (IPArray!=null) { for (var i=1;i<=4;i++) { if (IPArray[i]>255) {return false;} } return true; }
var atomPat=new RegExp("^" + atom + "$");
var domArr=domain.split(".");
var len=domArr.length;
for (i=0;i