Шахты online

Код: Выделить всё

//строка подключения - один из самых важных параметров при подключении к MSSQL. позже напишу как ее правильно составить.
стрПодключения = "Provider=SQLOLEDB.1;Password=qwert;Persist Security Info=True;User ID=sa;Initial Catalog=PromoBD41;Data Source=SDO-URGI";
                
                //в ХР точно проблем не должно быть и не нужен установленный офис... библиотеки есть в винде.
                //создание обьекта подключения к SQLServer
	Connection = Новый COMОбъект("ADODB.Connection");
	Connection.ConnectionString =  стрПодключения;
	
	попытка
		Connection.Open();
	исключение
		Сообщить ("Проблемы с подключением к SQLserver" );
		Возврат;
	КонецПопытки;

                //Создание обьекта набора записей
	RS = Новый COMОбъект("ADODB.Recordset");
	
	//Запрос к базе данных на языке SQL запросов

	попытка
		RS.Open("SELECT dbo.Groups.name as grname FROM dbo.Groups GROUP BY dbo.Groups.name ORDER BY dbo.Groups.name", Connection );
	исключение
		Сообщить ("Проблемы с выполнением запроса к SQL");
		Возврат;
	КонецПопытки;
	 
	// Пример обработки полученного recordset

	Пока RS.EOF() = 0 Цикл
		Группа = RS.Fields("grname").Value;
		//Описание = RS.Fields("Description").Value;
		Сообщить(Группа); 
		//Обработка других полей
		
		RS.MoveNext();

	КонецЦикла;
	
	RS.Close();
	Connection.Close();