SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: Sagutxo en Domingo 23 de Marzo de 2008, 17:31

Título: Registro De Windows
Publicado por: Sagutxo en Domingo 23 de Marzo de 2008, 17:31

Salu2. Mi problema es el siguiente:

Al leer el valor de un clave de registro y meterla en una variable string el caracter final de la cadena es un cuadrado, que supongo que será un caracter null o no imprimible. No existe en el valor leyendolo desde el registro de win. Este problema hace que mis comparaciones sean fallidas. He optado por solucionarlo eliminando el último caracter de las cadenas y funciona, pero no estoy al 100% seguro de que eso suceda con todos los windows.
¿Se les ocurre una solucion ?

   Hay una variable registro que hace referencia al modulo calse en el que está esta función.

Código: Text

1. Public Function ConsultarValor(clave As Long, Nombre_clave As String, Nombre_valor As String)
2.   
3.        Dim Handle_clave As Long
4.        Dim Valor As Variant
5.   
6.        Dim ret As Long
7.   
8.        ret = RegOpenKeyEx(clave, Nombre_clave, 0, KEY_ALL_ACCESS, Handle_clave)
9.           
10.        ret = QueryValueEx(Handle_clave, Nombre_valor, Valor)
11.        ' REtorna el valor del registro a la función
12.        ConsultarValor = Valor
13.        'Cierra la clave abierta del registro
14.        RegCloseKey (Handle_clave)
15. End Function
16.  

Muchas gracias.

 :smartass:  :comp:  :smartass:

Título: Re: Registro De Windows
Publicado por: Sagutxo en Domingo 23 de Marzo de 2008, 18:34

Salu2. Solucionado, el valor ascii del último caracter es 0 con ese caracter.

Gracias.