[vb.net] /command's

12/17/2014 19:37 anonymous-29742#1
Hallo,
Ich bin gerade dabei einen 'FTP CHAT' zu coden,
nun möchte ich , das 'commands' genutzt werden können.


Bsp. (ich schreibe in das Nachrichtenfeld) :
/username #Lucas#

Dabei soll nun folgendes Passieren :
USERNAME = #Lucas#

Habe das alle schon Define't (Dim USERNAME As String)


Ich hoffe ich finde hier Hilfe :)

MFG Lucas.
12/17/2014 20:10 YatoDev#2
sollte genügen bin am handy online

If nachricht.Contains("/") Then
command = nachricht.Split(" ")

dann abchecken welches command es ist zb mit einem switch block (der command ist nachricht[0] der wert nachricht[1])
12/17/2014 21:02 anonymous-29742#3
Quote:
Originally Posted by »FlutterShy™ View Post
sollte genügen bin am handy online

If nachricht.Contains("/") Then
command = nachricht.Split(" ")

dann abchecken welches command es ist zb mit einem switch block (der command ist nachricht[0] der wert nachricht[1])

Das geht iwie nicht :/

Habe aber etwas anderes gefunden, wo
ich auch nicht weiter komme.
Immer wenn nur 1 Wort abgeschickt wird.

kommt das :

[Only registered and activated users can see links. Click Here To Register...]
12/17/2014 21:40 YatoDev#4
Quote:
Originally Posted by #Lucas# View Post
Das geht iwie nicht :/

Habe aber etwas anderes gefunden, wo
ich auch nicht weiter komme.
Immer wenn nur 1 Wort abgeschickt wird.

kommt das :

[Only registered and activated users can see links. Click Here To Register...]
ich versteh auch nicht was das für einen sinn macht was du da in den quellcode schreibst :/

FTP Passwort im code? Release das bloß nicht
12/18/2014 02:21 warfley#5
Hier ein Code, den du für mehr commands Selbständig noch ergänzen musst ist an den Entsprechenden Stellen aber auch Kommentiert
PHP Code:
#Region "Command"
    Enum CmdType
        ctUsername
        REM Hier neue Identifikatoren Hinzufügen
        ctUnknown
    End Enum
    Structure Cmd
        Dim CommandType As CmdType
        Dim Args() As String
    End Structure

    Const CmdIndicator As String = "/"
    Function CmdGetType(str As String) As CmdType
        Select Case str
            Case "username"
                Return CmdType.ctUsername
                REM hier weitere Abfragen einfügen
            Case Else
                Return CmdType.ctUnknown
        End Select
    End Function

    Function ParseCMD(ByRef CmdStr As String, ByRef Command As Cmd) As Boolean
        If Not CmdStr.StartsWith(CmdIndicator) Then
            Return False
        End If
        Dim tmpStr As String = CmdStr.Substring(1, CmdStr.Length - 1)
        Dim SplitLst As String() = tmpStr.Split(" ")
        Command.CommandType = CmdGetType(SplitLst(0).ToLower)
        ReDim Command.Args(SplitLst.Length - 2)
        For i As Integer = 1 To SplitLst.Length - 1
            Command.Args(i - 1) = [String].Copy(SplitLst(i))
        Next i
        Return True
    End Function


#End Region 
BSP benutzung:
PHP Code:
  Dim Command As Cmd = new Cmd
  ParseCMD(TextBox1.Text, Command)
  If (Command.CommandType = ctUsername) And (Command.Args.Length > 0) then
    Foo(Command.Args(0)
  End If 
12/18/2014 05:46 anonymous-29742#6
Quote:
Originally Posted by »FlutterShy™ View Post
ich versteh auch nicht was das für einen sinn macht was du da in den quellcode schreibst :/

FTP Passwort im code? Release das bloß nicht
Gibt ja sowas wie Net.Reactor :D
12/18/2014 08:47 lordsill#7
Quote:
Originally Posted by #Lucas# View Post
Gibt ja sowas wie Net.Reactor :D
Bringt dann auch nicht viel, .Net Reactor kannst du auch decompilen... (und in den ursprünglichen Code zurücksetzen....)

z.b. [Only registered and activated users can see links. Click Here To Register...]

Quote:
Supported obfuscators/packers

Agile.NET (aka CliSecure)
Babel.NET
CodeFort
CodeVeil
CodeWall
CryptoObfuscator
DeepSea Obfuscator
Dotfuscator
.NET Reactor
Eazfuscator.NET
Goliath.NET
ILProtector
MaxtoCode
MPRESS
Rummage
Skater.NET
SmartAssembly
Spices.Net
Xenocode
kind regards
LordSill
12/18/2014 18:50 YatoDev#8
Quote:
Originally Posted by #Lucas# View Post
Gibt ja sowas wie Net.Reactor :D
selbst wenn es mit de4dot nicht automatisiert geht hindert mich keiner daran den code zu kopieren und ihn sich entschlüsselt zeigen lassen und mit reflexil könnte man auch an der stelle eine ausgabe reinpatchen