[Ayuda] Pasar codigo de VB.Net a VB6

[v3ng4nz3]

Hola a todos.

Por mas que intento no puedo pasar este código, que es para obtener la Steam ID de un usuario de Steam con un sencillo codigo en VB.NET:

Código [Seleccionar] Expandir

Imports System.Text.RegularExpressions 
Imports System.IO 
Imports Microsoft.Win32 

Public Class SteamID 
    Public Function GetSteamID() As String 
        Dim regKey As RegistryKey = Registry.LocalMachine.OpenSubKey("SOFTWARE\Valve\Steam\", True) 
        Dim path As String = regKey.GetValue("InstallPath") 
        Dim location As String = path & "steam.log" 
        Dim content As String 
        Dim read As New StreamReader(location) 
        content = read.ReadToEnd() 
        read.Close() 
        read.Dispose() 
        Dim id = Regex.Match(content, "d:d:d{8}") 

        Return id.ToString() 
    End Function 
End Class

Alguien tendría la amabilidad de ayudarme pasando este código a dialecto de VB6?

Muchas gracias

[BlackZeroX]

.
Eso solo lee una clave del registro usa las apis para leer el registro de windows.
y por ultimo con expresiones regulares obtienes lo deseado.

Es lo que se entiende!¡.

P.D.: No creo que nadie te lo pase a VB6.

Dulces Lunas!¡.

[v3ng4nz3]

Yo por mas que lo intento no hace lo que necesito... como ejecuta esa funcion?