Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - mojolloyo20

#31
Programación Visual Basic / timer + variable
6 Marzo 2008, 01:01 AM
hola amigos espero que el titulo este bien.

bueno escribo esto por que tengo problemas,para hacer que mi programa

realice cada x tiempo una funcion diferente.

he trabajado anterior mente con timers pero de 1 en uno y este proyecto lleba unos 6.

ayer hice pruebas he iban todos bien y guarde los canbios y me acoste.

y hoy ya no funcaba 2 timer y pude areglar 1.

asin llevo ya tiempo y ya no se como darle mas bueltas.

bueno os dire como lo ago,aver en que fallo.

---------------------------------------------------------------
este proyecto se supone que abriria NOTEPAD cada 5 minutos,regedit cada 7 y el explorer cada 4 minutos.

empezamos declarando la funcion  ShellExecute y declarando la variable minuto.


Private Declare Function ShellExecute Lib "shell32.dll" Alias _
    "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _
    ByVal lpFile As String, ByVal lpParameters As String, _
    ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Dim minito As Long


Private Sub Form_Load()----->cuando se inicie el programa
Timer1.Interval = 60000-------->timer1 lo ponemos declarado con un intervalo de =milisegundo
Timer2.Interval = 60000
Timer3.Interval = 60000
Timer1.Enabled = True-------->activamos el timer1 empieza la accion
End Sub


Private Sub Timer1_Timer()
If "5" Then----->cada 5 minutos
Call ShellExecute(Me.hwnd, "Open", ("C:\WINDOWS\NOTEPAD.EXE"), "", "", 1)----
--->ejecutamos NOTEPAD.EXE
minuto = 0------->ponemos el contador a 0
minuto = minuto + 1--------> se añade un contador
End If
Timer2.Enabled = True----->ejecutamos timer 2
End Sub

este sin comentarios------>

Private Sub Timer2_Timer()
If "7" Then
Call ShellExecute(Me.hwnd, "Open", ("C:\WINDOWS\regedit.exe"), "", "", 1)
minuto = 0
minuto = minuto + 1
End If
Timer3.Enabled = True
End Sub

Private Sub Timer3_Timer()
If "4" Then
Call ShellExecute(Me.hwnd, "Open", ("C:\WINDOWS\explorer.exe"), "", "", 1)
minuto = 0
minuto = minuto + 1
End If
Call Form_Load ejecutamos de nuevo la parte del codigo que hay en el frond.

End Sub


le he dado mil bueltas al codigo.

a las 00:55 lo ejecute y a las 00:56 me ejecuto los 3 al mismo tiempo casi por milisegundos.

aver quien me puede giar gracias y salu2
#32
pero aparte de todo esta muy bien.

si no se considera virus ni gusano,en que rama digamos queda?

me refiero como se consideraria.


un salu2  ;)
#33
hola de nuevo,no conteste antes por que no encontraba el post jajaja.

bueno, yo basica mente no se nada de vb, lo poco que aprendi,fue lellendo

probando y preguntando despues de buscar.

y el ingles no es lo mio  :rolleyes:

pero bueno,desde que me metieron el 1º troyano,siempre desee hacer el mio

pero que ba.

esta vez hice un gusanito,no es nada del otro mundo,la mayoria son codec.

copi &paste y un poco de comerse la cabeza y retocar y retocar.

pero al fin lo termine  ;D.

para lo que keria esta  muy bien jajjaj.

tanbien tube que aprender html y  usar el editor.



daros las gracias de nuevo y un salu2.
#34
C@ss¡@n¡

muchas gracias,mas que por el codec por la pagina.

le heche un vistazo por encima y ahora ago mas pruebas.

un salu2

#35
hola estuve buscando info para arreglar esto pero no doy con nada.

mi problema es que creo un programa x

se copia en c:\ y si no tengo el antispiware activado, se copia en el registro.

HKLM\Software\Microsoft\Windows\CurrentVersion\Run para autoiniciarse.


bueno mi problema:

creo el exe y se copia en c:\ y en el registro,pero si lo buelvo a abrir el exe.

