Hilfe Gesucht....

DooM · 31. Dezember 2009, 00:31

Guten Morgen MMorpg Core..

Ich möchte gerne für meinen Flyff Server
ernen Restarter mit VB8 machnee aber ich
weiß nicht genau wie ich das jetzte anpacken soll...

kann mir da jmd helfen?

mfg DooM

Yuri · 31. Dezember 2009, 00:47

magst du es als console oder fester ausführen?

DooM · 31. Dezember 2009, 01:30

wenn du mit fester ...
Fenster meinst dan ja ...

mfg DooM

ichbinniemand · 31. Dezember 2009, 09:00

in einen timer muss

Quellcode

Dim a As Boolean = true
Dim b As Boolean = True
Dim c As Boolean = True
For Each p As Process In Process.GetProcess
If p.ToString = "System.Diagnostics.Process (Login)" Then a = False
If p.ToString = "System.Diagnostics.Process (Char)" Then b = False
If p.ToString = "System.Diagnostics.Process (World)" Then c = False
Next
If a = true Then Shell("Pfad zu login")
If b = True Then Shell("Pfad zu char")
If c = True Then Shell("Pfad Zu World")

Alles anzeigen

und in button Muss

Timer1.Intervall = 10
Timer1.Start

DooM · 31. Dezember 2009, 20:09

Danke ic bin niemand Aber
das soll ein offi Files Restarter werden...
und offi Files haben 7 server die man an mahcne muss

Luoo · 31. Dezember 2009, 20:13

Müsste es doch so gehen weiß es net so genau

Quellcode

Dim a As Boolean = true
Dim b As Boolean = True
Dim c As Boolean = True
Dim d As Boolean = True
Dim e As Boolean = True
Dim f As Boolean = True
Dim g As Boolean = True
For Each p As Process In Process.GetProcess
If p.ToString = "System.Diagnostics.Process (Account)" Then a = False
If p.ToString = "System.Diagnostics.Process (Database)" Then b = False
If p.ToString = "System.Diagnostics.Process (Certiefier)" Then c = False
If p.ToString = "System.Diagnostics.Process (Core)" Then d = False
If p.ToString = "System.Diagnostics.Process (Cache)" Then e = False
If p.ToString = "System.Diagnostics.Process (Login)" Then f = False
If p.ToString = "System.Diagnostics.Process (World)" Then g = False
Next
If a = true Then Shell("Pfad zu Account")
If b = True Then Shell("Pfad zu Database")
If c = True Then Shell("Pfad Zu Certifier")
If d = True Then Shell("Pfad Zu Core")
If e = True Then Shell("Pfad Zu Cache")
If f = True Then Shell("Pfad Zu Login")
If g = True Then Shell("Pfad Zu World")

Alles anzeigen

xSayHellox · 31. Dezember 2009, 20:14

[FONT="Tahoma"][COLOR="DarkOrange"][SIZE="2"]

DooM;67353 schrieb:

Danke ic bin niemand Aber
das soll ein offi Files Restarter werden...
und offi Files haben 7 server die man an mahcne muss

Eventuell kopierst du einfach 1 von den 3 und modifizierst es nach deinen Wünschen <.<?[/SIZE][/COLOR][/FONT]

Luoo · 31. Dezember 2009, 20:16

Also wie ich es gemacht hab ;)

Quellcode

Quellcode

Teilen