feat: Block serial number registration for non-info1/info2 accounts

This commit is contained in:
jiwonRepair 2025-07-31 17:04:37 +09:00
parent 3fe99e62ef
commit dd427a8d4e
2 changed files with 22 additions and 4 deletions

View File

@ -1,8 +1,9 @@
Imports System.IO Imports System.IO
Imports System.IO.Ports Imports System.IO.Ports
Imports System.Math
Imports System.Text Imports System.Text
Imports System.Threading Imports System.Threading
Imports System.Math Imports Microsoft.VisualBasic.ApplicationServices
Public Class MainForm Public Class MainForm
Private Const TDMaxLength As Int16 = 10 Private Const TDMaxLength As Int16 = 10
@ -949,6 +950,25 @@ FailFunc:
Private Sub ProdInputFunc(sender As Object, e As EventArgs, SearchData As String) Private Sub ProdInputFunc(sender As Object, e As EventArgs, SearchData As String)
Dim userID As String = ""
' info1 또는 info2 NowState가 1인 사용자 조회
DBCmd = "SELECT UserID FROM " & LoginDB & " WHERE NowState = '1' AND (UserID = 'info1' OR UserID = 'info2')"
If DBQueryReader(DBCmd) Then
userID = sqlDataQuery(0)
Else
MsgBox("사용자 정보 읽기 실패", vbExclamation)
GoTo FailFunc
End If
If userID = "info1" Or userID = "info2" Then
' PASS
Else
MsgBox("info1 또는 info2 계정을 사용하세요", vbExclamation)
GoTo FailFunc
End If
StepReset() StepReset()
ValueReset() ValueReset()

View File

@ -1,3 +1 @@
1. program ver 1.1.9 1. info1, info2 계정 외에는 시리얼번호를 등록 하지 못하도록 수정
2. 샷 수 검색 조건 변경
- If ShotSearch() = "0" Then