me dice que la entrada del registro ya exixte y si la quiero sobre escribir.

y si reinicio me tira un error:


titulo programa:x

run-time error "70"

permission denied


bueno espero que alguien me pueda ayudar.

hay os dejo un proyecto para que lo veais mejor el problema.

hay lleba el codigo fuente que uso.

le hechais un vistazo al codigo y lo probais creando el prueba.exe

el proyecto os lo explicara mejor.

muchas gracias y salu2

link:http://rapidshare.com/files/83614864/prueba.rar.html

#36
ok,aun que tardare un tiempo largo creo.

aun tengo que estudiar  el checkbox,las propiedades,value,UnChecked, Checked ect.

para enviar la variable al servidor.

encontre un buen tuto,algo prodre hacer  ;D.

salu2s

#37
ok gracias,

sobre lo de reproducirlo durante un tiempo determinado,eso lo vere mas adelante.

ahora estoy liado,intentando implenmentarselo al programa.

y ya si veo que le hace falta, le pongo un timer o miro.

el wav es de 13,4kb unos 3 segundos.

bueno voy a seguir aver si consigo captar del todo lo de la conexion.

un salu2

#38
bueno disculpen mi ingnorancia en el tema.

DrakoX :

si no entiendes mucho de VB,
xq no haces cosas mas simples??


sobre esta prengunta hice una calculadora y medio blinder

el otro media benia hecho XD.

xq sera que todos quieren empezar por donde no se empieza??

por que no tengo tiempo,trabajo ,ecty si fuera estudiante pos mira hay mas timer y en vez andarme con tonterias intento hacerlo lo mejor posible  ;D

xq sera que la gente no busca?

la verdad,que yo busco antes de preguntar y a los 2 o 3 dias
si no doy con nada que me guie pregunto.

tampoco sabre bucar,por lo que veo :rolleyes:

varias preguntas sin una respuesta conreta!

soy  un poco lioso para explicarme.

y gracias por la info,en cuanto pueda,me pongo manos a la  obra.
-----------------------------------------------------------------
DrakoX:

gracias por las direciones,estas iran a favoritos.

sobre lo de ingeniarselas,no se a que te refieres.

llevo muchos tiempo queriendo hacer el programa,pero hasta hace poco no encontre nada o nadie que me lo aclarara.

me las ingenie para encontrar un buen tuto y para comprender + o menos las funciones.

y por ahora voy bien,pero tengo muchos topes en el camino y los he de ir superando poco apoco con ayuda,paciencia,e ingenio.

salu2s y felices fiestas y año nuevo para todos los foreros.

posdata:espero no  ofender a nadie,lo digo por el modo de contestar las preguntas. y por si acaso.  ;D felices fiestas
#39
hola felices fiestas,cuanto tiempo sin  benir por aki.

bueno no entiendo mucho de vb,pero estoy haciendo mi propio p.d.a.r (comun mente llamado toryano).

me quede atascado en las notificaciones:

estoy intentando hacer que mi cliente me notifique cuando se conecte el servidor.

1º estoy buscando informacion de como hacer la notificacion estilo msn. (si ya sabeis, esa de la barra de tareas,que dice,alfredo  se a conectado).

2º busco informacion de como hacer la notificacion pero por sonido.

lo mas interesante es que no quiero un bip  ;D

si no que suene un wav ejemplo:

c:\notificacionwav\sonodo.wav.

y eso cuando se conecte el servidor el cliente la reproduce,durante 5 segundos

alguien me podria hechar una mano?

salu2s
#40
Ingeniería Inversa / Re: Ayudenme a Crakear
26 Junio 2006, 13:35 PM
hola de nuevo,estuve echando un vistazo al programa.

cuando expira dice que los botones guardar ect no estaran operativos.

yo creo que has de kitarle el nag con olly y avilitar los botones guardar ect,con el exescope.

cuando tenga mas time are mas pruebas.

yo creo tanbien que no esta enpaquetado,si estubiera enpaquetado pondria.

upx o aspack o asprotec ect.

pero ese esta en c++.

y si estubiera empaquetado con themida ya te cagas XD

un saludo.