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
%>