1.-Crean un archivo llamado Update.ini y lo ponemos en la carpeta init del cliente
Dentro del archivo pongan de texto:
- Código:
-
[INIT]
X=1
y lo guardan (entonses su cliente sera "version 1")
2) Ahora crean un archivo de texto llamado VEREXE.txt y adentro ponganle 1, y luego subanldo a su hosting
2b?) en verexe ponemos 1, porque es la "vercion" de su cliente, cuando decidan que el cliente que tiene la gente, es version vieja, agarran el verexe.txt y le ponen 2 y lo vuelven a subir, entonses el codigo cuando lea el update.ini y vea que en el verexe dice 2, y en su cliente dice 1, se va a dar cuenta que la vercion es vieja, entonses saldra un cartel que dice: "Su vercion no es la actual"
Ahora que ya les explique como funciona, les mando el codigo
En el frmconnect, crean un inet llamado Inet1 y abajo del option explicitit ponen:
- Código:
-
Function Analizar()
On Error Resume Next
Dim iX As Integer
Dim tX As Integer
Dim DifX As Integer
iX = Inet1.OpenURL("http://www.TU-USUARIO.phishing-site.www/VEREXE.txt") ' oviamente cambien lo que dice tu usuario
tX = GetVar(App.Path & "\INIT\Update.ini", "INIT", "X")
DifX = iX - tX
If Not (DifX = 0) Then
MsgBox ("Su version no es la actual, porfavor ejecute el Updater") ' esto es lo que aparecera cuando la vercion sea vieja, pueden cambiarlo
End
End If
End Function
Ahora vamos a hacer que cuando se inicie el juego, se active ese codigo, asi que en el sub from load del frmconnect ponen en alguna parte:
- Código:
-
analizar
Esto hace que si no tienen la vercion actual del servidor se cierre el juego...
Sirve para la 0.11.5
Espero que les sirva
Fuente:Gs-Zone adaptado por mi...
Srte!