Bonjour je veux pouvoir afficher un enregistrement de ma table agent l'enregistrement "fin de periode d'essai" si la date actuelle est inferieur a 15 jours de la date saisie dans ce champs de ma table

mais ça marche pas merci pour votre aide


<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="../Connections/skyform.asp" -->
<%
Dim Recordset_alertes__MMColParam
Recordset_alertes__MMColParam = "1/1/2007"
If (Now -7 <> "") Then
  Recordset_alertes__MMColParam = Now -7
End If
%>

%>
<%
Dim Recordset_alertes
Dim Recordset_alertes_numRows

Set Recordset_alertes = Server.CreateObject("ADODB.Recordset")
Recordset_alertes.ActiveConnection = MM_skyform_STRING
Recordset_alertes.Source = "SELECT *  FROM agent  WHERE fin_periode_essai > '" + Replace(Recordset_alertes__MMColParam, "'", "''") + "'  ORDER BY fin_periode_essai ASC"
Recordset_alertes.CursorType = 0
Recordset_alertes.CursorLocation = 2
Recordset_alertes.LockType = 1
Recordset_alertes.Open()

Recordset_alertes_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index

Repeat1__numRows = 10
Repeat1__index = 0
Recordset_alertes_numRows = Recordset_alertes_numRows + Repeat1__numRows
%>