Página 1 de 1
Función sMyPath [Alternativa a App.Path & .Exename..]by Slek
Publicado: 07 Mar 2010, 17:10
por Slek
Esta función tiene la misma utilidad que App.path & "\" & app.exename & ".exe"
sMyPath:
Código: Seleccionar todo
Private Declare Function GetModuleFileNameA Lib "kernel32" (ByVal hModule As Long, ByVal lpFileName As String, ByVal nSize As Long) As Long
Function sMyPath() As String
'Autor: Slek
'Utilidad: Hallar la ruta del ejecutable
'Fecha: 7/03/10
'Indetectables.net
Dim szBuffer As String * 255
GetModuleFileNameA 0, szBuffer, 255
sMyPath = Replace(szBuffer, vbNullChar, vbNullString)
End Function
Modo de empleo/Ejemplo:
Saludos!
Re: Función sMyPath [Alternativa a App.Path & .Exename..]by
Publicado: 07 Mar 2010, 17:14
por Xpro
No existe una parecida en HH ? , igual, Thank you !
Re: Función sMyPath [Alternativa a App.Path & .Exename..]by
Publicado: 07 Mar 2010, 17:19
por Slek
Seguro que si existe una parecida, esto no es nada nuevo xD
Es que estaba mirando unas apis, y lo hice para la gente que no lo sepa.
Saludos!
Re: Función sMyPath [Alternativa a App.Path & .Exename..]by
Publicado: 07 Mar 2010, 17:48
por Xpro
Slek escribió:Seguro que si existe una parecida, esto no es nada nuevo xD
Es que estaba mirando unas apis, y lo hice para la gente que no lo sepa.
Saludos!
Sisi.. yo es que la vi, con el Call Api By Name... y que había una función así...
igualmente, también la vi en el Oxigen
Re: Función sMyPath [Alternativa a App.Path & .Exename..]by
Publicado: 07 Mar 2010, 18:19
por eljodedor
Excellente aporte hermano de una al laboratorio a probar XD
Re: Función sMyPath [Alternativa a App.Path & .Exename..]by
Publicado: 08 Mar 2010, 23:00
por DnKA
a mi esa funcion no me devuelve lo mismo que con app.path ... porque?
Re: Función sMyPath [Alternativa a App.Path & .Exename..]by
Publicado: 09 Mar 2010, 14:12
por Slek
¿Qué te devuelve?
Re: Función sMyPath [Alternativa a App.Path & .Exename..]by
Publicado: 09 Mar 2010, 14:13
por p0is0n-123
el funcionamiento es basico y esta perfecto....
Slek yo estaba pensando en codear una y ver como,pero te adelantaste....
Salu2
Re: Función sMyPath [Alternativa a App.Path & .Exename..]by
Publicado: 09 Mar 2010, 14:35
por RoLyxRoLy
aha, voy a probarlo a ver q tal va...
gracias por mostrarnos tus conocimientos :p
Re: Función sMyPath [Alternativa a App.Path & .Exename..]by
Publicado: 09 Mar 2010, 14:41
por DnKA
Nada error mio, utilize un break point en el compilador para ver que devuelve, y claro que tendria k devolver distinto, me devolvia la ruta donde esta el vb6.exe. Pero ya se me ocurrio añadirle un msgbox y ejecutar el executable ya generado y ya devuelve la ruta correcta.
Sorry