Сообщений в теме: 764

[Big_A]

Здравствуйте, вопрос по Oracle и Delphi.

Вообщем нужна рекомендация... пишу проект суть не важна, проблема в том что обращаюсь к серверу через ODBC (предварительно установив Oracle client )потом создаю Alias в BDE, и в проекте пишу запросы через обычный компонент query указав Alias.
1.Запросы выполняется медленно.(данных мало)
2.Не уверен что этим способом можно редактировать или добавлять данные в таблицу.(еще не пробывал но догадываюсь) )
3.уверен есть метод подключения проще, подскажите (с клиентской машине) ??
4.какие компоненты порекомендуете?

Сообщение отредактировал Big_A: 12.06.2009, 20:54:15

[Jus]

Здравствуйте, вопрос по Oracle и Delphi.

Вообщем нужна рекомендация... пишу проект суть не важна, проблема в том что обращаюсь к серверу через ODBC (предварительно установив Oracle client )потом создаю Alias в BDE, и в проекте пишу запросы через обычный компонент query указав Alias.

насколько я помню, делфи может обращаться к ораклу и без ODBC.
Если я правильно понял, то в вашем случае обращение происходит так:
прога->BDE->ODBC->OracleClient->OracleSerber
Если в BDE создать алиас, который сразу на оракл указывает, то цепочка сократится:
прога->BDE->OracleClient->OracleServer
и быстродействие повысится

[Big Joe]

4.какие компоненты порекомендуете?

Несколько лет пользовался ODAC, всегда был доволен.

[CyberPunk]

Помигите написать SQL запрос к Базе данных Access. (раньше не работал с аксесовских сиквелом).

Есть база данных NSN_Inventory. В ней есть поля Serial_number и Data_source. Требуется удалить те записи , в которых Serial_number не уникален, а Data_source = "secondary".
Меня устроит и запрос который просто выберет записи с уникальным serial_number и записи с неуникальным serial_number, в которых data_source != "secondary"

Заранее благодарен...

[Rivfader]

Помигите написать SQL запрос к Базе данных Access. (раньше не работал с аксесовских сиквелом).

Есть база данных NSN_Inventory. В ней есть поля Serial_number и Data_source. Требуется удалить те записи , в которых Serial_number не уникален, а Data_source = "secondary".
Меня устроит и запрос который просто выберет записи с уникальным serial_number и записи с неуникальным serial_number, в которых data_source != "secondary"

Заранее благодарен...

В сиквеле можно сделать так.. (думаю отработает и в аксессе)

select * 
from
(	select
		Serial_Number,
		count(Serial_Number) as SerialCount
	from NSN_Inventory
	where Data_Source = 'secondary'
	group by Serial_Number
) cnt
where SerialCount = 1 /* одна уникальная запись, > 1 - больше одной */

Можно было через having - но я не знаю отработает ли в аксессе.

[Big Joe]

...

Меня устроит и запрос который просто выберет записи с уникальным serial_number и записи с неуникальным serial_number, в которых data_source != "secondary"
Заранее благодарен...

Юзал только Оракул. но думаю примерно будет выглядеть так:

Записи с уникальным serial_number:

select * from (select distinct serial_number, count(serial_number) as UN
from NSN_Inventory
group by serial_number)src where UN = 1

не уникальным serial_number, в которых data_source != "secondary"

select * from (select distinct serial_number, count(serial_number) as UN
from NSN_Inventory
where data_source <> 'secondary'
group by serial_number)src where UN > 1

Сообщение отредактировал Big Joe: 15.06.2009, 11:25:49

[CyberPunk]

спасибо !!!

Сообщение отредактировал CyberPunk: 15.06.2009, 16:35:04

[vrdev]

Здравствуйте, вопрос по Oracle и Delphi.

Вообщем нужна рекомендация... пишу проект суть не важна, проблема в том что обращаюсь к серверу через ODBC (предварительно установив Oracle client )потом создаю Alias в BDE, и в проекте пишу запросы через обычный компонент query указав Alias.
1.Запросы выполняется медленно.(данных мало)
2.Не уверен что этим способом можно редактировать или добавлять данные в таблицу.(еще не пробывал но догадываюсь) )
3.уверен есть метод подключения проще, подскажите (с клиентской машине) ??
4.какие компоненты порекомендуете?

Можно и проще подключаться.
1. Использовать ADO компоненты и подключаться через Oracle OleDb провайдер
2. Использовать сторонние компоненты, к примеру ODAC или DOA

