macro 기능 추가 중. 엑세 업로드 양식 추가 예정

This commit is contained in:
ykh
2023-07-23 00:58:28 +09:00
parent 3eed3c6cd4
commit 48e3fecfc9
13 changed files with 3571 additions and 1925 deletions

View File

@@ -1327,7 +1327,7 @@ Public Class Frm_V20091231_Weather
Dim len As UInt32 = ms.Length
Dim bodybuf(len - 1) As Byte
Array.Copy(ms.GetBuffer(), bodybuf, len)
Dim compbuf() As Byte
Dim compbuf() As Byte = Nothing
Utility.MiniLZO.Compress(bodybuf, compbuf)
'Dim decombuf(bodybuf.Length - 1) As Byte