[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
ZitatAlles anzeigen
Module Module1Sub 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
Vllt. kennt sich ja jemand damit aus?!
[COLOR="Red"]//Update[/COLOR]
Habe noch etwas gefunden... evtl. eine neuere Version?!
Source:
ZitatAlles anzeigen
Module Module1Sub 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:
http://www.file-upload.net/download-24683…er.exe.exe.html
Virustest:
http://www.virustotal.com/de/analisis/88…321d-1272309287
mfg.
[COLOR="Red"]Clair[/COLOR]fontaine[/COLOR][/SIZE][/FONT]