power builder odbc.docx

I. Introducción

PowerBuilder es una herramienta de desarrollo de clientes, en aplicaciones prácticas

para reunirse con el sistema de gestión de base de datos para ejecutar aplicaciones

con la base de datos a través de conexión de la interfaz ODBC. Configurado en el

origen de datos ODBC en el puesto, se puede conectar a la base de datos en el código

de programación y explotación de una variedad de base de datos. En la actualidad la

mayor parte del manual de referencia PB sólo describe la configuración de ODBC, pero

no en el código de la forma de configuración de ODBC, así que cuando el proceso

finalmente completado y distribuido a las manos de los usuarios, la necesidad de que

el perfil de usuario ODBC, parece ser a la vez problemas no cumplen los requisitos de

software profesional. Entonces, ¿cómo puede el código de lograr la configuración de

ODBC que? De hecho, Windows en todas las fuentes de datos ODBC se documentan en

el registro del sistema, siempre y cuando los elementos en el registro puede hacer los

cambios apropiados. Y las claves relacionadas con ODBC, en "windows95/98/nt/2000

menú Inicio" | "Ejecutar" escriba regedit. Luego, en el árbol de la izquierda, seleccione

HKEY_LOCAL_MACHINESoftwareODBCODBCINST.INIODBCDRIVER en un registro de

todos los controladores ODBC instalados;

HKEY_LOCAL_MACHINESoftwareODBCODBCINST.INI registrado en una variedad de

información de los controladores ODBC;

HKEY_CURRENT_USERSoftwareODBCODBC.INIODBC orígenes de datos registrados una

variedad de tipo de fuente de datos; HKEY_CURRENT_USERSoftwareODBCODBC . INI

durante la grabación de una variedad de fuentes de datos para obtener más

información. Por lo tanto, siempre y cuando el código para configurar estas teclas se

puede configurar manualmente a fines de ODBC.

En segundo lugar, la realización del código para configurar ODBC

Los siguientes incorporado Powerbuilder ejemplo Sybase SQL de base de datos ODBC

Anywhere5.0 para introducir la configuración del código.

1, encontrar el controlador de base de datos y los archivos relacionados

En primer lugar, encontrar los controladores de bases de datos apropiadas, estos

archivos pueden ser apropiados en el Registro en la clave

HKEY_LOCAL_MACHINESoftwareODBCODBCINST.INI encontrado. Tal como Sybase SQL

Anywhere5.0 como dbeng50.EXE, WOD50T.DLL, y algunas otras bibliotecas de vínculos

dinámicos, en este caso, Dbl50t.dll, Wl50ent.dll, Wtr50t.dll, Wodbc.gid, Wtr50t.dll.

Estos archivos deben ser instalados con el final del ejecutable en el ordenador del

usuario, junto con la solicitud también se puede colocar en un directorio específico (en

este caso el sistema para el directorio de Windows). Cuando copia depuración primero

de estos archivos en el directorio especificado.

2, configure el código de ODBC utilizado en el programa

En la aplicación de los acontecimientos abiertos en el código de configuración ODBC es

el siguiente:

Ulong ul_num

respuesta Int, answer1, answer2, answer3, answer4, answer5, ansapp

ls_driver String, ls_start, ls_location, AppPath, db_path, odbcstr

/ / Obtener el directorio del sistema operativo, y guardar en variables ls_location

answer = RegistryGet

("KYEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionSetup", "SYSDIR",

RegString! ls_location)

Si la respuesta =- 1, entonces

