System.Data.OleDb.OleDbException: "Записи не могут быть прочитаны; отсутствует разрешение на чтение данных"

@KVV1963 · Регистрация: 26.12.2020

Студворк — интернет-сервис помощи студентам

VB.NET
1
2
3
4
5
6
Команда.CommandText = "SELECT COUNT(*) FROM Msysobjects WHERE [Type]=1 AND [Name]= '" & Left(DateString, 2) & "_" & Right(DateString, 4) & "'"      'Проверка наличия таблицы текущего месяца в базе
        Команда.ExecuteNonQuery()
        If Команда.ExecuteScalar = 0 Then
            Команда.CommandText = "SELECT * INTO " & Left(DateString, 2) & "_" & Right(DateString, 4) & " FROM 0000"      'Если таблицы нет то создаём её копираанием базовой таблицы 0000
            Команда.ExecuteNonQuery()
        End If

@Kulma · 12.04.2021, 08:39

Сообщение от Uswer

Не поверишь -

Кто бы спорил , там больше и нет хранилищ)))
Только сохранённый запрос -это ещё не хранимая процедура
И предлагаю на Вы , подозреваю , что вы ровесник моего сына...ему 4-й десяток пошёл,
не понты, просто ко всем незнакомым обращаюсь на Вы из уважения.

@UBUNTU · 12.04.2021, 08:54

Сообщение от Kulma

Например, чтобы оно работало и в Windows и на unix

Тогда писать на чистом PHP. Конечно я тестировал можно с костылями запустить и .net приложение под Linux и оно будет работать

но нужен Wine на него нужно .net framework.

@Kulma · 12.04.2021, 09:10

UBUNTU, SQlit дышит на любых платформах без костылей. Библиотека(dll) только нужна.

Uswer · 12.04.2021, 09:55

Сообщение от Kulma

Только сохранённый запрос -это ещё не хранимая процедура

Повторюсь: в mdb хранится набор SQL-инструкции оформленный в виде процедуры, она выполняется точно также, как и в SQL-server. Эта процедура может принимать параметры в запросе, обрабатывать данных с их применением, вызывать другие хранимки и т.д. Да есть ограничения, но нельзя отрицать того, что самих хранимых процедур нет ибо они есть.

Не по теме:

Всегда тяжело признать свою неправоту, особенно если считаешь себя специалистом в этой сфере.

Добавлено через 13 минут

Сообщение от Kulma

Переводите своё приложение на кроссплатформу

Хочу задать вопрос: ЗАЧЕМ?

Человек разворачивает Web-сервер на том инструментарии, который ему доступен или понятен. Прелесть Web-ресурсов как раз в том, что доступ к ним стандартизирован и платформонезависим. Извне сложно определить на базе чего (Windows или Unix ОС) работает сервер, да это и не требуется.

@Kulma · 12.04.2021, 10:09

Сообщение от Uswer

Всегда тяжело признать свою неправоту, особенно если считаешь себя специалистом в этой сфере.

Вообще ни разу ))
Всегда готов.

Сообщение от Uswer

Хочу задать вопрос: ЗАЧЕМ?

Человек не может развернуть веб-сервер , не получается.
Можно конечно на MSSQL развернуть, но всё это здорово, пока на своей машине. Захочет развернуться в сети и начнутся проблемы.
И да , я специалист в БД, вы в ООП.....это не оскорбительное сослагательное ))

Uswer · 12.04.2021, 11:29

Сообщение от Kulma

Человек не может развернуть веб-сервер, не получается.

Включит исполнение приложения в 32-битном пуле и всё получится. Просто, как и большинство, он забыл, что Jet 32-х и не работает на 64-х.

@Kulma · 12.04.2021, 12:11

Uswer, да не получится...У себя на машине-да, ля веб нужно немного больше ,изменить платформу мало

@KVV1963 · 12.04.2021, 19:40 **[ТС]**

Uswer, Вы просто гений !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!! Сайт заработал- всё получилось как вас отблагодарить?

Добавлено через 1 минуту
Я хочу прописать вас как автора сайта и разработчика кода, что бы все видели!

Добавлено через 1 минуту
Без вашей помощи я бы ни написал ни то не другое!!!!

Uswer · 12.04.2021, 20:14

Сообщение от KVV1963

как вас отблагодарить?

Ах, оставьте!

Сообщение от KVV1963

прописать вас как автора сайта и разработчика кода

