Bonjour,
Voici mon code :
Dim ajouterOutil
Set ajouterOutil = Server.CreateObject("ADODB.Recordset")
ajouterOutil.ActiveConnection = MM_data_STRING
ajouterOutil.Source = "INSERT INTO Outil(RefOutil,LibelleOutil) VALUES ('" & ucase(Request("ref")) & "', '" & Request("lib") & "') WHERE NOT EXISTS(SELECT * FROM Outil WHERE RefOutil = '" & Request("ref") & "');"
ajouterOutil.Open()
Et le message d'erreur que j'obtiens :
Microsoft JET Database Engine (0x80040E14)
Missing semicolon (;) at end of SQL statement.
Merci pour votre aide