aplicaciones MESSAGEBOX ('Error', 'No puede acceder al directorio de sistema de

Windows, el sistema dará por terminado el sistema en funcionamiento!', stopsign!)

RETORNO

END IF

/ / Determinar Sybase SQL Anywhere5.0 controlador está instalado correctamente

ls_driver ls_location = + 'WOD50T.DLL'

ls_start = + ls_location 'dbeng50.EXE'

SI NO (FileExists (ls_driver) Y FileExists (ls_start)) ENTONCES

MESSAGEBOX ('Error', 'sistema, SQL Anywhere no está instalado el controlador, el

sistema terminará la carrera! ", Stopsign!)

RETORNO

END IF

/ / Establecer DRIVERS ODBCODBCINST.INIODBC

answer = RegistrySet

('HKEY_LOCAL_MACHINESoftwareODBCODBCINST.INIODBCDRIVER', 'Sybase SQL

Anywhere 5.0', RegString! "instalado")


MESSAGEBOX ('Error', 'aplicación no puede establecer los controladores ODBC, el


RETORNO

END IF

/ ODBCODBCINST.INI / Set

answer1 RegistrySet = ('HKEY_LOCAL_MACHINESoftwareODBCODBCINST.INISybase

SQL Anywhere 5.0 "," CPTimeout, RegString!, no puestos en común »)


SQL Anywhere 5.0', 'Driver', RegString!, ls_driver)


SQL Anywhere 5.0 "," el programa de instalación, RegString!, ls_driver)

SI answer1 =- 1 O answer2 =- 1 O answer3 =- 1 THEN

MESSAGEBOX ('Error', 'No se puede establecer la aplicación ODBCINST.INI, el sistema

terminará la carrera! ", Stopsign!)

RETORNO

END IF

/ / Definir orígenes de datos ODBC Nombre (anysql del origen de datos nombre)

answer = RegistrySet ('HKEY_LOCAL_MACHINESoftwareODBCODBCINST.INIODBC

orígenes de datos', 'anysql, RegString! ", Sybase SQL Anywhere 5.0')


MESSAGEBOX ('Error', 'aplicación no puede establecer el nombre de ODBC DATA

SOURCE, el sistema terminará la carrera! ", Stopsign!)

RETORNO

END IF

/ / Obtiene la ruta de la aplicación de instalación (ybinput para la aplicación instalada

en el registro el ordenador del usuario en el registro después de que el nombre de la

aplicación, yibiao.db para la aplicación del nombre de la base de datos, la aplicación en

el mismo directorio, anysql de datos nombre de la fuente)

ansapp = RegistryGet

("KYEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionApp

Pathsybinput", "Camino", RegString! app_path)

SI ENTONCES ansapp =- 1

MESSAGEBOX ('Error', 'aplicación no puede obtener el nombre de ruta de instalación,

el sistema terminará la carrera! ", Stopsign!)

RETORNO

ELSE

db_path = + app_path 'yibiao.db'

END IF

/ / Establecer los detalles ODBC.INI

answer1 RegistrySet = ('HKEY_current_usersoftwareodbcodbc.inianysql »,« conductor

», RegString!, ls_driver)

answer2 RegistrySet = ('HKEY_current_usersoftwareodbcodbc.inianysql', 'start',

RegString!, ls_start)

answer3 RegistrySet = ('HKEY_current_usersoftwareodbcodbc.inianysql', 'autostop',

RegString!, "sí")

answer4 RegistrySet = ('HKEY_current_usersoftwareodbcodbc.inianysql ","

DataBaseFile, RegString!, db_path)

answer5 RegistrySet = ('HKEY_current_usersoftwareodbcodbc.inianysql',

'DatabaseName, RegString!' yibiao ')

SI answer1 =- 1 O answer2 =- 1 O answer3 =- 1 O answer4 =- 1 O answer5 =- 1 THEN

MESSAGEBOX ('Error', 'No se puede establecer la aplicación ODBC.INI detalles, el


RETORNO

END IF

odbcstr = "dsn = anysql; DatabaseName = yibiao; databasefile = '+ db_path

sqlca.dbms = "odbc"

sqlca.databse = 'yibiao'

sqlca.dbparm = "connectstring = '" + + odbcstr "uid = dba; pwd = SQL"

sqlca conectarse a través de;

abierto (w_main)

El programa dirigido por la Powerbuilder6.0.

power builder odbc.docx

Documents

Transcript of power builder odbc.docx