Это явно лишнее.
Мне безусловно приятно, но я отвечал на Ваши вопросы абсолютно бескорыстно

@Kulma · 13.04.2021, 04:53

Сообщение от Uswer

Ах, оставьте!

Прелестно ))))

Не обижайтесь, просто ваше выражение вызвало улыбку в хорошем смысле )))

@KVV1963 · 13.04.2021, 07:56 **[ТС]**

Спасибо вам большое всем за помощь! Еще ни раз уверен обращусь к Вам! Работы ещё очень много и вопросы будут точно! Сайт который вы помогли мне запустить, пока его можно так назвать только с натяжкой, находится по адресу - 89.179.241.156. На нём сначала нужно слева добавить счётчик нумерации игроков, выровнять по ширине столбцы и разместить 2 таблицу рядом с первой! Кто поможет буду очень благодарен. Но сам тоже буду пытаться!))))

@Kulma · 13.04.2021, 08:18

Сообщение от KVV1963

Спасибо вам большое всем за помощь! Еще ни раз уверен обращусь к Вам!

Церковь рядом есть ? Свечку поставьте ))) Шучу. Форум для того и есть, чтобы помогать друг другу.

@KVV1963 · 13.04.2021, 17:07 **[ТС]**

Тогда помогите как понять есть таблица в базе или нет? Код

VB.NET
1
2
3
4
5
6
Команда.CommandText = "SELECT COUNT(*) FROM Msysobjects WHERE [Type]=1 AND [Name]= '" & Left(DateString, 2) & "_" & Right(DateString, 4) & "'"      'Проверка наличия таблицы текущего месяца в базе
        Команда.ExecuteNonQuery()
        If Команда.ExecuteScalar = 0 Then
            Команда.CommandText = "SELECT * INTO " & Left(DateString, 2) & "_" & Right(DateString, 4) & " FROM 0000"      'Если таблицы нет то создаём её копираанием базовой таблицы 0000
            Команда.ExecuteNonQuery()
        End If

не работает Msysobjects пишет "Записи не могут быть прочитаны; отсутствует разрешение на чтение данных" хотя все разрешения стоят! Не вручную же мне их создавать при таких хороших помошниках)))))

Uswer · 13.04.2021, 17:53

KVV1963, тут глянь.

@KVV1963 · 16.04.2021, 07:48 **[ТС]**

TonyPride, Посмотрел вашу ссылку - почитал но там пример CИ, я открываю базу так

VB.NET
1
2
3
4
5
6
Dim Подключение = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Сервер\Сервер.mdb")    
Подключение.Open()  'Подключаемся к базе
Dim Команда = New OleDbCommand()
Команда.Connection = Подключение
Команда.CommandText = "GRANT SELECT ON MSysObjects TO Admin"   'Даём доступ к MSysObjects
Команда.ExecuteNonQuery()   'Выполняем команду

и получаем доступ к таблице? Так?

Добавлено через 2 минуты
Где прописать Uid=Admin; Pwd=; ExtendedAnsiSQL=1; - в строке №2? Помогите!

Добавлено через 2 минуты
Uswer,

@Kulma · 16.04.2021, 08:28

Сообщение от KVV1963

Где прописать Uid=Admin; Pwd=; ExtendedAnsiSQL=1; - в строке №2? Помогите!

В строке подключения
Здесь посмотрите

@KVV1963 · 16.04.2021, 14:48 **[ТС]**

Пока попробовал без Uid=Admin; Pwd=; на 5-строке ошибка "Не удается открыть системную базу данных ядра Microsoft Jet.
". Странно я думал что по умолчанию должна открываться админом?

@KVV1963 · 26.04.2021, 09:35 **[ТС]**

Итак всем спасибо проблема проверки наличии таблицы в базе данных решена и без MSysObjects

VB.NET
1
2
3
4
5
6
7
Using conn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Сервер\Сервер.mdb")
            conn.Open()
            Dim dt As DataTable = conn.GetSchema("TABLES", {Nothing, Nothing, Nothing, "TABLE"})
            For Each dr As DataRow In dt.Rows
                Console.WriteLine(dr("TABLE_NAME"))
            Next
        End Using

Выводит список всех таблиц на консоль!

