Código fuente del caso SQL

Es compatible con la Biblioteca y la Oficina de Educación

. Biblioteca de soporte iext

Conexión de base de datos 1. Conéctese a SQLServer (,,).

Conjunto de registros 1. Configurar conexión (conexión de base de datos 1)

Conjunto de registros 1. Open("Seleccionar columnas de la tabla", declaración #SQL,)

. Encabezado del bucle de recuento (conjunto de registros1. Número de registros, n1)

Conjunto de registros1. ReadText("columna", temporal)

SuperListBox1. Insertar elemento de tabla (n1, temporal,,,)

. Contar cola del ciclo()

. Contar encabezado de bucle (cuadro de lista superior 1. Obtenga el número de entradas (), n2)

Escriba el archivo (" XX.txt ", cuadro de lista superior 1. Obtenga el título (n2,).

. Contar cola del ciclo()