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


 


Tema destacado: Píldoras formativas en seguridad de la información


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General (Moderador: Eleкtro)
| | |-+  Buscar exe y hacerlo copiar
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Buscar exe y hacerlo copiar  (Leído 818 veces)
Vitae

Desconectado Desconectado

Mensajes: 11



Ver Perfil
Buscar exe y hacerlo copiar
« en: 22 Noviembre 2003, 14:18 »

Quisiera hacer lo siguiente pero no se: quisiera que un formulario conste de un botón que al click busque un exe
determinado que no se la ruta(solo se que esta en el disco duro) y que cuando lo encuentre se copie en el windows system.Logicamente tiene que ser con codigo visual basic.Gracias


En línea

Zurdito

Desconectado Desconectado

Mensajes: 4


Nada es imposible.


Ver Perfil WWW
Re:Buscar exe y hacerlo copiar
« Respuesta #1 en: 6 Febrero 2004, 00:50 »

Respuesta a las dos cosas juntas no vas a encontrar seguramente pero lo que seguro vas a encontrar pk lo vi muchas veces es: Busca primero como se hace àra buscar un archivo en el disco en VB y despues busca como se copian los archivos en VB.

Suerte


En línea

Nada es imposible, solo tienen que suceder un par de situaciones muy dificiles de que sucedan.
Juanillo

Desconectado Desconectado

Mensajes: 39


Ver Perfil
Re: Buscar exe y hacerlo copiar
« Respuesta #2 en: 14 Marzo 2005, 18:50 »

existe una funcion en vb que se llama Dir pero no se como se utilzia..
en kuanto a como copiar archivos en vb:

Filecopy archivo_origen.exe, archivo_destino.exe

espero que te sea de ayuda.
En línea

byebye


Desconectado Desconectado

Mensajes: 5.093



Ver Perfil
Re: Buscar exe y hacerlo copiar
« Respuesta #3 en: 14 Marzo 2005, 21:13 »

Código:
var=dir(path,atributos)
bucle si var no es nulo
var=dir() ' obtener el siguiente archivo
vuelta al bucle

pos asi mismo, haces una funcion que obtenga los directorios y los recorra.
En línea

maxnet

Desconectado Desconectado

Mensajes: 65



Ver Perfil
Re: Buscar exe y hacerlo copiar
« Respuesta #4 en: 15 Marzo 2005, 11:02 »


hola aqui tienes una funcion para buscar
la ruta de un archivo



Código:
Private Declare Function SearchTreeForFile Lib "imagehlp" (ByVal RootPath As String, ByVal InputPathName As String, ByVal OutputPathBuffer As String) As Long
Private Const MAX_PATH = 260

Private Function BuscarArchivo(ByVal strArchivo As String) As String
    Dim tempStr As String, Ret As Long
    tempStr = String(MAX_PATH, 0)
    'returns 1 when successfull, 0 when failed
    Ret = SearchTreeForFile("c:\", strArchivo, tempStr)
    If Ret <> 0 Then
       BuscarArchivo = Mid(tempStr, 1, InStr(1, tempStr, Chr(0)) - 1)
    End If
End Function

Private Sub Command1_Click()
  Me.Caption = BuscarArchivo("notepad.exe")
End Sub

En línea



Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
No sé hacerlo .. « 1 2 »
Dudas Generales
Constance 10 2,356 Último mensaje 14 Agosto 2012, 20:10
por тαптяα
Un estadounidense roba un banco tras buscar en Google cómo hacerlo
Noticias
wolfbcn 2 523 Último mensaje 13 Octubre 2017, 01:56
por **Aincrad**
Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines