#ifdef flagODBC
bool Login(ODBCSession& session)
#else
bool Login(OleDBSession& session)
#endif
{
	LoginDlg dlg;
	dlg.Icon(HollyImg::holly());
	LoadFromFile(dlg, ConfigFile("login.cfg"));
	String s = GetIniKey("DATABASE");
	if(s.GetCount())
		dlg.database <<= s;
#ifndef _DEBUG
	dlg.password <<= Null;
	dlg.password.Password();
#endif
	for(;;) {
		if(dlg.Run() != IDOK) {
			StoreToFile(dlg, ConfigFile("login.cfg"));
			return false;
		}
	#ifdef PLATFORM_WIN32
		String provider = Nvl(GetIniKey("CONNECT"), "SQL Server Native Client 10.0");
	#else
		String provider = Nvl(GetIniKey("CONNECT"), "MSSQL");
	#endif
	#ifdef flagODBC
		#ifdef PLATFORM_POSIX
			String dfn = "/usr/lib/libtdsodbc.so.*";
			SetIfExists(dfn, "/usr/local/lib/libtdsodbc.so.*");
			SetIfExists(dfn, GetHomeDirFile("libtdsodbc.so.*"));
			SaveFile(GetHomeDirFile(".odbc.ini"),
				String().Cat() << "[MSSQL]\n"
					<< "Driver = " << dfn << '\n'
					<< "Description = MSSQL\n"
					<< "ServerName = MSSQL\n"
			);
			String c =
				"[MSSQL]\n"
				"tds version = 8.0\n"
				"client charset  = WINDOWS-1250\n"
			;
			String host = ~dlg.database;
			String port;
			int q = host.ReverseFind(',');
			if(q >= 0)
				c << "host = " << host.Mid(0, q) << '\n'
				  << "port = " << host.Mid(q + 1) << '\n';
			else
				c << "host = " << host << '\n';
			SaveFile(GetHomeDirFile(".freetds.conf"), c);
			String cs = "DSN=MSSQL;SERVER=MSSQL;";
		#else
			String cs = "Driver={SQL Server Native Client 10.0}";
			cs << ";Server=" << ~dlg.database << ';';
		#endif
		if(dlg.windows)
			cs << "Trusted_Connection=Yes;";
		else
			cs << "UID=" << ~dlg.username << ";PWD=" << ~dlg.password << ';';
		if(session.Connect(cs))
			break;
	#else
		String propset;
		propset << "Provider=" << provider << ";Data Source=" << ~dlg.database
		        << ";Trusted_Connection=Yes;";
		if(dlg.windows ? session.OpenProp(propset) :
		   session.Open(~dlg.username, ~dlg.password, ~dlg.database, provider))
			break;
	#endif
		Exclamation("[A4 Connection failed!]&[A1 " + DeQtfLf(session.GetLastError()));
	}
	StoreToFile(dlg, ConfigFile("login.cfg"));
	return true;
}