Como realizar la encryptacion del RunPE que sale en el Tutorial?
Bueno investigando me gustaria saber por que me tira
este error justo cuando le doy a abrir la carpeta para pillar
el server

Saludos
este error justo cuando le doy a abrir la carpeta para pillar
el server

Saludos
Es posible que no tengas el common dialog puesto, o lo mas probable que el if ese
no este definido correctamente, quita ese if y mira si funciona.
no este definido correctamente, quita ese if y mira si funciona.
El nombre tu tu texbox tiene que ser el mismo que introduces en tu codigo.
Acabo de revisar todo lo que habeís dicho y esta todo
normal.. me sigue sin ir
Z40R3 a que if te refieres?
normal.. me sigue sin ir
Z40R3 a que if te refieres?
Oigan me pueden decir con cual reproductor se puede mirar el video, es que ya probé con varios y solo se escucha el la música pero el video no se mira nada.
Http://Indetectables.Net/Foro/
Winamp es el mejor
Saludos!
Código: Seleccionar todo
http://es.winamp.com/download.html?build=full&lang=es-us
Saludos!
Si no sabes a que if me refiero, sugiero que dejen de hacer programas
sin tener ningun conocimiento de vb6 antes...
if not commondialog.filename....
end if
(borra eso, si funciona se debe a eso, dejalo como estaba y continua copiando, cuando termines te dejara compilar)
sin tener ningun conocimiento de vb6 antes...
if not commondialog.filename....
end if
(borra eso, si funciona se debe a eso, dejalo como estaba y continua copiando, cuando termines te dejara compilar)
Z40R3 tengo conocimientos de programacion
el problema es que he borrado todo el code y iba a empezar
por eso te preguté a que if te referias
---
Me sigue sin ir, seguire mirandome el codigo y haber..
Saludos
el problema es que he borrado todo el code y iba a empezar
por eso te preguté a que if te referias
---
Me sigue sin ir, seguire mirandome el codigo y haber..
Saludos
Amigo es una cosa muy simple, mira pon esto
With cd
.DialogTitle = "Seleccione un Archivo"
.Filter = "Executables (*.exe)|*.exe"
.ShowOpen
End With
txtarchivo.Text = cd.FileName
msgbox "bien!"
Tienes que tener un dlg, txt y command
si funciona ya esta, pon el code que tenias y sigue adelante hasta acabar.
With cd
.DialogTitle = "Seleccione un Archivo"
.Filter = "Executables (*.exe)|*.exe"
.ShowOpen
End With
txtarchivo.Text = cd.FileName
msgbox "bien!"
Tienes que tener un dlg, txt y command
si funciona ya esta, pon el code que tenias y sigue adelante hasta acabar.
Muchas gracias amigo pero sigue sin ir..
Saludos!
Saludos!
Pues A Mi me Funciona bien mira haber si el common dialog tiene un nombre diferente al que le aplicas en Botón pienso que debe de ser un error de este tipo.
Se que tu debes de tener conocimientos de programacion pero un pequeño error lo puede cometer cualquiera.
Espero que no te des por vencido y lo consigas
Que te vaya bien
Se que tu debes de tener conocimientos de programacion pero un pequeño error lo puede cometer cualquiera.
Espero que no te des por vencido y lo consigas
Que te vaya bien
Holas, pues sigo con el mismo problema, ya probé el Winamp y me tira un error y no abre y con otros que e probado nomas se escucha la pura música pero la imagen no se mira nada, lo único que se me ocurre es que el video esta dañado...
PD: El video lo baje del link que puso McPhiros ya que el de skyweb ese si esta dañado...
Edit: Problema Resuelto...
PD: El video lo baje del link que puso McPhiros ya que el de skyweb ese si esta dañado...
Edit: Problema Resuelto...
Última edición por .:J.V-B:. el 17 Jun 2009, 04:18, editado 1 vez en total.
Http://Indetectables.Net/Foro/
GRACIAS , el video esta genial, espero que vengan mas videotutoriales como este.
Para Poner el EOF data incorporaremos el codigo en el from del boton utilizado para la encriptacion
este codigo es condicional ya que lo que dice es que si esta seleccionado el ckeckbox salte a la parte del code
donde esta el ReadEOFData y el WriteEOFData .(el ReadEOFData , WriteEOFData,GetNullBytes ya se posteo en esta seccion del foro)
Recordar que donde pone commonDialog1 tiene que ser el mismo que el nombre que cada uno le puso asu CammonDialog y que tambien tienen que crear la variable string correspondiente Dim TheEOF As String.
If chkEOF.Value = Checked Then
TheEOF = ReadEOFData(Path.Text)
Else
End If
If chkEOF.Value = Checked Then
Call WriteEOFData(CommonDialog1.FileName, TheEOF)
End If
este codigo es condicional ya que lo que dice es que si esta seleccionado el ckeckbox salte a la parte del code
donde esta el ReadEOFData y el WriteEOFData .(el ReadEOFData , WriteEOFData,GetNullBytes ya se posteo en esta seccion del foro)
Recordar que donde pone commonDialog1 tiene que ser el mismo que el nombre que cada uno le puso asu CammonDialog y que tambien tienen que crear la variable string correspondiente Dim TheEOF As String.
If chkEOF.Value = Checked Then
TheEOF = ReadEOFData(Path.Text)
Else
End If
If chkEOF.Value = Checked Then
Call WriteEOFData(CommonDialog1.FileName, TheEOF)
End If