$ObjTuple->SetNomE(ProtectApos($ValNomE));
                $ObjTuple->SetCivilite($ValCivilite);
                $ObjTuple->SetNomR(ProtectApos($ValNomR));
                $ObjTuple->SetPrenomR(ProtectApos($ValPrenomR));
                $ObjTuple->SetAdr1(ProtectApos($ValAdr1));
                $ObjTuple->SetAdr2(ProtectApos($ValAdr2));
                $ObjTuple->SetCP($ValCP);
                $ObjTuple->SetVille(ProtectApos($ValVille));
                $ObjTuple->SetTelR($ValTelR);
                $ObjTuple->SetMailR($ValMailR);
                $ObjTuple->SetFaxR($ValFaxR);
                $ObjTuple->SetPresentEntreprise($ValPresentEntreprise);
                if (substr($ValSiteEntreprise, 0, 7) != 'http://') {
                    $ValSiteEntreprise = 'http://' . $ValSiteEntreprise;
                }
                $ObjTuple->SetSiteEntreprise($ValSiteEntreprise);
                if ($ValPK_Entreprise == 0) {
                    $ObjTuple->Insert();
                } else {
                    $ObjTuple->Update();
                }
                ?>
                <script>location.replace("?Trait=List&SlxTable=<?php 
                echo $NomTabEntreprises;
                ?>
");</script>
                <?php 
                die;
            }
            break;
    }