* Формирую строку подключения
lcStringConnection = "Server=myServerAddress;Database=myDataBase;Uid=myUsername;Pwd=myPassword;"

* Установка соединения с сервером
nCH = SQLStringConnect(m.lcStringConnection)
if m.nCH <=  0 
	* Соединение установить не удалось
	* Уточняем причину
	LOCAL laError( 1 )
	=AError(laError)

	* Анализ содержимого массива laError
	MessageBox(laError[ 2 ])

	* Завершение работы
	return
endif

* Формируем запрос для запуска на сервере
lcLogin = (Введенное пользователем значение логина)
lcPassword = (Введенное пользователем значение пароля)
lcStringSQL = "select count(*) as kol from users where login = ?m.lcLogin and password = ?m.lcPassword"

* Выполняем сформированный запрос на сервере
if SQLExec(m.nCH, m.lcStringSQL, "curResult") >  1 
	do case
	case curResult.kol =  0 
		* Нет такого логина и парля
	case curResult.kol =  1 
		* Все в порядке. Можно запускать
	otherwise
		* Есть несколько таких логинов и паролей
		* Ошибка структуры хранения данных или контроля целостности
	endcase
else
	* Запрос выполнить не удалось
	* Уточнем причину
	LOCAL laError( 1 )
	=AError(laError)

	* Анализ содержимого массива laError
	MessageBox(laError[ 2 ])
endif

* Разрыв соединения
=SQLDisConnect(m.nCH)

IF SQLExec() >  0 
* Анализируем результат
ELSE
* Либо ошибка (если - 1 ), либо выполняется асинхронный запрос (если  0 )
ENDIF