Power Builder - COMO HACER UN INI

amigos del foro, como estan, espero q bien, les escribo para pedirles un ejemplo de como hacer una conexion con un ini, con un aplicativo de power builder, espero puedan ayudarme, gracias de antemano

En realidad no haces una conexión con el archivo, en el power tenés una función para leer de esos archivos (que son archivos planos).

Esta es la función:

ProfileString ( filename, section, key, default )

filename: La ruta donde esta el archivo .ini que queres leer. Si pones el nombre solamente lo va a buscar en la carpeta donde esta el ejecutable.

section: es la sección del archivo que queres leer (la que esta entre corchetes).

key: Es la llave que queres leer.

default: Es el valor que toma por defecto si no lo encuentra.

el retorno de esa función se la asignas a una variable y listo

pepe = ProfileString ( "archivo.ini", corchetes, llave, defecto )

:-)

Tienes que utilizar el comando ProfileString y luego una vez obtenido los valores del archivo INI, con los datos de la Cadena de Conexión, realizas la conexión a la B.D

Archivo INI
***********
DBMS=ODBC
Database=
UserId=
DatabasePassword=
LogPassword=
ServerName=
LogId=
Lock=
DbParm=ConnectString='DSN=sistema;UID=sa;PWD='
Prompt=0
AutoCommit=0

Power
*******
SQLCA.DBMS = ProfileString( as_fileini, as_seccion, "DBMS", "" )
SQLCA.ServerName = ProfileString( as_fileini, as_seccion, "ServerName", "" )
SQLCA.Database = ProfileString( as_fileini, as_seccion, "Database", "" )
SQLCA.LogId = as_login
SQLCA.LogPass = as_clave
SQLCA.DbParm = "Host='" + as_host + "', AppName='" + gstruct_aplicacion.sigla + "'"
SQLCA.AutoCommit = True

If SQLCA.DBMS = "ODBC" Then
SQLCA.DbParm = ProfileString( as_fileini, as_seccion, "DbParm", "" )
End If
CONNECT ;

SetPointer( Arrow! )

Espero que te sirva

Saludos