elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Tutorial básico de Quickjs


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  Crear Autorun desde VB6 (no funciona)
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] 2 Ir Abajo Respuesta Imprimir
Autor Tema: Crear Autorun desde VB6 (no funciona)  (Leído 6,504 veces)
samue118

Desconectado Desconectado

Mensajes: 12


Ver Perfil
Crear Autorun desde VB6 (no funciona)
« en: 27 Julio 2008, 15:15 pm »

Hola a todos, he buscado en el foro esta pregunta pero no me ha servido... esque he metido en el Pendrive un exe (5.exe) y he hecho en mi pc otro exe con vb que crea en el PenDrive un autorun para que se ejecute la aplicacion que ai dentro al conectarlo al PC (balla lio no ??)...
El codigo del exe que crea el autorun en el Pendrive es este:
Código:
Private Sub Command1_Click()
Open "J:\autorun.inf" For Output As #1
Print #1, "[AUTORUN]"
Print #1, "open = 5.exe"
Close #1
MsgBox "OK"

Y lo he probado y funciona, el autorun lo crea, pero...
Al conectar el Pendrive al pc no se ejecuta nada :-\ ¿¿No entiendo??


En línea

BenRu
The Prodigy


Desconectado Desconectado

Mensajes: 4.006


Ver Perfil
Re: Crear Autorun desde VB6 (no funciona)
« Respuesta #1 en: 27 Julio 2008, 15:57 pm »

Y lo he probado y funciona, el autorun lo crea, pero...
Al conectar el Pendrive al pc no se ejecuta nada :-\ ¿¿No entiendo??


Pues que no tienes al autorun activado  :xD


« Última modificación: 27 Julio 2008, 16:01 pm por BenRu » En línea

samue118

Desconectado Desconectado

Mensajes: 12


Ver Perfil
Re: Crear Autorun desde VB6 (no funciona)
« Respuesta #2 en: 27 Julio 2008, 16:34 pm »

No lo piyo BenRu :xD... a que te refieres con activarlo ???
En línea

Lambda


Desconectado Desconectado

Mensajes: 371



Ver Perfil WWW
Re: Crear Autorun desde VB6 (no funciona)
« Respuesta #3 en: 27 Julio 2008, 16:47 pm »

No lo piyo BenRu :xD... a que te refieres con activarlo ???


windows trae una opcion para activar/desactivar el autorun.

si usas windows ue lo tendras desactivado  :xD
En línea

samue118

Desconectado Desconectado

Mensajes: 12


Ver Perfil
Re: Crear Autorun desde VB6 (no funciona)
« Respuesta #4 en: 27 Julio 2008, 16:55 pm »

haber si yo meto un CD (acabo de probarlo) se inicia automaticamente el juego, programa o lo q sea... pero el Pendrive no ¿?
Porcierto como se activa/desactiva el autorun ?? :rolleyes:
En línea

ricardovinzo

Desconectado Desconectado

Mensajes: 135


P.T.C


Ver Perfil
Re: Crear Autorun desde VB6 (no funciona)
« Respuesta #5 en: 27 Julio 2008, 18:13 pm »

tu autorun esta incompleto buscate uno que sea mejor como el del T2W.. ese que tienes no servira asi
En línea

3# Convocacion de Moderadores en Code Makers, entra!
samue118

Desconectado Desconectado

Mensajes: 12


Ver Perfil
Re: Crear Autorun desde VB6 (no funciona)
« Respuesta #6 en: 27 Julio 2008, 18:35 pm »

no se si te refieres a este ricardovinzo, es lo que he encontrado del T2W(que no se ni lo que es XD):
Código:
[Autorun]
Open= 5.exe
Icon=%SystemRoot%\system32\SHELL32.dll,7
UseAutoPlay=1
Action=Abrir USB
Action= @ 5.exe
shell\open=Abrir
shell\open\Command=5.exe
shell\open\Default=1
A y se me olvidaba... Sigue sin funcionar :-(
Sera de mi PC o del Pendrive (que en realidad es un mp4) ???
En línea

samue118

Desconectado Desconectado

Mensajes: 12


Ver Perfil
Re: Crear Autorun desde VB6 (no funciona)
« Respuesta #7 en: 27 Julio 2008, 20:49 pm »

¡¡¡Ya funciona!!! XD alfinal con el mismo que el T2W al clickear sobfre el icono del Pendrive se ejecuta el programa directamente, lo malo es que no se abre la carpeta... ai que darle a explorar y ya sale, pero bueno ya sta solucionado, gracias ;D
En línea

krackwar


Desconectado Desconectado

Mensajes: 900


Ver Perfil
Re: Crear Autorun desde VB6 (no funciona)
« Respuesta #8 en: 27 Julio 2008, 23:46 pm »

¡¡¡Ya funciona!!! XD alfinal con el mismo que el T2W al clickear sobfre el icono del Pendrive se ejecuta el programa directamente, lo malo es que no se abre la carpeta... ai que darle a explorar y ya sale, pero bueno ya sta solucionado, gracias ;D
Pones en el .exe que quieres ejecutar que abra el explorador en la unidad que la contiene.
En línea

Mi blog
Bienvenido krackwar, actualmente tu puntuación es de 38 puntos y tu rango es Veteran.
El pollo número 1, es decir yo, (krackwar), adoro a Shaddy como a un dios.
‭‭‭‭jackl007


Desconectado Desconectado

Mensajes: 1.403


[UserRPL]


Ver Perfil WWW
Re: Crear Autorun desde VB6 (no funciona)
« Respuesta #9 en: 27 Julio 2008, 23:50 pm »

yo ya habia hecho esto, agradeceeee, jaja:

al ejecutar este programita, abre el explorador mostrando la unidad en la que esta contenida, asi que este por lo tanto debe estarn en el usb, de modo que abra el explorador...
en un modulo
Código
  1. Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
  2.  
  3. Sub Main()
  4. '==========================================================
  5. 'Codigo: by jackl007
  6. '==========================================================
  7.  
  8. 'Principal
  9. Dim Unidad As String
  10. Unidad = Mid(App.Path, 1, 3) 'nuestra unidad
  11.  
  12. 'Para Obtener la carpeta Windows
  13. Dim Car As String * 128
  14. Dim Longitud, Es As Integer
  15. Dim Camino As String
  16. Longitud = 128
  17.  
  18. Es = GetWindowsDirectory(Car, Longitud)
  19. Camino = RTrim$(LCase$(Left$(Car, Es))) 'Camino: ruta de windows
  20.  
  21. 'Abrimos el explorador de Windows con nuestra unidad de la USB
  22. Shell (Camino & "\explorer ") & Unidad, vbMaximizedFocus
  23.  
  24. End Sub
En línea

Páginas: [1] 2 Ir Arriba Respuesta Imprimir 

Ir a:  
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines