• Unfortunately, we have experienced significant hard drive damage that requires urgent maintenance and rebuilding. The forum will be a state of read only until we install our new drives and rebuild all the configurations needed. Please follow our Facebook page for updates, we will be back up shortly! (The forum could go offline at any given time due to the nature of the failed drives whilst awaiting the upgrades.) When you see an Incapsula error, you know we are in the process of migration.

Zone Agent562 Disconnected with server

Status
Not open for further replies.
1

12hao

Newbie Spellweaver
10 Happy Years
Joined
Mar 26, 2010
Messages
5
Reaction score
0
server - Zone Agent562 Disconnected with server - RaGEZONE Forums
Who can help me solve this problem?
disconnected - Zone Agent562 Disconnected with server - RaGEZONE Forums
 

Attachments

You must be registered for see attachments list
The Best DDoS Protected Servers
X

Xenia

Newbie Spellweaver
Joined
May 5, 2013
Messages
5
Reaction score
0
error.JPG - Zone Agent562 Disconnected with server - RaGEZONE Forums
stucking at world selection and after that facing this error :?:... any solution ??
 

Attachments

You must be registered for see attachments list
Last edited:
1

12hao

Newbie Spellweaver
10 Happy Years
Joined
Mar 26, 2010
Messages
5
Reaction score
0
Private Sub Form_Load()
serverid = m1.GetINISetting("STARTUP", "SERVERID" & i, App.Path & "/svrinfo.ini")
serverport = m1.GetINISetting("STARTUP", "PORT" & i, App.Path & "/svrinfo.ini")
serverip = m1.GetINISetting("STARTUP", "IP" & i, App.Path & "/svrinfo.ini")
agentid = m1.GetINISetting("STARTUP", "AGENTID" & i, App.Path & "/svrinfo.ini")
lblserverid = serverid
lblagentid = agentid
lblzoneport = serverport
lsip = m1.GetINISetting("LOGINSERVER", "IP", App.Path & "/svrinfo.ini")
lsport = m1.GetINISetting("LOGINSERVER", "PORT", App.Path & "/svrinfo.ini")
zonecount = m1.GetINISetting("ZONESERVER", "COUNT", App.Path & "/svrinfo.ini")
ReDim zonelist(zonecount, 3) As String

For i = 0 To zonecount - 1
tempid = m1.GetINISetting("ZONESERVER", "ID" & i, App.Path & "/svrinfo.ini")
tempip = m1.GetINISetting("ZONESERVER", "IP" & i, App.Path & "/svrinfo.ini")
tempport = m1.GetINISetting("ZONESERVER", "PORT" & i, App.Path & "/svrinfo.ini")
If Not tempid = 0 Then Load sock_zone(tempid)
sock_zone(tempid).Protocol = sckTCPProtocol
sock_zone(tempid).RemoteHost = tempip
sock_zone(tempid).RemotePort = tempport
sock_zone(tempid).Connect
zonelist(i, 0) = tempid
zonelist(i, 1) = tempip
zonelist(i, 2) = tempport
combozoneiostatus.AddItem (tempip & ":" & tempport & ":" & tempid)
DoEvents <-- Please remove this line
Next i
 
X

Xenia

Newbie Spellweaver
Joined
May 5, 2013
Messages
5
Reaction score
0
12hao said:
Private Sub Form_Load()
serverid = m1.GetINISetting("STARTUP", "SERVERID" & i, App.Path & "/svrinfo.ini")
serverport = m1.GetINISetting("STARTUP", "PORT" & i, App.Path & "/svrinfo.ini")
serverip = m1.GetINISetting("STARTUP", "IP" & i, App.Path & "/svrinfo.ini")
agentid = m1.GetINISetting("STARTUP", "AGENTID" & i, App.Path & "/svrinfo.ini")
lblserverid = serverid
lblagentid = agentid
lblzoneport = serverport
lsip = m1.GetINISetting("LOGINSERVER", "IP", App.Path & "/svrinfo.ini")
lsport = m1.GetINISetting("LOGINSERVER", "PORT", App.Path & "/svrinfo.ini")
zonecount = m1.GetINISetting("ZONESERVER", "COUNT", App.Path & "/svrinfo.ini")
ReDim zonelist(zonecount, 3) As String

