Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: jodijo5 en Domingo 6 de Febrero de 2005, 23:51
Título: Apiviewer Error
Publicado por: jodijo5 en Domingo 6 de Febrero de 2005, 23:51
hola amigos he copiado esta api de el api viewer pero el vb me dice que no se puede establecer la ruta o algo asi no tengo el vb ahora por eso no estoy seguro pero estoy seguro q
Código: Text
Private Declare Function ApplyPatchToFile Lib "MSPATCHA.dll" (ByVal PatchFileName As String, ByVal OldFileName As String, ByVal NewFileName As String, ByVal ApplyOptionFlags As Long) As Long
Título: Re: Apiviewer Error
Publicado por: ROBER.29 en Miércoles 9 de Febrero de 2005, 11:12
Hola,
Yo tengo instalado la aplicación API-Guide, que sirve para ver todas las apis existentes y te muestra ejemplos de como utilizarlas y te explica los párametros que tiene. La verdad que he buscado en el programa que te he comentado anteriormente y no existe esa api.
De todas formas, buscando en google he encontrado que la forma de declarar es la siguiente:
Declare Function ApplyPatchToFile Lib "mspatcha.dll" ( _ ByVal PatchFileName As String, _ ByVal OldFileName As String, _ ByVal NewFileName As String, _ ByVal ApplyOptionFlags As Long) As Long
Pero aún así no te aseguro que esto funcione.
Un saludo.
Título: Re: Apiviewer Error
Publicado por: jodijo5 en Miércoles 9 de Febrero de 2005, 22:11
gracias rober por la ayuda y por el dato del API-GUIDE
,por si las moscas, entonces mi pregunta cambia:
no saben ustedes un api para renombrar archivos o si pueden corrijanme el api que puse. gracias de antemano
Título: Re: Apiviewer Error
Publicado por: ROBER.29 en Jueves 10 de Febrero de 2005, 08:43
Hola de nuevo,
He buscado en la aplicación que te dije y no he encontrado ninguna api para renombrar el nombre del fichero, pero lo que puedes hacer es copiar el fichero con el nombre que quieres y luego borrarle. Para ello puedes utilizar la api de copiar ficheros y la de borrar, que son las siguientes:
'Para copiar Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long
'Para eliminar el fichero origen Declare Function DeleteFile Lib "kernel32" Alias "DeleteFileA" (ByVal lpFileName As String) As Long
También por lo que he leido en la aplicación existe la API de mover ficheros y esta se utiliza para renombrarles también, prueba primero esta y sino te funciona hazlo como te he comentado anteriormente.
'Para mover ficheros y renombrarles Declare Function MoveFile Lib "kernel32" Alias "MoveFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String) As Long
Si quieres ejemplos de como se utilizan búscalas en la aplicación API-Guide que te comenté, que te viene perfectamente explicados las forma de utilizarles y te viene con ejemplos también.