Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If UnloadMode = 0 Then
MsgBox "aca pon el codigo que guarda tus datos"
End If
End Sub

Si solo bajate el gestor de arranque sin el instalador y lo jalas desde el cd

http://www.megaupload.com/?d=9C0UISSB

y seleccionas la opcion usb

Aunque de la otra forma tendrias instalado este gestor de forma oculta pero como gustes de igual manera se puede
Saludos

Si se te hace riesgoso puedes probar con virtual pc instalarle msdos y probar bootear un xp portable desde usb y asi te des cuenta de que el so msdos no sufre ningun daño y booteas desde la usb Saludos

Hola Me gustaria que este tema fuera un pequeño manual por si quieren tener soporte de booteo usb en pcs viejas

Les pongo este manual Escrito por mi Saludos

Aveces es necesario bootear desde la usb pero en pcs viejas no se puede por que la bios no da ese soporte pero hay otra forma
Para los que no saben el hd (disco duro) tiene una sección especial por asi decirlo privada que es la mbr master boot recordset opciones de booteo particiones etc..

Lo que pretendo ilustrarles es como editar esta parte del disco duro para que trate de bootear desde la usb


Primero bajamos esta herramienta http://www.megaupload.com/?d=7SFL8FSS
solo pesa 256kb y es una imagen booteable la queman con el isomaker o con imgburner o con el nero

ya quemada reinician el pc y bootean desde el disco (para los que no saben se meten a la bios y ponen en boot order  bootear primero desde la lectora)
Les aparecera un menu como este

seleccionan la opcion numero 1 y le dan a yes teclean y
luego presionan esc y despues 9 cuando la computadora se reinicie
veran un menu como este

Hasta aqui ya tienen soporte usb pero lo ideal es desaparecer este menu y que solo cuando queramos bootear desde usb se haga presionando una tecla

Bueno para esto solo nos vamos en el menu a setup -->enter
seleccionan bootmanager ------>enter

startmode ------>enter "para cambiarlo a hide"
edit boot countdown este es el tiempo de espera lo ponemos como a 5 segundos
y en select at start ----> ponemos last boot selected

Eso es todo presionamos varias veces esc y en el menu principal ponemos shutdown esto para cerrar y guardar cambio

ya con esto tenemos soporte usb la compu se prendera y parecera normal pero con la diferiencia de que ahora con solo presionar la "TECLA U" o la "TECLA ESC" hasta que veamos el menu en los primeros 5 segundos en que se inicia la pc bootearemos desde la usb o elegiremos desde donde bootear

Eso es todo Saludos

Ojo esto sirve muy bien en computadoras con win xp linux etc.. pero si ya esta alterada la mbr del disco mejor no lo hagan por que pueden perder sus datos

Yo no me hago responsable por fallas que ocasionen en su compu moviendo menus que desconocen si tienen dudas preguntan y con gusto les respondo

Hola C0c0 no tiene virus.

En el full vienen ejemplos de las transformaciones
y en la web del autor hay bastante documentacion
 
http://www.vbto.net/

pero si ni asi funciona  a la mejor es solo con ejemplos sencillos

Saludos Gracias por probar

Hola les dejo este programita que hace maravillas pasa de vb6 a c++ builder a vb.net a c#.net delphi java etc..

No se si vaya bien aqui pero lo pongo en esta area por que es donde se ocuparia y no donde estan los reproductores los programas graficos etc..
Creo aqui va mejor

http://www.megaupload.com/?d=6M41U75P
este es portable

http://rapidshare.com/files/333351599/vbto_1_.converter.2.44.full.incl.crack.n.keygen-tsrh.zip.html
y este es instalable full
instalan copian el keygen a la carpeta donde se instalo ponen el parche y con el generador les crea la clave la ponen y listo
el hw id es el hardware fingerprint que da el programa

Saludos

Se ve muy coqueto tu programa pero solo escribe ? o tambien lee datos ?

tengo una aplicacion llamada vbtoconverter totalmente parcheado y pasa muy bien de un lenguaje a otro si lo necesitas para tu proyecto te lo paso avisame

voy a poner unas fotos de el sistema terminado para que veas el motor que use en mi proyecto y el uso que tiene use un fototransistor para conocer el intervalo
del giro del motor en el que se encuentra

Saludos amigo 

