Bonjour à tous,

Est-ce que quelqu'un pourrait vérifier ou tester ce code pour moi car de mon côté, je n'arrive pas à entrer dans la fonction "ConnectToDB" lors du click sur le bouton !!

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
43
44
45
<html>
<head>
 
<SCRIPT language="Javascript"> 
function ConnectToDB(){
alert ("entrée dans ConnectToDB");
var rs;
var conn;
var comm
var sql;
var DBPath;
 
DBPath= Server.MapPath(".")+"\DB\db1.mdb"
rs = new ActiveXObject("ADODB.Recordset");
comm = new ActiveXObject("ADODB.Command");
conn = new ActiveXObject("ADODB.Connection");
 
conn.open "driver={Microsoft Access driver (*.mdb)};dbq=" & DBPath
Comm.ActiveConnection = conn
 
sql = ("insert into Table1 (nom,prenom,adresse,cp) values(+document.formulaire.nom.value+,+document.formulaire.prenom.value+,+document.formulaire.adresse.value+,+document.formulaire.cp.value+)");
comm.CommandText=sql
Comm.Execute
 
rs.Open (sql, conn);
 
alert("It worked");
 
conn.Close;
rs.Close;
}
</SCRIPT>
 
</head>
<body bgcolor="#CCFFFF">
<form name="formulaire" method= "post" onSubmit="ConnectToDB()" action="">
 <p><label>Nom : </label><input type="text" name="nom" size="15" /></p>
 <p><label>Prénom : </label><input type="text" name="prenom" size="15" /></p>
 <p><label>Adresse : </label><textarea name="adresse" cols="30" rows="4"></textarea></p>
 <p><label>Code postal : </label><input type="text" name="cp" size="7" maxlength="5" /></p>
<p><input type="submit" name="btnEnregistrer" value="Enregistrer"/></p>
</form>
 
</body>
</html>
Merci d'avance