Bueno como verán intente de implementar el sistema de cuenta de rockon, un sistema simple(nada del otro mundo), bueno mi problemita es que me tira el argumento no es opcional, GetVar en
If GetVar(App.Path & "\INIT\Cuentas.dat", "A") = 1 Then
Check1.value = 1
NombreTXT.Text = GetVar(App.Path & "\INIT\Cuentas.dat", "Nick", "Name")
PasswordTxt.Text = GetVar(App.Path & "\INIT\Cuentas.dat", "Passwd", "Pass")
lblcuenta.Visible = True
Else
Check1.value = 0
End If

no me equivoque de lugar, esta en el sub form_load de Connect


Link: recordar_personaje_t6RJ.html
PD: SERVER MOD SENLUC
PD2: Despues de 4 horas nadie postio nada ;( seguro es una pelotudes

Hola, naHOTH.

Mira fíjate si remplazas esto:

If GetVar(App.Path & "\INIT\Cuentas.dat", "A") = 1 Then

Por:

If val(GetVar(App.Path & "\INIT\Cuentas.dat", "A") = 1 Then

Y fijate que cambie en la linea y cambiale a los otros.

Saludos!

PD= Pienzo que ese es el error

Lo copiaste mal

If GetVar(App.Path & "\INIT\Cuentas.dat","Check", "A") = 1 Then
Check1.value = 1
NombreTXT.Text = GetVar(App.Path & "\INIT\Cuentas.dat", "Nick", "Name")
PasswordTXT.Text = GetVar(App.Path & "\INIT\Cuentas.dat", "Passwd", "Pass")
lblCuenta.Visible = True
Else
Check1.value = 0
End If

Ya se lo habia mandado por mp. Pero no respondio. Igualmente esta solucionado es eso.