For i = 0 To zonecount - 1
tempid = m1.GetINISetting("ZONESERVER", "ID" & i, App.Path & "/svrinfo.ini")
tempip = m1.GetINISetting("ZONESERVER", "IP" & i, App.Path & "/svrinfo.ini")
tempport = m1.GetINISetting("ZONESERVER", "PORT" & i, App.Path & "/svrinfo.ini")
If Not tempid = 0 Then Load sock_zone(tempid)
sock_zone(tempid).Protocol = sckTCPProtocol
sock_zone(tempid).RemoteHost = tempip
sock_zone(tempid).RemotePort = tempport
sock_zone(tempid).Connect
zonelist(i, 0) = tempid
zonelist(i, 1) = tempip
zonelist(i, 2) = tempport
combozoneiostatus.AddItem (tempip & ":" & tempport & ":" & tempid)
DoEvents <-- Please remove this line
Next i
Click to expand...

yea i read this somewhere on forum b4 and already tried it but same error occurin...:(:
 
X

Xenia

Newbie Spellweaver
Joined
May 5, 2013
Messages
5
Reaction score
0
12hao said:
Private Sub Form_Load()
serverid = m1.GetINISetting("STARTUP", "SERVERID" & i, App.Path & "/svrinfo.ini")
serverport = m1.GetINISetting("STARTUP", "PORT" & i, App.Path & "/svrinfo.ini")
serverip = m1.GetINISetting("STARTUP", "IP" & i, App.Path & "/svrinfo.ini")
agentid = m1.GetINISetting("STARTUP", "AGENTID" & i, App.Path & "/svrinfo.ini")
lblserverid = serverid
lblagentid = agentid
lblzoneport = serverport
lsip = m1.GetINISetting("LOGINSERVER", "IP", App.Path & "/svrinfo.ini")
lsport = m1.GetINISetting("LOGINSERVER", "PORT", App.Path & "/svrinfo.ini")
zonecount = m1.GetINISetting("ZONESERVER", "COUNT", App.Path & "/svrinfo.ini")
ReDim zonelist(zonecount, 3) As String

For i = 0 To zonecount - 1
tempid = m1.GetINISetting("ZONESERVER", "ID" & i, App.Path & "/svrinfo.ini")
tempip = m1.GetINISetting("ZONESERVER", "IP" & i, App.Path & "/svrinfo.ini")
tempport = m1.GetINISetting("ZONESERVER", "PORT" & i, App.Path & "/svrinfo.ini")
If Not tempid = 0 Then Load sock_zone(tempid)
sock_zone(tempid).Protocol = sckTCPProtocol
sock_zone(tempid).RemoteHost = tempip
sock_zone(tempid).RemotePort = tempport
sock_zone(tempid).Connect
zonelist(i, 0) = tempid
zonelist(i, 1) = tempip
zonelist(i, 2) = tempport
combozoneiostatus.AddItem (tempip & ":" & tempport & ":" & tempid)
DoEvents <-- Please remove this line
Next i
Click to expand...

yea i read this somewhere on forum b4 and already tried it but same error occurrin...:(:
 
Status
Not open for further replies.

About Us

RaGEZONE® is a website dedicated to the development of massively multiplayer online role-playing games (MMORPGs).

Online statistics

Members online
157
Guests online
11,882
Total visitors
12,039
Totals may include hidden visitors.

Forum statistics

Threads
429,198
Messages
4,590,912
Members
281,305
Latest member
ismodev
Most visitors online was 12720 , on 2 May 2024

RaGEZONE Sponsor

    HyperFilter
Back
Top