[الطالب]

سلام

كود :

Dim days As Integer = 3
Using cmd As New OleDb.OleDbCommand("Select DateDiff('d', [dt], NOW()) AS [Days] From [tb] Where [cpid] = ?", cls.con)
    cmd.Parameters.AddWithValue("@cpid", cpid)
    If cls.con.State = Data.ConnectionState.Closed Then cls.con.Open()
    Dim d As Integer = cmd.ExecuteScalar
    If d <= days Then
        Response.AddHeader("active", "yes")
        'اريد ان اكتب كود يبين كم بقي يوم
    End If
    cls.con.Close()
End Using

موفقين