housni | Bonjour,
voila, j'ai un formulaire ou l'utilisateur renseigne un champ (code 8 chiffres) et à partir de ce code d'autres champs doivent s'affichées automatiquement. Puis l'utilisateur renseigne d'autres champs et la j'ai 2 champs qui son des champs calculés avec les valeurs renseignées par l'utilisateur auparavant et les valeurs qu'ont a affiché automatiquement.Enfin, l'utilisateur renseigne d'autres champs !
Donc en gros dans mon formulaire on des champs à saisir , des champs qui doivent être renseignés automatiquement et des champs calculés.
De plus il faut que j'insère tous les champs renseignés dans ma BDD.
Donc comment faire cela sans rafraîchir ma page et en ayant juste un bouton " envoyer le formulaire "
J'ai vu un peu sur le net qu'il fallait utiliser de l'ajax et du javascript mais mon problème c'est que je ne connais pas du tout ces langages de prog ! Donc si vous aviez une solution ca serait vraiment cool !!!
Je vous joins mon fichier avec mon formulaire et mon fichier ou il y a ma requete sql qui selection les données ralives à mon code :
formulaire
Code :
- <html>
- <head>
- <meta http-equiv="Content-Language" content="fr">
- <meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
- <title>Formulaire de saisie des AVK</title>
- <base target="contenu">
- <style>
- <!-- div.Section1 {page:Section1;} -->
- </style>
- </head>
- <body bgcolor="#EBEBE0" style="font-family: Arial; font-size: 12pt" text="#003366">
- <br>
- <p align="center">
- <font size="5">
- <span style="background-color: #C0C0C0">Saisissez les informations sur votre Avis de Variation de Consommation (AVK)</span>
- </font>
- </p>
- <p align="center">
- <a href="Mode%20opératoire%20formulaire%20AVK.pdf">Accédez ici au mode opératoire AVK</a>
- </p>
- <br>
- <form method="post" action="Import_Formulaire_AVK.asp" target="_self" name="Saisie_AVK">
- <table align="center" cellpadding="5" cellspacing="5" style="border-collapse: collapse" bordercolor="#111111">
- <tr>
- <td width="340">
- <font size="2"><b>
- <font color="red">*</font>
- Code article (8 caractères) :
- </b></font>
- <br>
- <input name="Code_Article" size=8 maxlength=8>
- <br>
- </td>
- <td width="340">
- <font size="2"><b>
- Désignation :
- </b></font>
- <br>
- <% reponse.write RS("description" ) %>
- </td>
- </tr>
- <td width="340">
- <font size="2"><b>
- Prix unitaire :
- </b></font>
- <br>
- <% reponse.write RS("Coût STD" ) %>
- </td>
- <td width="340">
- <font size="2"><b>
- Délai d'approvisionnement :
- </b></font>
- <br>
- <% reponse.write DelaiA %>
- </td>
- <tr>
- <td width="340">
- <font size="2"><b>
- Consommation mensuelle moyenne actuelle :
- </b></font>
- <br>
- <% reponse.write ConsoM %>
- </td>
- <td width="340">
- </td>
- </tr>
- <tr>
- <td colspan="2" width="682">
- <font size="2"><b>
- <font color="red">Soit :</font>
- consommation mensuelle moyenne à prévoir (exprimée dans l'unité de mesure standard PSFT) :
- </b></font>
- <br>
- <input name="Conso_Mens_APrev" size=20 maxlength=30>
- <br>
- <font size="2"><b>
- <font color="red">Soit :</font>
- cadencement / echéancier (exprimé dans l'unité de mesure standard PSFT) :
- <% reponse.write RS("Unite" ) %>
- </b></font>
- <br>
- <table border="1">
- <tr>
- <%
- 'on commence par déclarer les variables utiles
- dim dateK 'variable contenant le mois correspondant à la cellule parcourue, au format date
- dim dateFin 'variable contenant le dernier mois pour lequel il faut afficher une cellule
- dim i 'variable contenant le numéro d'ordre de la cellule parcourue (i=1 pour la 1ère cellule, etc.)
- dim dt 'variable contenant le mois correspondant à la cellule parcourue, au format "mm/aaaa"
- 'puis on initialise ces variables :
- ' - i = 1 (on commence par la première case, logique)
- ' - dateK = date du jour + 1 mois (la première case du tableau correspond au mois M+1)
- ' - dateFin = premier mois de l'année civile de (date du jour + 3 ans)
- i = 1
- dateK = DateAdd("m", 1, Now)
- dateFin = cdate("01/01/" & (DatePart("yyyy", Now) + 3))
- 'pour chaque mois compris entre M+1 et décembre A+2...
- do while dateK <= dateFin
- '... on crée une nouvelle case...
- response.write "<td align=""center""><font size=""2"">"
- '... on y indique le mois qui convient, au format "mm/aaaa", ainsi qu'un champ de saisie nommé
- 'd'après ce mois...
- if len(month(dateK)) = 1 then
- dt = "0" & Month(dateK) & "/" & Year(dateK)
- response.write("0" & Month(dateK) & "/" & Year(dateK))
- else
- dt = Month(dateK) & "/" & Year(dateK)
- response.write(Month(dateK) & "/" & Year(dateK))
- end if
- response.write "</font><br>"
- response.write "<input name=" & dt & " size=5 maxlength=30>"
- '... et on n'oublie pas de clôturer la case
- response.write "</td>"
- 'si on vient d'afficher la case correspondant au mois de décembre d'une année, on part sur une
- 'nouvelle ligne du tableau
- if Month(DateK) = 12 then
- response.write "</tr><tr>"
- end if
- 'enfin, on incrémente les compteurs dateK (d'un mois) et i (d'une unité)
- dateK = DateAdd("m", 1, dateK)
- i = i + 1
- loop
- '%>
- </tr>
- </table>
- </td>
- </tr>
- <tr>
- <td colspan="2" width="682">
- <font size="2"><b>
- <font color="red">*</font>
- La consommation à prévoir...
- </b></font>
- <input type="radio" name="Conso_ARemplacer" value="Remplace">
- <font size="2"> remplace </font>
- <input type="radio" name="Conso_ARemplacer" value="Ajoute">
- <font size="2"> se rajoute </font>
- <font size="2"><b>... (à) la consommation actuelle de la BU.</b></font>
- </td>
- </tr>
- <tr>
- <td colspan="2" width="682">
- <font size="2"><b>
- <font color="red">*</font>
- Tendance
- </b></font>
- <input type="radio" name="Tendance" value="Hausse">
- <font size="2"> à la hausse </font>
- <input type="radio" name="Tendance" value="Baisse">
- <font size="2"> à la baisse </font>
- </td>
- </tr>
- <tr>
- <td width="340">
- <font size="2"><b>
- <font color="red">*</font>
- Date de début de validité de l'AVK (jj/mm/aaaa) :
- </b></font>
- <br>
- <input name="Date_Deb_Validite" size=10 maxlength=10 onKeyUp="masqueSaisieDate(this.form.Date_Deb_Validite)">
- </td>
- <td width="340">
- <font size="2"><b>
- <font color="red">*</font>
- Date de fin de validité de l'AVK (jj/mm/aaaa) :
- </b></font>
- <br>
- <input name="Date_Fin_Validite" size=10 maxlength=10 onKeyUp="masqueSaisieDate(this.form.Date_Fin_Validite)">
- </td>
- </tr>
- <td width="340">
- <font size="2"><b>
- <font color="red">*</font>
- Montant total de l'AVK sur l'ensemble de la période de validité :
- </b></font>
- </td>
- <td width="340">
- <font size="2"><b>
- <font color="red">*</font>
- Evolution du coût par rapport à la consommation actuelle sur la période de validité :
- </b></font>
- </td>
- <td colspan="2" width="682">
- <font size="2"><b>Adresse Mail du valideur :
- </b></font>
- <input type="text" name="Mail_Valideur" value="Y">
- </td>
- <tr>
- <td width="340">
- <font size="2"><b>
- Série de matériel :
- </b></font>
- <br>
- <input name="Serie" size=15 maxlength=30>
- </td>
- <td width="340">
- <font size="2"><b>
- Observation:
- </b></font>
- <br>
- <textarea name="Observation" rows=2 cols="40"></textarea>
- </td>
- </tr>
- <tr>
- <td width="340">
- <font size="2"><b>
- <font color="red">*</font>
- BU émettrice de l'AVK :
- </b></font>
- <br>
- <input name="BU_Expediteur" size=5 maxlength=5>
- </td>
- <td width="340">
- <font size="2"><b>
- <font color="red">*</font>
- Nom de l'émetteur de l'AVK :
- </b></font>
- <input name="Nom_Expediteur" size=20 maxlength=80>
- </td>
- </tr>
- <tr>
- <td width="340">
- <font size="2"><b>
- <font color="red">*</font>
- Tél SNCF de l'émetteur :
- </b></font>
- <br>
- <input name="Num_Tel_Exped" size=6 maxlength=6>
- </td>
- <td width="340">
- <font size="2"><b>
- <font color="red">*</font>
- E-mail de l'émetteur :
- </b></font>
- <br>
- <input name="AdMail_Exped" size=34 maxlenght=30>
- </td>
- </tr>
- <tr>
- <td width="340">
- <p>
- <font size="2"><b><font color="red">*</font></b></font>
- <b><font size="2">
- Motif AVK :
- <select size="1" name="Motif_AVK">
- <option selected>Sélectionner un motif</option>
- <option value="Création d&#39;articles">Création d'articles</option>
- <option value="Création d&#39;articles matériel neuf">Création d'articles matériel neuf</option>
- <option value="Transfert de parc">Transfert de parc</option>
- <option value="Maintenance suite à OM">Maintenance suite à OM</option>
- <option value="Remise en état de parc">Remise en état de parc</option>
- <option value="Potentiel">Potentiel</option>
- <option value="ATP">ATP</option>
- <option value="Noria">Noria</option>
- <option value="Evolution des règles de maintenance">Evolution des règles de maintenance</option>
- <option value="Evolution de la charge PRM (constituants PRM)">Evolution de la charge PRM (constituants PRM)</option>
- <option value="Evolution de la charge engin (Technicentre Industriel)">Evolution de la charge engin (Technicentre Industriel)</option>
- <option value="Transfert Centre d&#39;Excellence (PRM)">Transfert Centre d'Excellence (PRM)</option>
- <option value="Usure prématurée">Usure prématurée</option>
- <option value="Mise NPA">Mise NPA</option>
- <option value="Radiation">Radiation</option>
- <option value="Sur demande du CLI">Sur demande du CLI</option>
- <option value="Autre (remplir cellule observation)">Autre (remplir cellule observation)</option>
- </select>
- </font></b>
- </p>
- </td>
- <td width="340">
- </td>
- </tr>
- <tr>
- <td colspan="2" width="340">
- <font size="2">
- <b>
- Date de la demande :
- </b>
- <% response.write now %>
- </font>
- <input type="hidden" name="Date_Demande" value="<% response.write now %>">
- </td>
- </tr>
- </table>
- <p align="center">
- <b><input type="submit" value="Envoyer l'AVK" style="font-weight: bold"></b>
- </p>
- </form>
- </body>
- </html>
|
Mon fichier contenant ma requete sql qui récupère les données grace à mon code Article
Code :
- <!-- #include file="Connexion_SQL.asp"-->
- <%
- ' sélectionne les informations relatives à notre article renseigné dans le formulaire AVK
- dim Cstd ,Cpmp,CpmpD,Gart,KvM,KV,DLERP,DAPP,Conso, coutU , DelaiA 'variable qui stocke le données selon les différentes cas
- code= request.form("Code_Article" )
- sql="select b.Description, b.[Coût STd], b.[Coût PMP], b.[Coût PMP déporté],a.[Groupe_art],a.[Unite],b.[Kv modifiée],b.[Kv],b.[Delai LREP (j)],b.[Delai d appro (j)]" & _
- "from T_EXTR_BASAMONT b,T_CALCUL_ARTICLE_AMONT a " & _
- "where A.ARTICLE = b.code_article and b.code_article ='" & code & "'"
- set rs=conn.execute(sql)
- do while not rs.EOF
- Cstd=rs("Coût STd" )
- Cpmp=rs("Coût PMP" )
- CpmpD=rs("Coût PMP déporté" )
- Gart=rs("Groupe_art" )
- KvM=rs("Kv modifiée" )
- KV=rs("KV" )
- DLERP=rs("Delai LREP (j)" )
- DAPP=rs("Delai d appro (j)" )
- If Gart="MRPRM" or Gart="MRPRMD" then
- coutU=Cstd
- elseif CpmpD<>"" or CpmpD<>999999 then
- coutU = CpmpD
- else coutU=Cpmp
- end if
- If rs("Kv modifiée" )<>"" then
- ConsoM = rs("Kv modifiée" )
- Else
- ConsoM = rs("Kv" )
- End If
- If rs("Delai LREP (j)" )<>"" then
- DelaiA = rs("Delai LREP (j)" )
- Else DelaiA=rs("Delai d appro (j)" )
- End If
- rs.movenext
- Loop
- Set rs=Nothing
- Response.Write monRetourHTML
- %>
|
|