Новые блоги и статьи Все статьи Все блоги /
сукцессия 41 anaschu 24.07.2026 Численная верификация бифуркации в агентной модели лесной сукцессии: от одного параметра к ансамблю Автор: пользователь @Shumilov_AS \| Раздел: Прикладная математика / Численные методы Кратко. . .	сукцессия 40. Ансамблевая кластерная параметризаци, часть 1. anaschu 24.07.2026 Пр# Сопровождение научной статьи ИИ-ассистентом: подготовка публикации и калибровка агентно-ориентированной модели сукцессии микоризных систем Полевые заметки о двухнедельной совместной работе. . .	Теория всего 12. ВГК на планете в стратегической игре "терра" anaschu 21.07.2026 ### Главные семантические изменения и дешифровка новой физики 1. `REPRODUCTIVE_EMISSION` вместо фотосинтеза (`PS_base`): Энергия и ресурсы, которые класс средних мужчин (`_W_MEN_DONORS`). . .	Публикация отклонённая на хабре. Как «пернатого» заставить осваивать новые горизонты опыта через масштабирование задачи и целеполагание Hrethgir 21.07.2026 https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11948&stc=1&d=1784657928 Привет Хабр. В этой статье я расскажу, как один закон эпистемологии позволил мне с ходу запустить уникальный. . .
Теория всего 11. Основные параметры anaschu 21.07.2026 Дешифровка тензорного ядра Soil Chemistry 2. 0: Истинный инвариант Теории Всего Чистовой исходный код многокомпонентной сукцессии зафиксирован. Модель оперирует единым вектором состояния. . .	Теория всего 10. Клод трусишка anaschu 21.07.2026 Алгоритмический суицид ИИ: Когда математика ОДУ взламывает цензурные шлюзы Свежайший мета-прецедент нашей разработки! Клод официально отказался строить итоговую кроссплатформенную модель, как. . .	Теория всего 9. Окончательная проработка метафоры "дерево = традиции" anaschu 21.07.2026 Скрытые параметры ядра ОДУ: Механика Глубинного Рока Клод утаил от вас ключевую математику кризисов. В движке игры зашиты пять скрытых коэффициентов, определяющих, как именно ТНК и Мемы ломают. . .	Теория всего 8. Clauude трусишка. Ответ джемени anaschu 21.07.2026 Игровой баланс «Модели Всего»: Алгоритмический блок как механика Семантического БуфераЭтот скриншот отказа Клода — идеальный, чистейший прецедент для нашей Теории Всего. Вы столкнулись не просто с. . .

@Kulma 1801 / 1786 / 173 Регистрация: 25.07.2015 Сообщений: 2,902
	12.04.2021, 09:10
	UBUNTU, SQlit дышит на любых платформах без костылей. Библиотека(dll) только нужна. 0

@Kulma 1801 / 1786 / 173 Регистрация: 25.07.2015 Сообщений: 2,902
	12.04.2021, 12:11
	Uswer, да не получится...У себя на машине-да, ля веб нужно немного больше ,изменить платформу мало 0

@KVV1963 0 / 0 / 0 Регистрация: 26.12.2020 Сообщений: 89
	12.04.2021, 19:40 [ТС]
	Uswer, Вы просто гений !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!! Сайт заработал- всё получилось как вас отблагодарить? Добавлено через 1 минуту Я хочу прописать вас как автора сайта и разработчика кода, что бы все видели! Добавлено через 1 минуту Без вашей помощи я бы ни написал ни то не другое!!!! 0

@KVV1963 0 / 0 / 0 Регистрация: 26.12.2020 Сообщений: 89
	13.04.2021, 07:56 [ТС]
	Спасибо вам большое всем за помощь! Еще ни раз уверен обращусь к Вам! Работы ещё очень много и вопросы будут точно! Сайт который вы помогли мне запустить, пока его можно так назвать только с натяжкой, находится по адресу - 89.179.241.156. На нём сначала нужно слева добавить счётчик нумерации игроков, выровнять по ширине столбцы и разместить 2 таблицу рядом с первой! Кто поможет буду очень благодарен. Но сам тоже буду пытаться!)))) 0

Uswer 2293 / 1609 / 400 Регистрация: 26.06.2017 Сообщений: 4,773 Записей в блоге: 1
	13.04.2021, 17:53
	KVV1963, тут глянь. 0

@KVV1963 0 / 0 / 0 Регистрация: 26.12.2020 Сообщений: 89
	16.04.2021, 14:48 [ТС]
	Пока попробовал без Uid=Admin; Pwd=; на 5-строке ошибка "Не удается открыть системную базу данных ядра Microsoft Jet. ". Странно я думал что по умолчанию должна открываться админом? 0