/
ivan
/
ModMas
Обзор
Документация
Войти
/
ivan
/
ModMas
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
main
ModuleMaster/lcm/lts.ashx
37 строк
1 KB
i.krivokon
Initial commit
13 мар 2026, 13:49
13 мар 2026, 13:49
00d9fb6
Код
Авторство
О чём код?
<%@ WebHandler Language="VB" Class="LTS" %> Imports sharedClasses.dbFunctions Public Class LTS : Implements IHttpHandler Public Sub ProcessRequest(ByVal context As HttpContext) Implements IHttpHandler.ProcessRequest Dim sqlf As New SqlFunctions Dim id = context.Request.QueryString("id") Dim matnr = context.Request.QueryString("matnr") Dim qty = context.Request.QueryString("qty") Dim result As Integer = 0 If id IsNot Nothing And matnr IsNot Nothing And qty IsNot Nothing Then result = sqlf.NonQuery("update [UserModules].[dbo].[WA_LCM] set [RUN_IMMEDIATELY] = 'Y', params = 'ID:{" + id + "};MATERIAL:{" + matnr + "};QTY:{" + qty + "}' where id='1'") End If 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