Hola, resulta que quiero hacer un Cheat para poder jugar mejor si ser casi el mejor :P matando personas (en el juego si :P)
dejo claro que mi experiencia en Visual Basic es el minimo.
lo que he echo es este.
(http://img255.imageshack.us/img255/5884/10lm2.jpg) (http://imageshack.us)
lo cual en el codigo escrito es este
CitarPrivate Sub Command1_Click()
If Not LCase(Text1.Text) = "administrador" Then
MsgBox "Contraseña Incorrecta", vbCritical, " No se pudo abrir "
Else
End If
end Sub
eso es para que cada vez que yo quiera entrar, me pida la contraseña.
despes esto
(http://img441.imageshack.us/img441/4215/11xp7.jpg) (http://imageshack.us)
eso le puse para que cada vez qie ingrese mal la contraseña mande ese error :P b
bueno, aqui va mi peticion
es que cada vez que quiera ingresar, le pida la contraseña ya dada en este caso es "administrador" ahora lo que quiero es que cada vez que ponga la contraseña mal, se cierre el programa ("el macroao")
y
bueno
que cuando ponga la contraseña bien entre al programa, lo cual se podra modificar....
pero...
resulta que si pongo la mal, igual entra al programa. al ponerle form2.show
que puedo hacer ?
es entendible lo que acabo de pedir gracias :P
Private Sub Command1_Click()
If Not LCase(Text1.Text) = "administrador" Then
MsgBox "Contraseña Incorrecta", vbCritical, " No se pudo abrir "
End
Else
Form2.show
End If
end Sub
salu2!
Muchas Gracias
yo pensaba que era unload me algo asi :P
ahora me e creado el siguiente Form2.
el cual es el que cuando acepta la contraseña entra al form2.show obvio :P
es el siguiente
(http://img236.imageshack.us/img236/7339/12gi9.jpg) (http://imageshack.us)
ahora me gustaria saber.. como hago para que la configuracion se guarde en un txt. apretando en el boton Guardar un grabado automaticamente en un txt
en esta imagen.
como ven el diseño, solo esta el diseño, y no contiene ningun codigo.
me pudrian ayudar a formar esta pequeña aplicacion porfavor
la imagen de abajo es del menu configuracion del form3.show como ven, es solo el diseño
(http://img252.imageshack.us/img252/5771/13dk1.jpg) (http://imageshack.us)
bueno muchas gracias
acepto cualquier sugerencia :D
Lo que podes hacer es
A_Guardar = dato1 & vbCrLf & dato2 & vbCrLf & dato3
Open App.Path & "\Configuracion.ini" For Output As #1 ' Se abre el archivo
Print #1, A_Guardar ' se escribe...
Close #1 ' y se cierra
despues para obtener la configuracion seria..
Open App.Path & "\Configuracion.ini" For Binary As #2
Extraido = Space(LOF(2))
Get #2, , Extraido
Close #2
Datos = Split(Extraido, vbCrLf)
y eso te devuelve los datos separados osea Datos(0) es el dato1 anteriormente guardado.. etc... etc..
para comprobar si el checkbox esta marcado o desmarcado seria..
If Check1.Value = 0 Then
MsgBox ("Desmarcado")
Else
MsgBox ("Marcado")
End If
salu2! espero te sirva..
PD: no es MAUSE es MOUSE :P
Cita de: demoniox12 en 18 Diciembre 2007, 18:39 PM
PD: no es MAUSE es MOUSE :P
jajajaja vale mi ortografia es orrenda :P
bueno entonces. el codigo ese, lo guardo dentro del form?
o por otro lado hacerlo que no los guarde, si no , o configurarlo desde aca mismo, osea configurandolo, con la tecla queva a usar
Cita de: Paipote en 18 Diciembre 2007, 19:41 PM
o por otro lado hacerlo que no los guarde, si no , o configurarlo desde aca mismo, osea configurandolo, con la tecla queva a usar
Yo te di la base, vos adaptalo a tus necesidades, y eso que cite no entiendo lo que keres decir :P
salu2!
lo que sitaste quiere decir
configurarlo desde el mismo visual basic dejarlo listo en funcionamiento. sin que lo guarde en un texto. si no que ya este listo
http://www.hotshare.net/file/24115-443907951f.html
mira echale un vistaso a ese
es algo parecido
solamente que es detectable, por que es antiguo. por lo cual yo quiero hacer uno nuevo
Siempre, pero siempre usa UNLOAD form, porque el End termina el proseso y no lo descarga de la memoria, y despues si estas usando una base de datos o algo asi, te va a tirar error porqeu ya esta en uso, y el programa cada ves que lo inicies va a estar colgado... asi que usa siempre si o si Unload...
saludos!
ya que explicando soy un poco enredado :P
(http://img517.imageshack.us/img517/4809/42615920mw9.jpg) (http://imageshack.us)
bueno como vez en la imagen de arriba esta el checkbox junto con el msgbox. diciendo que esta marco
(http://img517.imageshack.us/img517/3756/22454025jg9.jpg) (http://imageshack.us)
y en esta imagen dice que esta desmarcado
bueno lo que quiero yo es que...
cuando esté marcado, tenga la opcion del mouse de usar el boton derecho del mouse pero con la opcion de U
me entiendes??
bueno ese eso
-----------------------------------
o alomejor le viene un optionbutton :P
bueno muchas gracias
Cita de: Paipote en 18 Diciembre 2007, 23:40 PM
bueno lo que quiero yo es que...
cuando esté marcado, tenga la opcion del mouse de usar el boton derecho del mouse pero con la opcion de U
me entiendes??
bueno ese eso
no xD no te entiendo xD.. o soy lerdo o vos te explicas mal :P
que opcion del mouse?? y que opcion de U???
Salu2!
Cita de: demoniox12 en 19 Diciembre 2007, 00:51 AM
no xD no te entiendo xD.. o soy lerdo o vos te explicas mal :P
alomejor no nos entendemos :
mira no se si te descargaste esa Macro que deje ahi en el link.
esto tiene la funcion de que cada vez que apretas el boton derecho del mouse aparece determinadamente la LETRA U de usar y lo que quiero yo es hacer lo mismo pero determinando que el checkbox este activado o no activado
ahora si?
bueno gracias
ahora si te entiendo :P pero se me complico :P aver si alguien sabe como detectar cuando pulsan el boton derecho del mouse en cualkier otra aplicacion... y despues de que detecte envia la letra u con el comando sendkeys :)
salu2!
demas que si alguien sabe
la comunidad es muy grande !!
vamos vamos :D
Tienes que hookear la api del ratón o usar la api de mousevents, es algo avanzado para un usuario que empieza en VB.
es por eso que estoy aqui, por que no se mucho de visual basic.
estos codigos que e puesto
me los e basado en los codigos del juego que quiero jugar para tener mas habilidad
y por lo tanto nesecito que me ayuden.
buena onda a todos cabros
gracias
toma aca lo encontre..
Recuerda poner la declaracion arriba...
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Private Sub Timer1_Timer()
If GetAsyncKeyState(2) = -32767 Then 'comprueba si hacen click derecho
SendKeys "{u}" 'si lo hacen manda la letra u
End If
End Sub
Recuerda crear 1 timer con intervalo 1 y que este en true al momento de que kieras ver si pulsan el boton derecho del mouse :)
salu2!!
Muy bien compañero funciona!
ahora es el msgbox
resulta que en el checkbox
tiene codigo este
Private Sub Check1_Click()
If Check1.Value = 0 Then
MsgBox "Desmarcado"
Else
MsgBox "Marcado"
End If
End Sub
y cada vez que marco, en el titulo del msgbox me dice protecto uno
MsgBox "Desmarcado" & _
"a Sido desactivado!!"
pero el caso sigue
me sigue diciendo en el titulo proyecto1 (esta linea esta mal)
y en el form a sido desmarcada (esta es la que esta bueena)
Con iconito...
MsgBox "a Sido desactivado!!", vbInformation, "Desmarcado"
Sin iconito..
MsgBox "a Sido desactivado!!", , "Desmarcado"
salu2!
jejej va quedando muy bonito.
bueno ahora me gustaria como podria ocultar la contraseña con cualquier sigo
ejemplo
Administrador
************ (ocultando la contraseña)
y que el codigo determine si esta escrito con mayuscula y miniscula
bueno muchas gracias
CitarCitarbueno ahora me gustaria como podria ocultar la contraseña con cualquier sigo
Cosas tan sencillas como estas, las podes encontrar en tutos básicos. ¿porque no lo intentas? y veras que aprenderas un poco mas, que limitandote a preguntar y esperar respuestas... :huh:
Lo que queres lo podes hacer asi:
Text1.PasswordChar = "el signo que quieras"http://mat21.etsii.upm.es/ayudainf/aprendainf/VisualBasic6/vbasic60.pdf (http://mat21.etsii.upm.es/ayudainf/aprendainf/VisualBasic6/vbasic60.pdf)
Es solo un consejo, creme cuando te digo que asi es que podes aprender. De cualquier forma, saludos...
Pues si... Si fuese lo que estás haciendo todo código, pues mira, preguntar no viene mal. Pero la última pregunta, de poner oculta la contraseña, puedes hacerlo incluso desde las propiedades del mismo control... (Cosa que con un poquito de búsqueda, sale).
bueno igual gracias.
voy a intentar leerme un tutorial completo basico.
y ahi les dire como va
bueno adioz
bueno... como buen jugador de AO creo q lo q haces esta muy mal...
segundo tengo un servidor de AO y si te veo te comes un super banneo
tecero, si no tenes los conocimientos minimos no podes pedir q te hagan todo, admeas muchos no saben ni de q se trata el juego y vos pones, quiero una macro para potear como si todos supieran q es potear...
cuarto, ya te aconsejo no usar macros muy veloces, (tomarte 20 potas en centesimas de seg) xq te descubren en 2 min el cheat y chau pj
seurte
chau
Hola yo lo que queria era algo parecido , queria hacer un boton que al presionarlo empieze a tocarse infinitamente la letra U y que pase en toda la computadora no solo en el visual basic y luego al tocar otro boton pare de tocarse la letra U si alguien sabe el codigo para realizar dicha accion y es tan amable de pasarmelo se lo agradeceria y ya se que hay tutoriales y eso pero no entiendo nada soy muy principiante y necesito de esta ayuda
Saludos y gracias! :D