/
ivan
/
ModMas
Обзор
Документация
Войти
/
ivan
/
ModMas
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
main
ModuleMaster/sj/cleardata.ashx
27 строк
877 B
i.krivokon
Initial commit
13 мар 2026, 13:49
13 мар 2026, 13:49
00d9fb6
Код
Авторство
О чём код?
<%@ WebHandler Language="VB" Class="cleardata" %> Imports System Imports System.Web Imports sharedClasses.dbFunctions Public Class cleardata : Implements IHttpHandler Public Sub ProcessRequest(ByVal context As HttpContext) Implements IHttpHandler.ProcessRequest Dim sqlf As New SqlFunctions Dim sql As New StringBuilder sql.AppendLine("DELETE FROM UserModules.[user].pick_list where REQMT_DATE >= '" & Date.Today.ToString("yyyy-MM-dd") & "' OR REQMT_DATE < convert(varchar, cast(getdate()-7 as date), 121)") Dim result As Integer = sqlf.NonQuery(sql.ToString) context.Response.ContentType = "text/plain" context.Response.Write(result) End Sub Public ReadOnly Property IsReusable() As Boolean Implements IHttpHandler.IsReusable Get Return False End Get End Property End Class