Mensajes

[URLMON_OPTION_USERAGENT]

gracias me ah ayudado a entender un poco mejor esa api pero no lo quiero para proxy si no para modificar el header del webbrowser.... se que desde el webbrowser se puede pero solo se puede al hacer el evento navigate(osea la primera vez que visitas X pagina), y creo que con esta api se puede hacer hasta que se cierre el exe 

lo declare así

Código [Seleccionar] Expandir

Public Declare Sub UrlMkSetSessionOption Lib "urlmon.dll" _
(ByVal dwOption As Long, ByRef pBuffer As Any, _
ByVal dwBufferLength As Long, ByVal dwReserved As Long)

y volvi a hacer la misma llamada

Código [Seleccionar] Expandir

Dim I As Integer
I = UrlMkSetSessionOption(37, "Browser de prueba", Len("Browser de prueba"), 0)
MsgBox I

solo que no se la constante para usar el URLMON_OPTION_USERAGENT, el INTERNET_OPTION_PROXY es 38, asi que probe desde el 0 al 39, el 37 me tira un 0 y el 38 un 1 

Encontre una api que me llamó la atención y quise usarla pero no pude, tal vez puedan ayudarme, la api es esta

http://msdn.microsoft.com/en-us/library/ms775125(VS.85).aspx

La declaración la hago asi:

Código [Seleccionar] Expandir

Private Declare Function UrlMkSetSessionOption Lib "urlmon" (ByVal dwOption As String, ByVal pBuffer As String, ByVal dwBufferLength As Long, ByVal dwReserved As Long) As Long


y la llamo asi:

Código [Seleccionar] Expandir

Dim I As Long
I = UrlMkSetSessionOption("URLMON_OPTION_USERAGENT", "Browser de prueba", 18, 0)
MsgBox I


pero siempre me retorna un valor negativo y creo que esta mal  , gracias de antemano. 

encontre esto en el registro

Código [Seleccionar] Expandir

HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\User Agent

pero para modificar esa ruta necesitas permisos de administrador, si lo tratas de modificar en una maquina sin permisos tiraria error 

te refieres a un joiner? (juntar 2 o mas archivos) o meter un archivo dentro del codigo fuente?

Código [Seleccionar] Expandir

Public Function sAddKBytes(sPath As String, lKb As Integer)
'Autor: Slek
'Objetivo: Añadir Bytes a un Archivo
'Nota, se añaden KiloBytes
'Ej: sAddBytes "C:\Test.exe", 2 '(Añade 2 KiloBytes)
Dim sKbyte As String
Dim i As Integer
Dim FF

FF = FreeFile

sKbyte = String(1024, vbNullChar)

Open sPath For Binary As #FF
For i = 1 To lKb
  Put #FF, LOF(FF) + 1, sKbyte
Next i
Close #FF
End Function

esa es una forma... hay bastantes para hacerlo 

Conecta a la web y manda el header de un navegador

Desactiva el AV y compila con otro nombre...

no seria mas facil con replace y split?

Que tal, hace unos dias que empeze con c++ y ahora me puse a crear mi primera función que es para recortar una cadena... digamos asi:

funcion("Prueba",1,3) = "Pru"

bueno hize este codigo

Código [Seleccionar] Expandir

#include <iostream.h>
#include <string.h>
#include <stdlib.h>
int funcion( char * cadena[], int start,int length);



main()
{

char palabra[10]= "Prueba";



cout <<  funcion(palabra,1,3);


return 0;
}

int funcion( char * cadena[], int start,int length)
{
char * tmp;

for (int n = start -1;n<start - length;n++)
{
strcat(tmp,cadena[n]);
}

return atoi(tmp);
}


pero al compilar me marca este error

'funcion' : cannot convert parameter 1 from 'char [10]' to 'char *[]'

que no se puede convertir... ya eh intentado de modificar la funcion pero me marca error en el strcat  , espero puedan ayudarme, gracias de antemano