|
Mostrar Mensajes
|
Páginas: 1 2 [3]
|
21
|
Programación / Programación Visual Basic / [Solucionado] Editar un EXE, desde PHP
|
en: 13 Junio 2010, 09:31 am
|
Holaaaa, Espero que estén bien... Les soy breve... Necesito poder editar un EXE (creado con VB6 y comprimido con "Fusión") desde PHP... necesito editar, por ejemplo una constante dentro del programa... o el "Caption" del formulario... o el "Caption" del Command1... lo que sea posible... Se que desde PHP se puede abrir archivos binarios... y estuve viendo que, ANTES DE COMPRIMIR EL PROGRAMA CON "FUSION", no es muy difícil acceder a los textos de los botones y otros objetos... pero... luego de comprimir y adjuntar las DLLs y OCXs... se complica un poco... ¿Alguien sabe como hacer esto? Necesito poder editar un EXE para que... desde PHP... yo pueda "meter" el nombre del usuario... en el EXE... en cualquier parte... en una constante, o en un Label oculto... pero necesito poder editar un EXE... desde PHP... para poder hacer esto... Espero que me puedan ayudar... Aquí les dejo el proyecto (un ejemplo muy simple)... junto con el EXE comprimido con "Fusion"... http://www.gigasize.com/get.php?d=1okgfcd8dvfDesde ya muchas gracias... Un saludo! Pd: Ah, Con "Fusion" me refiero a la herramienta que publicaron aquí: http://www.recursosvisualbasic.com.ar/htm/ocx-componentes-activex-dll/104-utilidad-para-embeber-dependencias-en-el-exe.htm
|
|
|
22
|
Programación / Programación Visual Basic / Obtener Cabecera HTTP con VB6
|
en: 6 Junio 2010, 08:42 am
|
Hola amigos, Muy buenas noches, espero que estén bien, de corazón. Necesito que me ayuden en algo puntual, porque yo no lo puedo lograr... Lo que tengo que lograr es hacer un pedido (http) de un archivo, enviando una cookie, pero solo para obtener el peso y No para descargarlo. Quizás suene raro... pero lo explico de otra forma... Necesito conocer el peso, por el "Content-Length" de un archivo web y al hacer la consulta necesito enviar la cookie correspondiente. Ya se como levantar la cookie, pero no tengo idea como incluirla en la API OpenURL... si es que así se usa... Ah, me olvidaba... esto lo necesito hacer usando APIs... Seguramente alguien lo haya visto antes, por eso pregunto aquí... ¿Que APIs hay que usar para hacer esto? Muchas gracias de antemano, de verdad
|
|
|
23
|
Programación / Programación Visual Basic / Re: Cómo Unir Partes De Un Mismo Archivo (Para Crear El Original)
|
en: 3 Junio 2010, 01:05 am
|
Hola, ya me respondieron... ésta es la solución:
Dim Parte1 As String, Parte2 As String, Parte3 As String Open "C:\Prueba.001" For Binary As #1 Parte1 = Space$(LOF(1)) Get #1, 1, Parte1 Close #1 Open "C:\Prueba.002" For Binary As #1 Parte2 = Space$(LOF(1)) Get #1, 1, Parte2 Close #1 Open "C:\Prueba.003" For Binary As #1 Parte3 = Space$(LOF(1)) Get #1, 1, Parte3 Close #1
Open "C:\Prueba.jpg" For Binary As #1 Put #1, 1, Parte1 & Parte2 & Parte3 Close #1
Un saludo y gracias.
|
|
|
24
|
Programación / Programación Visual Basic / Cómo Unir Partes De Un Mismo Archivo (Para Crear El Original)
|
en: 2 Junio 2010, 20:49 pm
|
Hola amigos, cómo están, espero que muy bien. Estoy modificando un proyecto, para descargar cualquier archivo en varias partes... para acelerar el proceso de descarga... El tema es que luego de descargar las partes por separado... no puedo unirlo todo, en un archivo correcto... que en mi ejemplo es un JPG... ya he probado pero no logro dar con la tecla... Espero que me puedan ayudar... publico aquí el proyecto, limpio de mis intentos de unión... para que se entienda mejor... Por favor, necesito ayuda con esto, ya que me estoy volviendo loco Gracias de antemano... Un saludo PD: El archivo: http://www.gigasize.com/get.php?d=9zhgjshb3qdPD: Gracias
|
|
|
25
|
Programación / Programación Visual Basic / Re: Crear nombre de archivo, en cualquier idioma (ejemplo: ruso)
|
en: 24 Mayo 2010, 21:23 pm
|
Hola seba123neo, Muy bueno el aporte, muchas muchas gracias... el método funciona bien. Pero en estos días estuve buscando por mi cuenta y encontré lo que estaba buscando, hacer este trabajo con APIs... y finalmente, luego de varias horas de investigación... decidí seguir usando el método open, para crear un archivo temporal y trabajar sobre él... y luego al final... sí... renombrarlo con un nombre UNICODE... solamente usé una API... la siguiente: Private Declare Function MoveFileW Lib "kernel32.dll" (ByVal lpExistingFileName As Long, ByVal lpNewFileName As Long) As LongPero en realidad, como estoy obteniendo el nombre del archivo desde un archivo HTML... descargado en YouTube... usé algunas cosas más... El nombre del archivo, es el título de cualquier video de YouTube... y ESO viene en UTF8... por lo que necesité también una función para pasar de UTF8 a UNICODE... todo lo que usé es esto... 'mover archivos y detectar unicode en windows Private Declare Function GetDesktopWindow Lib "user32.dll" () As Long Private Declare Function IsWindowUnicode Lib "user32.dll" (ByVal hWnd As Long) As Long Private Declare Function MoveFileA Lib "kernel32.dll" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String) As Long Private Declare Function MoveFileW Lib "kernel32.dll" (ByVal lpExistingFileName As Long, ByVal lpNewFileName As Long) As Long 'convertir utf8 Private Const CP_UTF8 = 65001 Private Declare Function MultiByteToWideChar Lib "kernel32" (ByVal CodePage As Long, ByVal dwFlags As Long, ByRef lpMultiByteStr As Any, ByVal cchMultiByte As Long, ByVal lpWideCharStr As Long, ByVal cchWideChar As Long) As Long 'mover archivo Public Function Mover(ByVal ExistingFileName As String, ByVal NewFileName As String) As Long If Not (IsWindowUnicode(GetDesktopWindow) = 0&) Then Mover = MoveFileW(StrPtr(ExistingFileName), StrPtr(NewFileName)) Else Mover = MoveFileA(ExistingFileName, NewFileName) End If End Function 'convertir utf8 a unicode Public Function UTF8_Decode(ByVal sUTF8 As String) As String Dim lngUtf8Size As Long Dim strBuffer As String Dim lngBufferSize As Long Dim lngResult As Long Dim bytUtf8() As Byte Dim n As Long If LenB(sUTF8) Then On Error GoTo EndFunction bytUtf8 = StrConv(sUTF8, vbFromUnicode) lngUtf8Size = UBound(bytUtf8) + 1 On Error GoTo 0 'Set buffer for longest possible string i.e. each byte is 'ANSI<=&HFF, thus 1 unicode(2 bytes)for every utf-8 character. lngBufferSize = lngUtf8Size * 2 strBuffer = String$(lngBufferSize, vbNullChar) 'Translate using code page 65001(UTF-8) lngResult = MultiByteToWideChar(CP_UTF8, 0, bytUtf8(0), lngUtf8Size, StrPtr(strBuffer), lngBufferSize) 'Trim result to actual length If lngResult Then UTF8_Decode = Left$(strBuffer, lngResult) End If End If EndFunction: End Function
MUCHAS GRACIAS Y ESPERO QUE ESTOS EJEMPLOS, LOS TUYOS Y LOS MIOS, LE SIRVAN A ALGUIEN... SEGURAMENTE ;-)UN SALUDOOOO!!!!
|
|
|
26
|
Programación / Programación Visual Basic / Re: Crear nombre de archivo, en cualquier idioma (ejemplo: ruso)
|
en: 22 Mayo 2010, 17:06 pm
|
Hola TheGhost(Z) y gracias por el mensaje...
Te respondo; probé con métodos fáciles de deducir, incluido el que mencionas... y no pude crear nombres de archivos como los que necesito... imaginate... si fuese así se sencillo, no estaría pidiendo ayuda a otra persona... me entiendes?
Por otro lado, necesito crear archivos usando vb6... por lo que seguramente necesito usar alguna API, para crear archivos de estas características, con nombre como esos... pero aún no se bien como hacerlo... Espero alguna persona que sepa más que yo (que seguro que los hay) me pueda ayudar... Un saludo y gracias
|
|
|
27
|
Programación / Programación Visual Basic / Crear nombre de archivo, en cualquier idioma (ejemplo: ruso)
|
en: 20 Mayo 2010, 21:58 pm
|
Hola amigos, muy buenos días. Porque es posible que algunos de ustedes ya lo hallan visto... abro este post, para ver si me puede ayudar. Necesito crear (con vb6) archivos en cualquier idioma... Por ejemplo, los siguientes los creé a mano... Necesito usar por ejemplo OPEN para crear archivos... ¿Cómo hacer esto? ¿Que API usar? Espero que me puedan ayudar y seguramente también servirá para otro... Un saludo y gracias de antemano.
|
|
|
29
|
Programación / Programación Visual Basic / Multi downloader con vb6
|
en: 20 Marzo 2010, 20:00 pm
|
Hola amigos que bueno que encontré este foro, porque ya no puedo más con este tema.
quiero hacer un descargador multiple, o sea, como esos que para descargar un archivo pesado, hacen una particion del pedido, acelerando asi el tiempo de descarga... ya se que eso ya existe, pero lo necesito en vb6
alguien sabe de un ejemplo sencillo en vb6 para hacer esto??
se que es algo de la forma de descargar, pero no tengo nada para trabajar... alguien me puede ayudar? por favor, les voy a estar muy agradecido... desde ya muchas gracias
saludo
|
|
|
|
|
|
|