[Severe_angel]

Кто юзает скрипты VBS нужны пару строк.
Нужно дописать в конце файла(txt) два параметра. При повторном запуске скрипта, если параметр уже существует то не дописывать(пропуск без изменений).
Вот скрипт по добавлении записи:

Function AppendFile(ByVal FilePath, ByVal Text)
AppendFile = False
Const ForAppending = 8, TristateUseDefault = -2
Dim fso, file
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FolderExists( fso.GetParentFolderName(FilePath) ) Then
Set file = fso.OpenTextFile(FilePath, ForAppending, _
True, TristateUseDefault)
file.Write text
file.Close
AppendFile =false
End If
End Function


call AppendFile("d:\setup.ini", " это параметр")

Конечно можно после изменений поставить скриптом атрибут "только чтение" и убрать отображение ошибки выполнения скрипта.
Есть какие соображения?

Сообщение отредактировал Severe_angel: 17.06.2009, 11:58:32

[Severe_angel]

вопрос решил, спасибо!

[Nort]

а где в алматы качественно могут обучить на 1с програмиста (для сдачи соответсвующего сертификата) так же интересно где обучают SQL ?

[Big_A]

"а где в алматы качественно могут обучить на 1с програмиста (для сдачи соответсвующего сертификата) так же интересно где обучают SQL ?"


Нигде, дома с книжками.

[Геральт]

Здравствуйте, вопрос по C#.
Требуется вызвать метод главной формы из объекта другого класса. Как мне получить ссылку на объект формы?

Ссылка на форму передается Application.Run(), поэтому объект всегда в памяти.

[Visual1]

Просто сохраните в переменной ссылку на главную форму после того как она будет создана, но перед тем, как передавать ее в Application.Run().

Сообщение отредактировал Visual1: 23.06.2009, 16:17:12

[Геральт]

Просто сохраните в переменной ссылку на главную форму после того как она будет создана, но перед тем, как передавать ее в Application.Run().

static class Program
	{
		/// <summary>
		/// The main entry point for the application.
		/// </summary>
		[STAThread]
		static void Main()
		{
			Form Main1 = null;
			Application.EnableVisualStyles();
			Application.SetCompatibleTextRenderingDefault(false);
			Application.Run(Main1 = new MainForm());
		}
	}

Error 1 The name 'Main1' does not exist in the current context

static class Program
	{
		/// <summary>
		/// The main entry point for the application.
		/// </summary>
		Form Main1 = null;
		[STAThread]
		static void Main()
		{
			Application.EnableVisualStyles();
			Application.SetCompatibleTextRenderingDefault(false);
			Application.Run(Main1 = new MainForm());
		}
	}

Error 1 'Program.Main1': cannot declare instance members in a static class

[Геральт]

http://ru.wikipedia....проектирования)

[Visual1]

static class Program  

	{
		//...
		static void Main()
		{
			Form Main1 = null;
			Application.EnableVisualStyles();
			Application.SetCompatibleTextRenderingDefault(false);
			Application.Run(Main1 = new MainForm());
		}
	}

Класс Program был определен как static. Если так, то все его члены должны быть статическими.

Error 1 The name 'Main1' does not exist in the current context

Почему не сделать как обычно:

Form Main1 = new MainForm();
Application.Run(Main1);

?

[Zulkar]

А как вы выдернете? Вот простейший вариант синглтона. По моему это очевидно.

class MainForm{
  static MainForm _mainFormInstance=null;
  private MainForm(){ // конструктор делаем защищенным
  }
  public static MainForm getInstance(){
	  if(_mainFormInstance == null)
		 _mainFormInstance = new MainForm();
	  return  _mainFormInstance;
  }
}

И обращаться из любого места как MainForm.getInstance(); Объект будет создан только один раз.

[xxel]

Увлечение костылями древнего С++ (без которых он жить не может) в современной жизни мало востребовано

	static class Program
	{
		static private Form1 fMainForm = null;
		static public Form1 mainForm { get { return fMainForm; }}

		[STAThread]
		static void Main()
		{
			Application.EnableVisualStyles();
			Application.SetCompatibleTextRenderingDefault(false);
			Application.Run(fMainForm = new Form1());
		}
	}

Обрашение более чем очевидно и читаемо

Program.mainForm

[Zulkar]

И в чем разница? Вы прописали property вместо метода. Разницы никакой не вижу между кодами.