annx_vers_write.asp

Calcul de la date de peremption :	Récupération des données du formulaire date d'application et durée de peremption; on en déduit la date de peremption.
act="crea" : mode création	Récupération des données du formulaire puis insert into annexes_versions (" + columns + ") VALUES (" + values + ")
act="modif" : mode modification	idem puis "update annexes_versions set ... " where doc_id = " + Request.QueryString ('doc_id') + " and ann_id= " + Request.QueryString('ann_id') + " and van_id= " + Request.QueryString('van_id')"
Si on est en eff :	if (Request.QueryString ('act') == "del") del_annx_vers (Request.QueryString ('doc_id'), Request.QueryString ('ann_id'), Request.QueryString ('van_id'));
Redirection : 1: on est en effacement : (Request.QueryString ('act') == "del") redirection sur : annx_vers_liste.asp ?doc_id=" + Request.QueryString ('doc_id') + "&ann_id=" + R.Q ('ann_id') + "&ref_doc" + R.Q('ref_doc') + "&ref_ann=" + R.Q('ref_ann') 2: sinon on est en création ou en modification :   A : - Si on travaille sur un projet, on passe par l'aspiration : if (Request.Form("van_no_projet") != 0) annexes_upload.asp ?van_id=" + Request.Form("van_id") + "&van_no_valide=" + R.F ('van_no_valide') + "&van_no_projet=" + R.F ('van_no_projet')   B : - Si on travaille sur une version, on récupère le fichier du projet antérieur : annx_recup_pages.asp ?van_id=" + Request.Form('van_id') + "&prec_van_id="   if ("" + Request.QueryString('act') == "crea")  : R.Q ('prec_van_id') else (modification) R.F ('van_id')}  + toujours : "&doc_id=" + R.F ("doc_id") + "&ref_doc=" + R.Q ('ref_doc')  + "&ann_id=" + R.F ("ann_id") + "&ref_ann=" + R.Q ('ref_ann')