/
ivan
/
ModMas
Обзор
Документация
Войти
/
ivan
/
ModMas
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
main
ModuleMaster/lcm/panels_info_handler.ashx
44 строки
1 KB
i.krivokon
Initial commit
13 мар 2026, 13:49
13 мар 2026, 13:49
00d9fb6
Код
Авторство
О чём код?
<%@ WebHandler Language="VB" Class="panels_infor_handler" %> Imports sharedClasses.dbFunctions Public Class panels_infor_handler : Implements IHttpHandler Public Sub ProcessRequest(ByVal context As HttpContext) Implements IHttpHandler.ProcessRequest Dim sqlf As New SqlFunctions Dim sql As New StringBuilder Dim result As Integer sql.Clear() sql.AppendLine("WITH cte AS ( ") sql.AppendLine("select ") sql.AppendLine("id ") sql.AppendLine(",COMPONENT ") sql.AppendLine(",row_number() OVER(PARTITION BY component ORDER BY id) AS [rn] ") sql.AppendLine("from [UserModules].[user].[Panel_description] ") sql.AppendLine(") ") sql.AppendLine("delete cte where [rn] > 1 ") result = sqlf.NonQuery(sql.ToString) 'context.Response.ContentType = "content/text" 'If result > 0 Then ' context.Response.Write("LTS creation in progress") 'Else ' context.Response.Write("ng") 'End If End Sub Public ReadOnly Property IsReusable() As Boolean Implements IHttpHandler.IsReusable Get Return False End Get End Property End Class