Bonjour,

Je vous écris car je bloque sur un VBScript.
Celui-ci devrait me permet d'insérer la date actuelle (dans l'idéal avec l'heure) dans une base de données (MySQL).

J'ai essayé différentes méthodes :
- Valeur de la cellule de destination : DATE, DATETIME
- Utilisation de fonction VBScript : Date, FormatDateTime, DateValue

Côté code :
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
 
'Connexion à la base
  set objConn = CreateObject("ADODB.Connection")
  objConn.Open "Driver={MySQL ODBC 5.1 Driver};Server=localhost;Database=test_date;UID=user;PWD=mdp;"
  set objRS = CreateObject("ADODB.Recordset")
  objRS.Open "employe", objConn
 
'Récupération de la date et insertion
tmp = (FormatDateTime(Date,2))
 
commandText = "INSERT INTO employe(date) VALUES('" + temp + "')"
 
objConn.Execute commandText
set objRS = Nothing
objConn.Close
Est-il possible de réussir à intégrer la date dans la base sans la transformer en String ?

Merci pour votre aide