권한 기능 업데이트

2019-05-05 22:25:33 +09:00
parent ca131efead
commit e82a1c6728
17 changed files with 869 additions and 821 deletions
--- a/SubProject/ArinClassV2/ArinClassV2/MyAuth.vb
+++ b/SubProject/ArinClassV2/ArinClassV2/MyAuth.vb
@@ -24,7 +24,7 @@
        Return True
    End Function

-    Public Sub SetAuth(ByVal Newkey As String, ByVal Fn As String)
+    Public Sub SetAuth(ByVal Newkey As Long, ByVal Fn As String)
        Dim auth As New ARINCLASS
        Dim Arinini As New MyINI(Fn)
        Arinini.Write("main", "install", Newkey)