Auf FTP gestöbert

    • Auf FTP gestöbert

      [FONT="Century Gothic"][SIZE="3"][COLOR="Wheat"]

      Hallo liebe Corler.

      habe gerade auf ein paar FTP´s geschnüffelt und bin auf das hier gestoßen:

      File-Upload.net - V14-Db-Server.exe

      kA Was das ist... es funktioniert auch nicht so richtig xD

      Den Sourcecode habe ich ma rausgesucht und hier ist er XD

      Module Module1

      Sub Main()
      ' This program will be not run in the Dos mode!
      Console.WriteLine("V14 Database Server by Aeonsoft©")
      Threading.Thread.Sleep(400)
      Console.WriteLine("Loading Database settings...")
      Threading.Thread.Sleep(2400)
      Console.WriteLine("")
      Console.WriteLine("")
      Console.WriteLine("This program cannot read key´s from the Application becouse the connection isn´t created!")
      Console.ReadKey()
      ' To connect to the server, you need these resources to define the IP address!
      Dim con As New Odbc.OdbcConnection("DSN=NAME") ' Insert to "DSN=NAME" the DSN-Name Adress from the Server!
      Dim ip As New Odbc.OdbcConnection("IP") ' Insert to "IP" the Ip Adress from the Server
      Dim port As New Odbc.OdbcConnection("PORT") ' Insert to "PORT" the Port from the Server!


      End Sub
      End Module


      Virustest:
      Virustotal. MD5: 3c4ee5e9d6bded6025e9e0f96ca7f086


      Vllt. kennt sich ja jemand damit aus?!

      [COLOR="Red"]//Update[/COLOR]
      Habe noch etwas gefunden... evtl. eine neuere Version?!

      Source:

      Module Module1

      Sub Main()
      ' This program will be not run in the Dos mode!
      Console.WriteLine("V14 Database Server by Aeonsoft©")
      Threading.Thread.Sleep(400)
      Console.WriteLine("Loading Database settings...")
      Threading.Thread.Sleep(2400)
      Console.WriteLine("")
      Console.WriteLine("")
      Console.WriteLine("Possibly no connection can be created!")
      Console.ReadKey()
      ' To connect to the server, you need these resources to define the IP address!
      Dim con As New Odbc.OdbcConnection("character01") ' DSN-NAME
      Dim ip As New Odbc.OdbcConnection("195.59.138.10") ' IP-Adress
      Dim port As New Odbc.OdbcConnection("15400") ' Port-Adress
      Dim Commands As New Odbc.OdbcCommand("195.59.138.10") ' Insert public IP
      Dim local As New Odbc.OdbcConnection("127.0.0.1") ' Insert local IP
      Dim host As New Odbc.OdbcPermission("login") ' DSN-NAME2
      Dim logs As New Odbc.OdbcCommand("195.59.138.10") ' log
      End Sub
      End Module


      Download der Exe:
      file-upload.net/download-2468383/DatabaseServer.exe.exe.html

      Virustest:
      virustotal.com/de/analisis/888…58a65a85dc321d-1272309287


      mfg.
      [COLOR="Red"]Clair[/COLOR]fontaine[/COLOR][/SIZE][/FONT]
    • Werbung zur Unterstützung des Forums ( Bitte AddBlocker deaktivieren )

    • [FONT="Comic Sans MS"][COLOR="DeepSkyBlue"][SIZE="3"]Lol?
      Das ist kein DB Server!
      Sourcecode in VB?
      Wenn dann C++, da dies die stabilste Version ist und Aoensoft doch nich in VB Programmiert, wenn man in C++ das ganze anderst realisieren aknn.
      Ausserdem "becouse", heißt das nich "because"?
      Sry glaube dir nich, das es wirklich der source is[/SIZE][/COLOR][/FONT]
    • Für mich sieht's eher nach einem Projekt aus, dass jemand macht oder mal gemacht hat. Sieht mir sehr nach VB.Net aus, denn wenn man sich die datei mal gedownloadet hat sieht man, dass es das typische icon von Vb applicationen hat. Man kann es natürlich auch selbst einfügen, was aber nicht viel sinn macht für eine nicht fertige Datei.
      //edit: ok ist 100% VB siehe kommentare ^^
    • Vllt. kann man diese .exe ja weiter schreiebn? xDD
      Keine Ahnung ob es Sinn machen würde...
      Aber möglich wäre es doch, oder etwas nicht :D

      Und wenn es evtl. doch eine "Worldserver.exe sein soll" und man diese weiterschreiben kann und auch für Offifiles benutzen kann, könnte man ne menge damit machen XD

      ... Ich weiß dummer Gedanker...
    • Quellcode

      1. ' This program will be not run in the Dos mode!
      2. Console.WriteLine("V14 Database Server by Aeonsoft©")
      3. Threading.Thread.Sleep(400)
      4. Console.WriteLine("Loading Database settings...")
      5. Threading.Thread.Sleep(2400)
      6. Console.WriteLine("")
      7. Console.WriteLine("")
      8. Console.WriteLine("[COLOR="Red"]This program cannot read key[U]´[/U]s from the Application [U]becouse[/U] the connection isn´t created![/COLOR]")
      9. Console.ReadKey()
      10. ' To connect to the server, you need these resources to define the IP address!
      11. Dim con As New Odbc.OdbcConnection("DSN=NAME") ' [COLOR="Red"]Insert[U] to[/U] "DSN=NAME" the DSN-Name Adress from the Server![/COLOR]
      12. Dim ip As New Odbc.OdbcConnection("IP") ' [COLOR="Red"]Insert[U] to[/U] "IP" the Ip Adress from the Server[/COLOR]
      13. Dim port As New Odbc.OdbcConnection("PORT") ' [COLOR="Red"]Insert to "PORT" the Port from the Server![/COLOR]
      Alles anzeigen


      Das failigste Englisch überhaupt.
    • TwiLight;114177 schrieb:

      Quellcode

      1. ' This program will be not run in the Dos mode!
      2. Console.WriteLine("V14 Database Server by Aeonsoft©")
      3. Threading.Thread.Sleep(400)
      4. Console.WriteLine("Loading Database settings...")
      5. Threading.Thread.Sleep(2400)
      6. Console.WriteLine("")
      7. Console.WriteLine("")
      8. Console.WriteLine("[COLOR="Red"]This program cannot read key[U]´[/U]s from the Application [U]becouse[/U] the connection isn´t created![/COLOR]")
      9. Console.ReadKey()
      10. ' To connect to the server, you need these resources to define the IP address!
      11. Dim con As New Odbc.OdbcConnection("DSN=NAME") ' [COLOR="Red"]Insert[U] to[/U] "DSN=NAME" the DSN-Name Adress from the Server![/COLOR]
      12. Dim ip As New Odbc.OdbcConnection("IP") ' [COLOR="Red"]Insert[U] to[/U] "IP" the Ip Adress from the Server[/COLOR]
      13. Dim port As New Odbc.OdbcConnection("PORT") ' [COLOR="Red"]Insert to "PORT" the Port from the Server![/COLOR]
      Alles anzeigen


      Das failigste Englisch überhaupt.


      ... mag sein das das Englisch da shice is xD
      Aber das hat nichtz mit diesem Thema hier zu tun y.y

      [COLOR="Red"]//Update[/COLOR]

      Noch etwas gefunden...
      Evtl. eine neuere Version?!

      Source:

      Module Module1

      Sub Main()
      ' This program will be not run in the Dos mode!
      Console.WriteLine("V14 Database Server by Aeonsoft©")
      Threading.Thread.Sleep(400)
      Console.WriteLine("Loading Database settings...")
      Threading.Thread.Sleep(2400)
      Console.WriteLine("")
      Console.WriteLine("")
      Console.WriteLine("Possibly no connection can be created!")
      Console.ReadKey()
      ' To connect to the server, you need these resources to define the IP address!
      Dim con As New Odbc.OdbcConnection("character01") ' DSN-NAME
      Dim ip As New Odbc.OdbcConnection("195.59.138.10") ' IP-Adress
      Dim port As New Odbc.OdbcConnection("15400") ' Port-Adress
      Dim Commands As New Odbc.OdbcCommand("195.59.138.10") ' Insert public IP
      Dim local As New Odbc.OdbcConnection("127.0.0.1") ' Insert local IP
      Dim host As New Odbc.OdbcPermission("login") ' DSN-NAME2
      Dim logs As New Odbc.OdbcCommand("195.59.138.10") ' log
      End Sub
      End Module


      Download:
      file-upload.net/download-2468383/DatabaseServer.exe.exe.html

      Virustest:
      virustotal.com/de/analisis/888…58a65a85dc321d-1272309287

      mfg.
      [COLOR="Red"]Clair[/COLOR]fontaine
    • Synaptic;114207 schrieb:

      Für mich sieht das nach Claire will sich wichtig machen aus.

      Sicher noch selbst in vb zusammen geschmissen um aufmerksamkeit zu bekommen...


      Naja denkt sich halt jeder sein Teil.


      MFG


      ... Große Töne spucken aber nichteinmal meinen Namen richtig schreiben können wa?...
      Und wenn ich das gewesen wäre, hätte ich wohl kaum den Sourcecode dabei geschmissen...
      Denk nach bevor du postest!
      B2T!