Lo que vamos a hacer es evitar cargar la IP y el puerto desde una web externa. Lo que vamos a hacer es cargarla desde los codigos del cliente.
El procedimiento es sumamente sensillo y corto.
Empezamos, buscamos:
- Public Function CurServerIp() As String
- On Error Resume Next
- CurServerIp = UnEncryptStr(frmConnect.Text1.Text, "AnticheatWAO") 'esta en el mod WAO abajo del todo
- End Function
Y lo eliminamos.
Buscamos:
- Public Function CurServerPort() As Integer
- On Error Resume Next
- CurServerPort = frmConnect.Text2.Text
- End Function
Y lo eliminamos.
Buscamos:
y lo reemplazamos todas las veces que aparesca por
Buscamos:
y lo reemplazamos todas las veces que aparesca por
En declaraciones ponemos:
-
- Public Const ServerIp as string = "127.0.0.1"
- Public Const ServerPort as Integer = 7500
Y con eso Ya pueden logear al servidor sin nada en la web Wink
Recomendacion:
Nunca Usen Usarwrench en 0 porque les va a dar 1kk de errores debido a que se suprimio el winsock y se puso un socket re colgado que no esta bien puesto, pero como el argumento de compilacion pasa por otro lado no molesta, siempre y cuando no pongan usarrwench en 0.
Codigo originalmente echo por Franeg.