Mensajes

holas a todos de nuevo quiero que me ayuden hacer un programa
pero productivo para mi ya es hora que me ponga a trabajar
he abierto una pequeña tienda .......ojalas qme vaya bien bueno :
algo asi que haga el programa crear un textbox poner digamos 1L = 1 LIBRO
Y al darle aceptar que me de una info y toda lo guarde para asi contabilizar
las ventas del dia

vendo un libro que me salga cantidad el precio de venta . venta , ganancia . precio total
y asi sucesivamente puede 2L o 3L......

cantidad 1
precio x mayor 3000
precio al cliente 3500
ganancia 500
suma total 3500


porfavor ayudenme a empezar a crearlo lo quiero lo mas simple que pueda
hacer si es posible sin base de datos bueno sies que sepuede
sino con una base datos simple ya sea en vb.net o vb 6.0

quiero saber cual seria la funcion o code para que la simulacion de botones
se active en el block de notas

osea cuando le doy empezar al form en el block quiero que salga las
las letras que quiero yo 
pero en ves que salga letras me sale numeros ascii
bueno sino me explique bien dejo un video aveces
vale una imagen para poder comprender mejor

[youtube=640,360] http://www.youtube.com/watch?v=12PR52wF-Fw[/youtube]

aca dejo el ejemplo del proyecto : cree 2 comandos, 2 text , 2 timer

Código (vb) [Seleccionar] Expandir

Option Explicit
Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer

Private Sub Form_Load()
With Timer1
.Enabled = False
.Interval = 2000
End With
With Timer2
.Enabled = False
.Interval = 2000
End With
End Sub
Private Sub a()

    If Timer1.Enabled = False Then
        Timer1.Interval = CInt(Val(Text1.Text))
        Timer1.Enabled = True
        Command1.Caption = "Parar"
    Else
       Timer1.Enabled = False
       Command1.Caption = "Empezar"
    End If
End Sub

Private Sub s()
    If Timer2.Enabled = False Then
        Timer2.Interval = CInt(Val(Text2.Text))
        Timer2.Enabled = True
        Command2.Caption = "Parar"
    Else
       Timer2.Enabled = False
       Command2.Caption = "Empezar"
    End If
End Sub
Private Sub Command1_Click()
Call a
End Sub
Private Sub Command2_Click()
Call s
End Sub

Private Sub Timer1_Timer()
SendKeys (vbKeya)
End Sub
Private Sub Timer2_Timer()
SendKeys (vbKeys)
End SubE

Ojalas me `puedan ayudar por hay quise meter Chr$(KeyCode) pero
no se mucho de vb apenas toy empensando

Bueno toy tratando de hacer funcionar este fomulario pero me falta algo para
que funcione en teoria este deberia ser para funcione un auto potion
de un juego online pero a la ahora de activarlo no funciona quisas me
falte complementar algo mas o quisas alguien conosca otra forma de
hacer un autopotion vb o otro lenguaje que me puede orientar

Duda para autopotion se saca :andress, pointer o value.... ?
y donde se pondria como se seria su funcion

Código (vb) [Seleccionar] Expandir

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Private Sub Form_Load()
With TVida
.Enabled = False
.Interval = 200
End With
With TMana
.Enabled = False
.Interval = 200
End With
End Sub
Private Sub HP()
    If TVida.Enabled = False Then
        TVida.Interval = CInt(Val(Text1.Text))
        TVida.Enabled = True
        Command1.Caption = "Parar"
    Else
       TVida.Enabled = False
       Command1.Caption = "Empezar"
    End If
End Sub

Private Sub MP()
    If TMana.Enabled = False Then
        TMana.Interval = CInt(Val(Text2.Text))
        TMana.Enabled = True
        Command2.Caption = "Parar"
    Else
       TMana.Enabled = False
       Command2.Caption = "Empezar"
    End If
End Sub
Private Sub Command1_Click()
Call HP
End Sub
Private Sub Command2_Click()
Call MP
End Sub
Private Sub TVida_Timer()
SendKeys (vbKeyF7)
End Sub
Private Sub TMana_Timer()
SendKeys (vbKeyF8)
End Sub
Private Function GetKeyState(Key As Integer) As Boolean
    GetKeyState = CBool(GetAsyncKeyState(Key))
End Function
Private Sub HotKeys_Timer()
If GetKeyState(vbKey1) = True Then
Call Command1_Click
ElseIf GetKeyState(vbKey2) = True Then
Call Command2_Click
End If
End Sub

gracias por responder si me ddedique tmb a buscar por el famoso
gestor GOOGLE pero encontre pero no funcionaron salian siempre de
color rojo siempre abia algo que le fataba error pero mira este es ejemplo
que tiene mi proyecto


Private Sub Command1_Click()
Dim X As Long
Dim X As Long
Call ReadALong("usca", &H7001ABC, X)
X1 = X + &H117008
Call WriteALong("usca", X1, 100000)
End Sub

Private Sub Command2_Click()
Dim X As Long
Dim X As Long
Call ReadALong("usca", &H7001ABC, X)
X1 = X + &H117008
Call WriteALong("usca", X1, 100)
End Sub

Como se seria que cada command se activara con una tecla digamos A ,1 ,+
o con una combinacion de teclas digamos ALT+5 , CTROL+F3

PD creo seria 1 timer o 2 pero como seria la funcion aver por favor me das una mano

Bueno hola a toda la comunidad quiero ayuden
tengo un projecto pero como seria el comando o funcion
de hotkey osea quiero se active aprentando F1... F12
o algun tecla o numeral ojalas me `pueden ayudar soy nuevo
en esto y resien toy poco poco aprendiendo en vb 6.0

PD si algun error o no es la area o falta mas info
por favor ayudenme donde seria ,que le falta

holas bueno no se en que parte postear como este libre supongo
que sea aca

bueno alguien puede ayudar hacer un trianer con visual studio 2008
o ai algun tutorial ya o alguien me puede hacer uno si no
fuera mucha molestia

Wuenas  comunidad quisiera que me ayuden  en vb
para acultar programas y juegos y trainer

quiero una source para ocultar aplicaiones y proceesos

wueno ojalas que me puedan ayudar
tengo un video de un trianer como ocultan  eso si es que
se puede postear ese video es como ejemplo quisas
nose pueda por renglas del foro

[Mui wuenas a todos tengo un pequeno poblemacon mi trianer q ise no le puede poner imagenes ni iconos son en algun formatoen especial Alquien me puede porfavor imagenes e iconospara descargar algo variadito pe un pack sise pudiera xdde hack triainer speed animes de antemano muxas gracias]

Mui wuenas a todos  tengo un pequeno poblema
con mi trianer q ise no le puede poner
imagenes ni iconos son en algun formato
en especial   

Alquien me puede porfavor  imagenes e iconos
para descargar  algo variadito pe un pack si
se pudiera xd

de hack triainer speed animes 
de antemano muxas gracias

Umm bueno ai alguna otra forma se sacar el andress  o pointer
estatico  q no se por debuger aver si me pordrian orientar
en algo toy provando con dos juegos el mu heroes mu sanluis
y gunbound     

Holas  soy pollito  tengo un problema q pasa
cuando le doy  "Find out what writes to this address"
se cierra el juego no es el juego q pusistes es otro
como podria en caso como sacar las andress pointer offzet....