Сквозной поиск в базе по всем таблицам

← →
гомер (2003-02-03 12:00) [0]

У меня есть база. В ней >300 таблиц, >700 представлений, а процедур вообще полторя тысячи. В родной проге я могу редактировать эту (ODBC) базу. Я хочу узнать где конкретно эта инфа хранится.

Предполагаю вывод: Талица1 - Поле1

Есть ли готовое средство для решения этой задачи?

← →
гомер (2003-02-03 12:10) [1]

бред, однако

← →
гомер (2003-02-03 12:46) [2]

сам такой

← →
Max Zyuzin © (2003-02-03 14:05) [3]

Однако раздвоение личности налицо :)
В общем объясни какая именно у тебя база, ODBC - это средство доступа, если я не совсем еще все забыл :)

← →
гомер (2003-02-03 14:18) [4]

говорю база большая

← →
Max Zyuzin © (2003-02-03 14:23) [5]

Эээ ммм да... очень конкретно получилось...

← →
гомер (2003-02-03 14:29) [6]

бред перманентен

← →
-=Sergeante=- © (2003-02-03 16:17) [7]

Поиск в метаданных?

← →
JibSkeart © (2003-02-03 16:36) [8]

Я хочу узнать где конкретно эта инфа хранится.
Вы сами то свой вопрос поняли ??
Какая инфа и что вас конкретно интересует ??

Сдесь к сожалению телепатов нету :)

← →
passm © (2003-02-03 16:40) [9]

Кажется, человек заблудился в базе.
Где-то натыкался на фразу:"База данных выходит за рамки человеческого понимания." :))

← →
roottim (2003-02-03 16:59) [10]

:-))))))) клевый пост!!... до сих пор ржу!!!
супер натс!!

← →
BlackTiger (2003-02-03 20:52) [11]

гомер!
Где такой заборной травы достал, а?

Во несет-то! :)))

В принцЫпе, берешь АДО, коннектисссся к базе, получаешь список всех таблиц/вьюшек, для каждой таблицы/вьюшки получаешь списки полей.
Потом в цЫкле генеришь запросы типа
for i := 0 to TablesList.Count - 1 do begin sql := "SELECT * FROM ["+Tables[i]+"] WHERE "; //... //Здесь получаешь список полей и заносишь его в FieldsList //... for j:= 0 to FieldsList.Count - 1 do begin if j = 0 then sql := "(["+FieldsList[j]+"] LIKE ""%"+VALUE_TO_FIND+"%"")" else sql := " OR (["+FieldsList[j]+"] LIKE ""%" + VALUE_TO_FIND + "%"")" ; end; Query1.SQL.Clear; Query1.SQL.Add(sql); Query1.Open; if not Query1.Eof then begin //... // Регистрируешь, что что-то гдето нашел //... end; Query1.Close; end;

← →
BlackTiger (2003-02-03 20:55) [12]

Да, еще забыл сказать!!!

Предупреди своих потомков (оставь запись в завещании) чтобы дождались результатов! :)))

Вызвал гомерический хохот у местного населения.

Сквозной поиск в базе по всем таблицам Найти похожие ветки