HandKot index - какой имеет тип?
Тип "строка" поэтому str(s)

2шыфл
Спасибо! Попробую.

HandKot,

Спасибо тебе огромное!
Может когда-нибудь научусь строить эти запросы....

Спасибо вам, ребята, кто помог мне разобраться с запросами!!!
Простые понял.

Теперь для меня встал вот какой вопрос:

_{conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & s & ";Extended Properties=dBASE IV;User ID=Admin;Password=;"
conn.Open
conn.Execute "Insert into [" & s2 & "] select [" & ss2 & "].* from [" & ss2 & "]"
conn.Execute "Delete from [" & s2 & "] " & vbCr & "where [" & s2 & "].[DELETED]=1"}

Есть файл, из которого вставляются данные, потом данные с определенным условием удаляются.
Так вот! Здесь есть загвоздка вот какого плана.

Поле "deleted" = 0 или 1. (типа "нет" и "да").

В базе, куда записи добавляются, после добавления могут появится одинаковые строки, но с разными значениями поля "deleted".

У меня две задумки:
1: сделать запрос на добавление так, чтобы он мог видеть, допустим, что если есть такая строка, то он меняет значение поля "deleted" с 0 на 1, а если нет, то добавляет строку.

2: каким-то образом сделать поиск и удаление дубликатов строк после всех операций.

Вот на 2 вариант по-идее можно сделать запрос с вычислением rst.recordcount и удаление одной из записей. Но это долго будет.

Строки сравниваются по полю "NUMBER". Оно не уникально (баг тех ко делал изначально эту всю бадягу). Исправить пытался, данные начинают теряться.

Если можно как-нибудь подойти к 1 варианту, то дайте намек какой, где копать надо.
у меня были подозрения на UPDATE. Тогда у меня не добавляются записи, а только "deleted" меняется.

Вот...

Шыфл,

Шыфлесли в случае чего ты можешь удалить те записи, у которых DELETED=1?

Я так и делаю.

Мне нужно в базе отыскать дубликаты, и один из них удалить. или хотя бы так же сделать его "deleted"=1

Извиняюсь за некорректно поставленый вопрос, просто время было позднее....

Шыфл! Hard! Помогите плиз! Что не так?
_{conn.Execute "update [" & s2 & "] SET [" & s2 & "].[DELETED] = '1' where [" & ss2 & "].[NUMBER] = [" & s2 & "].[NUMBER]"}

пишет "недостаточно параметров".

_{conn.Execute "update [" & s2 & "] SET [" & s2 & "].[DELETED] = '1' as t where [" & ss2 & "].[NUMBER] = [" & s2 & "].[NUMBER]"}


пишет "пропущен оператор". убирал апострофы у 1 не помогает.

делал так:
_{conn.execute "update [" & s2 & "] set [" & s2 & "].[DELETED]=1 where [" & s2 & "].[NUMBER] in " & _
"(select [t].[NUMBER] from [" & s2 & "] as t inner join [" & ss2 & "] as tt on [t].[NUMBER] = [tt].[NUMBER])"}


то же самое
Что делать?

Шыфл,

Спасибо! Только что докопался!

_{conn.Execute "update [" & s2 & "] SET [" & s2 & "].[DELETED] = '1' where [" & s2 & "].[NUMBER] in " & _
"(select [t].[NUMBER] from " & ss2 & " as t inner join [" & s2 & _
"] as tt on [t].[NUMBER] = [tt].[NUMBER])"}



ошибка была после where. у меня стояла ss2 а нужно было s2. Вот!

Ну это-то ладно! Это круто!
а вот приблизительно как можно сделать запрос так, чтобы было что-то примерно такое

_{conn.Execute "update [" & s2 & "] SET [" & s2 & "].[DATEDEL] = [" & ss2 & "].[DATEDEL] where [" & s2 & "].[NUMBER] in " & _
"(select [t].[NUMBER] from " & ss2 & " as t inner join [" & s2 & _
"] as tt on [t].[NUMBER] = [tt].[NUMBER])"}


сейчас делаю перебирая рекордсет, но это долговато...

Я понимаю что нужно прописать что-то типа [" & ss2 & "].[DATEDEL] as XXX. Но не работает. Пишет что пропущен оператор. Где мой косяк?

Кстати! С прошедшими праздниками!

Да и ещё! У меня такая штука вылазит "данный метод сортировки не поддерживается системой".
Но только после первого запуска операций! А если второй, третий разы кнопку жать, то все без проблем. почему может быть? Работаю через драйвер MS Jet4.0