si se reduce mucho el costo yo tambien pense en montarle un pic y que este mandara los pulsos mas lentos y constantes para que la pc los pudiera leer pero el solo hecho de meter el pic ya es un incremento de tiempo trabajo esfuerzo y mas tosco

Saldudos amigo

Hola El tema del que les quiero hablar es para los que usamos el puerto lpt en vb6 y queremos leer datos desde el statusport con la libreria inpout32.dll

El problema con el que me tope es que lee super facil
statusport = Inp(&H379)

y esto lo leemos cada intervalo de tiempo con el timer puesto en cierto intervalo
timer1.interval= 50 o 80 o 100 o 20 diferentes valores

pero esto falla cuando leeemos valores enviados rapidisimo por ejemplo un pagador de monedas las revoluciones de un motor etc..

falla por que cuando vuelve a leer el statusport este ya cambio y volvio a la normalidad es decir yo quiero leer unos 1  y mi aparato a medir motor ya mando un 101 en lo que mi timer salto en ese intervalo y leyo un solo 1

o bien el segundo caso el motor trabajo mas lento y el timer ya leyo 3 intervalos y este motor solo esta en 1/16 del giro si en ese 16 de giro prende o acciona algo y mi pc debe leer cada que lo acciona otra vez falla por que el timer lee 3 lineas marcando que ya dio 3 tres unos "1" o dos o 4 etc.. y el motor no ha dado ni un 1 esta en 00000000

no se si me explique pero quien haya tenido este problema me entendera a la perfeccion

lo ideal para resolver esto seria que el statusport solo cambiara cuando cmabia su lectura sin hacer intervalos de tiempo para leerlo
 
Bueno pues para resolverlo se me ocurrio algo la verdad muy facil con el mismo timer este solo debe cambiar una vez que lea un cambio total de 360 grados es decir un 0 y un 1 y no solo un 1 o un 0 como es acostumbrado

ejemplo de mi programa usando un etado de lectura de 11101
f variable usada para crear contador
accion prender apagar algo despues de que de x giros en los que mi programa decide despues de cada que tanto intervalo de giro de 360 grados del motor acciono algo
formload()
Out &H378, 15 "mitad corriente mitad tierra ideal para un transistor y un rele"
timer1.interval=20 "emasiado pequeño como para que se le vaya algo"

timer1_timer()
statusport = Inp(&H379)
If (statusport = 143) And d = 0 Then
d = d + 1
End If

""ahi ley 0001

If (statusport = 111) And d > 0 Then "111 es decimal binario es 11101"
t = 1
f = (f - t)
If f > 0 Then
Label1.Caption = (f)
d = 0
Else
Out &H378, 255
WindowsMediaPlayer1.URL = "C:\e.mid"
Label1.Caption = "0"
Picture9.Visible = False
d = 0
End If
End If


solo se activo si dio el cambio completo

Se los dejo y si algun dia chocan con este problema les sea de ayuda ya que a mi me funciono

La idea principal es reducir el intervalo del timer muy pequeño y solo leer el dato despues de que haya sido totalmente cambiado

por ejemplo
10
110
001
01

0001
1110

leo el valor hasta que este cambia
Saludos

Hola amigo LSL antes que nada dejame agradecerte muchisisimo primero por prestarle atencion a mi problema y segundo por tomarte el tiempo de ayudarme muchas gracias mi hermano  

Ya cheque el programa y si efectivamente es para esta proteccion pero el problema es el numero de capas lo ejecuto 99 veces para la primera por que asi le pusieron de capas pero de hay se necesita quitar la segunda por que como que estan joineados es decir el primero protegido tiene joineados los demas  y en la segunda trae dos programas ejecutables .exe que corren el programa que como veo una la crea el mismo programa pc guard y el otro es el original pero igual protegido
Bueno en uno se congelo el unpcg y en el otro me tira que considere registrar el producto

Estoy casi seguro que este programa si me quita el candado   pero necesito checarle mas a fondo por que hasta ahora no he podido  

Amigo te agradezco muchisimo y sigo poniendo aca el problema si es que no lo puedo echar a andar
Y si lo logro subo un tutorial de este programa por que me esta quitando el sueño    
Te repito muchas gracias amigo y a todos los que se han tomado la molestia de leer mi problema de igual forma les agradezco mucho