voila, dans un formulaire, je rempli la table du destinataire(nom,costcenter,logon id)
le nom et le cost center sont remplis mais le logon id non et l'erreur
le probleme est que il y a une valeur et elle n'est pas nulle donc là je pige pas
Code : Sélectionner tout - Visualiser dans une fenêtre à part Index or primary key cannot contain a Null value
voici la page dappel:
et la page de validation
Code : Sélectionner tout - Visualiser dans une fenêtre à part <input type="text" name="Logon_ID" size="6"></td>
apparement c'est la que ca plante
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42 <%@ Language="VBScript"%> <% option explicit %> ************************************************************************************************************* <% Dim Conconnexion2 Dim fCostCenter Dim DSN_BASE2 Dim SQL fCostCenter=Request.Form("CostCenter") DSN_BASE2 = "DBQ=" & Server.Mappath("./BD.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};Driverld=25" SQL = "INSERT INTO CostCenter (CostCenter) VALUES ('"&fCostCenter&"')" Set Conconnexion2 = Server.CreateObject("ADODB.Connection") Conconnexion2.Open DSN_BASE2 Conconnexion2.Execute(SQL) Conconnexion2.Close Set Conconnexion2 = Nothing %> ************************************************************************************************************* <% Dim Conconnexion3 Dim fnomdest Dim DSN_BASE3 Dim RequeeteSQL fnomdest=Request.Form("nomdest") DSN_BASE3 = "DBQ=" & Server.Mappath("./BD.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};Driverld=25" RequeeteSQL = "INSERT INTO destinataire (nomdest) VALUES ('"&fnomdest&"')" Set Conconnexion3 = Server.CreateObject("ADODB.Connection") Conconnexion3.Open DSN_BASE3 Conconnexion3.Execute(RequeeteSQL) Conconnexion3.Close Set Conconnexion3 = Nothing %> ************************************************************************************************************* <% Dim Conconnexion4 Dim fLogon_ID Dim DSN_BASE4 Dim RequeeeteSQL
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 fLogon_ID=Request.Form("Logon_ID") DSN_BASE4 = "DBQ=" & Server.Mappath("./BD.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};Driverld=25" RequeeeteSQL = "INSERT INTO destinataire (Logon_ID) VALUES ('"&fLogon_ID&"')" Set Conconnexion4 = Server.CreateObject("ADODB.Connection") Conconnexion4.Open DSN_BASE4 Conconnexion4.Execute(RequeeeteSQL) Conconnexion4.Close Set Conconnexion4 = Nothing %>
Partager