Pregunta: | 17525 - API GETPRIVATEPROFILESTRING |
Autor: | santi chine |
Hola me preguntaba si me podías ayudar con una funcion: Estoy en Win98 y me falla la API GetPrivateProfileString. Cuando intento compilar el programa la funcion genera el siguiente error: No se ha encontrado el archivo : Kernel Este es el codigo q utiliza Dim cCadena As String Dim nLonCadena, nResp As Integer cCadena$ = Space$(255) nLonCadena = 0 nResp = GetPrivateProfileString(cSeccion, cItem, "", cCadena, ncadena, cNomFich) cCadena = Left$(cCadena, nResp) LeeINI = cCadena El fin de este codigo es cargar en una variable una cadena especifica de un fichero ini. Espero q me podais dar alguna solucion. |