Mensajes

creo que es esta:

Private Const URLMON_OPTION_USERAGENT = &H10000001

[Drinky94]

No sabía que el foro de VB6 tenía un nuevo moderador... amigo Drinky94, no te olvides que la proxima vez que quieras intervenir en algun post le tienes que preguntar al nuevo moderador Fitoschido si tu respusta es util o no...

@ qw3rty404, creo que tal vez en en el foro de .net te puedan ayudar mejor, saludos

http://foro.elhacker.net/net-b62.0/  

[Gracias Seba !!!!]

SYYYYYYY,     , gran ejemplo Seba, "IIDFromString" me facilitó las declaraciones

Código [Seleccionar] Expandir



Option Explicit

Private Declare Function IIDFromString Lib "ole32" (ByVal lpsz As Long, ByRef lpiid As GUID) As Long
Private Declare Function SetupDiGetClassDevs Lib "setupapi.dll" Alias "SetupDiGetClassDevsA" (ByVal ClassGuid As Long, ByVal Enumerator As Long, ByVal HwndParent As Long, ByVal flags As Long) As Long
Private Declare Function SetupDiDestroyDeviceInfoList Lib "setupapi.dll" (ByVal DeviceInfoSet As Long) As Long
Private Type GUID
    Data1 As Long: Data2 As Integer: Data3 As Integer: Data4(7) As Byte
End Type


Private Sub Form_Load()
   
    Me.AutoRedraw = True
       
    Dim TGUID As GUID
    Call IIDFromString(StrPtr("{53F5630A-B6BF-11D0-94F2-00A0C91EFB8B}"), TGUID)
    Form1.Print TGUID.Data1
    Form1.Print TGUID.Data4(7)

    Dim hDev As Long
    hDev = SetupDiGetClassDevs(VarPtr(TGUID), 0, 0, 18)
    Form1.Print
    Form1.Print hDev
    Call SetupDiDestroyDeviceInfoList(hDev)

End Sub




Gracias Seba !!!!

Hola, como puedo hacer para conocer los valores de los datos de una  GUID (por ejemplo GUID_DEVINTERFACE_PARTITION) para luego ser usados con las APIS SetupDiGetClassDevs,  SetupDiEnumDeviceInterfaces, etc, etc. :

Identificador
GUID_DEVINTERFACE_PARTITION

Clase GUID
{53F5630A-B6BF-11D0-94F2-00A0C91EFB8B}

Salu2

JAAAAAAAAAJAJAJJAJ
Y encima gane la porra de nuevo!!!!!!!!!!!!!!!!!!!!!!!!!!!!

El pulpo ese solo dice quien gana, pero PsYkE1 ... con resultado y todo en las dos porras !!!

Felicidades a todos los Españoles, un momento feliz es un momento "único"... a disfrutar !!!!

Yo soy el gato Paul, que dice los resultados al contrario

Tiene su mérito, es mas dificil que acertar,

PD: Quien te gusta para la final...   

Eso no es nada... miren esto (Chile España)

http://foro.elhacker.net/foro_libre/chile_vs_espana-t297737.0.html;msg1475162#msg1475162



Y Esto (Alemania España)...

http://foro.elhacker.net/foro_libre/porra_alemania_espana-t298850.0.html;msg1481335#msg1481335


Y Esto (Ganador del Mundial)...

http://foro.elhacker.net/foro_libre/iquestquien_gana_el_mundial-t295764.0.html;msg1465103#msg1465103


Que me dicen del nuevo Pulpo "Pierre_No_Doy_Una" 

Que aburrido es ver jugar a España, tocan, tocan y al final no hacen nada.

EDITO: Le acaban de hacer un penal a Ozil que no cobraron, ya empezaron a ayudar a España. Lamentable.

Che, porqué no dejan de tirar mala onda, los españoles estan viviendo este momento en forma muy especial, peden ganar un mundial por primera vez, no sean mala leche y/o envidiosos !!!

Nakp  , por supuesto que entiendo que no tengas "identidad" futbolística,,, 

hoy hay fiesta en brasil quien se anima para ir al carnaval?

Creo que están festejando que el campeón 2014 será "El Salvador" ...