diff --git a/MAXIMUM_Product_Program/MainForm.vb b/MAXIMUM_Product_Program/MainForm.vb index bc502c2..4451990 100644 --- a/MAXIMUM_Product_Program/MainForm.vb +++ b/MAXIMUM_Product_Program/MainForm.vb @@ -1465,7 +1465,7 @@ FinishFunc: Private Function CreateSerialCompare(SerialNum As String) As Boolean DBCmd = "SELECT COUNT(NUMBER) FROM " & ApplyCartDB & " WHERE Product_SN = '" & SerialNum & "'" Dim CompareData As String = DBQueryScalar(DBCmd) - If CompareData > 0 Then + If CompareData > "False" Then Return False End If @@ -3156,7 +3156,7 @@ FailLoad: Private Function BeforeTrayData(NowYear As Int16, NowMonth As Int16) As Boolean DBCmd = "SELECT COUNT(UserID) FROM " & InfoRegStateDB & " WHERE UserID= '" & IDName & "' AND ModelNum = '" & ModelCode & "' AND TypeNum = '" & TypeCode & "' AND ColorNum = '" & ColorCode & "' AND UsageNum = '" & ClassCode & "' AND CreateYear = '" & NowYear & "' AND CreateMonth = '" & NowMonth & "'" Dim BeforeData As String = DBQueryScalar(DBCmd) - If BeforeData > 0 Then + If BeforeData > "False" Then Return True ''있을 경우 Else Return False '' 없을 경우 diff --git a/업데이트 내역.txt b/업데이트 내역.txt index 73551ae..47c8e94 100644 --- a/업데이트 내역.txt +++ b/업데이트 내역.txt @@ -1,2 +1 @@ -1. 샷정보 확인 중 통신 연결 문제 발생 시 메세지 박스 중복 출현 가능 하도록 수정 -2. program version 1.1.7 +1. 문자열과 숫자 타입 비교 코드 수정 \ No newline at end of file