Популярные вопросы по тегу MS-ACCESS
Экспорт набора записей в электронную таблицу
... Dept = rsGroup!DeptName Dim rsExportSQL As String rsExportSQL = "SELECT * FROM ContactDetails_SurveySoftOutcomes " _ & "WHERE (((ContactDetails_SurveySoftOutcomes.DeptName)='" & Dept & "'))" Dim rsExport As DAO.QueryDef Set rsExport = CurrentDb.CreateQueryDef("myExportQueryDef", rs ...
Почему мой .setfocus игнорируется?
... вводить число, нажимать 7 клавишу ВВОД и позволять сценарию делать 6 что-то. Для скорости поле должно оставаться 5 в фокусе после завершения DoStuff(). Однако, хотя 4 я уверен, что DoStuff() запущен, фокус всегда переходит ...
Получить имя текущей функции VBA
... 6 которой произошла ошибка. Кто-нибудь знает, как 5 это можно сделать? [EDIT] Спасибо всем, я 4 надеялся, что существует недокументированный 3 трюк для самоопределения функции, но этого 2 явно не существует. Думаю, я останусь со 1 своим текущим кодом: Option Compare Database: Option Explicit: Const cMODULE$ = "basMisc" Public Function gfMisc_SomeFunction$(target$) On Error GoTo ...
Попытка устранить "недопустимое использование Null" в VBA
... eased, resolved, consultNotes As Boolean Dim age As Variant givenNames = Null familyName = Null preferredName = Null gender = Null dob = Null comments = Null deceased = False resolved = False carer = Null age = Null consult ...
Как работать с файлами доступа .mdb с помощью python
... и, как открыть файл .mdb в Python? Обычно 5 мне нравится включать какой-то код, чтобы 4 начать обсуждение, но я не знаю, с ...
Импортируйте лист Excel в Access с помощью VBA
... ) DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel8, "COR Daily", StrFileName, True Else Exit Sub End If End With End Sub Следует ли установить 2 для StrFileName значение 'StrFileName'&'.Worksheetname'? Это подходящая 1 схема именования для этого? что-то вроде: StrFileName = StrF ...
Проблема с пустым текстовым полем
... доступа. В случае нажатия кнопки я хочу 9 увидеть, пусто ли текстовое поле, если это 8 так, ничего не будет выполнено. Поэтому 7 я использую If Me.textbox.Value = Null Th ...
VBA Not IsNull
... ора условий 7 появляется окно ввода с запросом целого 6 числа. Пока все хорошо. Private Sub Command10_Click() If Not IsNull(mrf) Then If min <> max Then If qty <= min Then mrf = GetParamValue End If End If End If End Sub Проблема в том, что 5 Not IsNull игнорируется. ...
Получить значения столбцов выбранной строки многоколоночного списка доступа
... олбца 6 выбранной строки в многоколоночном списке? Я 5 заполняю список, задав для свойства RowSource 4 строку SQL. BoundColumn установлено значе ...
Доступ к VBA | Как заменить части строки другой строкой
... чтобы я мог прикрепить 3 функцию к другому столбцу. Я не уверен, с 2 чего начать, поэтому буду благодарен за 1 любой вклад. ...
MS Access Определить элемент списка, нажатый на событие щелчка
... затронут во время события 9 щелчка. Итак, если пользователь нажимает 8 «Col2-How» в приведенном выше примере, как 7 я могу определить, что была нажата запись? Или, если 6 кто-то отменит выбор первой записи, мне 5 нужно будет знать. Есть под ...
Microsoft Access сжимает несколько строк в таблице
... глядит 2 примерно так: Name Day CustomerA Monday CustomerA Thursday CustomerB Tuesday CustomerB Friday CustomerC Wednesday CustomerC Saturday Я хотел бы получить запрос, который 1 возвращал бы такие результаты: Name ALLDays CustomerA Monday, Thursd ...
Действие или событие заблокировано отключенным режимом.
... 7 мог выполнять запросы, обновлять данные 6 и удалять данные. Сегодня я открыл базу данных 5 Access, чтобы завершить миграцию данных, и 4 теперь получаю след ...
Как отобразить окно сообщения с символами Юникода в VBA?
... У меня есть строка, содержащая символы Юникода 4 в VBA. Я хочу отобразить эту строку в содержащем 3 ее окне сообщен ...
Как подключить PHP к базе данных Microsoft Access
... е время я столкнулся с новой проблемой 16 - разработать сайт с использованием Microsoft 15 Access в качестве основной базы данных вместо 14 mysql. Раньше я не использовал MS Access 13 и хотел бы узнать, как это сделать. Я просмотрел 12 веб-сайт w3c на W3schools, но код выдает ошибку Предупреждение: odbc_connect() [function.odbc-connect]: ...
Как сказать Is Not Null в VBA
... ледующее выражение. Я 2 пытаюсь сказать «если второе поле не равно 1 нулю» ...
Ms Access Query: объединение строк в запрос
... ледующей информацией: ColumnA ColumnB 1 abc 1 pqr 1 xyz 2 efg 2 hij 3 asd У меня вопрос: как 5 связать значения во втором столбце со значением 4 строки на основе первого столбца. Мн ...
Как я могу объединить две таблицы, но вернуть только те строки, которые не совпадают?
... Hour Мне в основном нужно присоединяться 14 к этим таблицам, когда их идентификаторы, даты 13 и часы совпадают. Однако я хочу вернуть 12 только те результаты из таблицы 1, которые 11 не совпадают с результатами в таблице 2. Я 10 знаю, что это кажется простым, но я застрял 9 в том факте, что в таблице 1 есть несколько 8 строк, которые совпадают с таблицей 2 (для 7 каждого часа ...
ДОСТУП К коду VBA для удаления таблицы, если она существует
... 15 файлы импорта, и мне нужно запустить макрос 14 или VBA, чтобы проверить, существуют ли 13 они, а затем, если они есть, удалить их. Моя 12 таблица называется «TempImport1» Я исследовал 11 это с помощью поиска в Google и наткнулся 10 на некоторые VBA, которые могут работать, но 9 я теряюсь, пытаясь понять, как поместить 8 код в модуль или вспомогательную кнопку. Раньше 7 я вырезал / вставлял код VBA под функцию 6 кнопки, и он работал, ...
Как передать массив функции в VBA?
... количество элементов. Function processArr(Arr() As Variant) As String Dim N As Variant dim finalStr as string For N = LBound(Arr) To UBound(Arr) finalStr = finalStr & Arr(N) Next N processArr = finalStr End Function Вот как 4 я пытаюсь вызвать функцию: Sub test() Dim fString ...
Как открыть файл .accdb в Ubuntu?
... над которой я работаю, в 13 качестве операционной системы используется 12 Ubuntu Jaunty Jackalope. Мне были представлены 11 данные для проекта, над которым я работаю, в 10 виде файла .accdb, созданного Microsoft 9 Access. У меня нет копии Microsoft Access. У 8 меня установлен Open Office, и я хотел бы 7 уста ...
Получение таблиц доступа MS и их размещение во фреймах данных в Python
... ELECT * FROM table WHERE INST = '796116'") dataf = DataFrame(qry.fetchall()) print(dataf) это 10 помещает данные во фрейм данных, но вторая 9 строка представляет собой список. Мне нужно, чтобы 8 приведенный ниже фрагмент был в 4 отдельных 7 столбцах, а не в 2 со списком. 0 (u'RM257095', u'c1', u'796116') 1 (u'RM257097', u'c2', u'796116') 2 (u'RM257043', u'c3', u'796116') 3 (u'RM257044', u'c4', u'796116') Я использовал 6 такие модули ...
Ручная установка 64-разрядных драйверов ODBC для MS Access при наличии 32-разрядного Office
... айверы ODBC 16 для 64-разрядной версии MS Access. Удаление 15 32-разрядного Office и установка 64-разрядного 14 Office невозможны из-за надстроек, которые 13 использует наша компания. Я загрузил AccessDatabaseEngine_x64.exe 12 и с помощью WinRar и Universal Extractor 11 смог распаковать все файлы во временный 10 каталог. Я считаю, что у меня есть все необходимые 9 файлы, но я немного не уверен, что делать 8 дальше, и был бы призн ...
MS-Access -> ВЫБРАТЬ КАК + ЗАКАЗАТЬ = ошибка
... LECT COUNT(*) FROM Dw_Empresa WHERE grupo_produto='1' AND cod_regiao = d.cod_regiao) as total FROM Dw_Empresa d INNER JOIN tb_regiao r ON r.cod_regiao = d.cod_regiao ...
Доступ к vba: как отключить системные сообщения или подсказки?
... ния 6 или удаления Access спрашивает, хотите ли 5 вы обновить или удалить. Я хотел бы знать, есть 4 ли способ отключить эти системные сообщения 3 ...
Как увидеть настоящий SQL-запрос в Python cursor.execute с помощью pyodbc и MS-Access
... следующий код на Python (с pyodbc 4 для базы MS-Access). cursor.execute("select a from tbl where b=? and c=?", (x, y)) Это нормально, но в 3 целях об ...
Есть ли эквивалент функции SUBSTRING в MS Access SQL?
... запросе 2 MS Access, но SUBSTRING - неопределенная 1 функц ...
Зачем вообще нужны «Связи» между таблицами?
... ductExtended (`Product_ID` int, `Product_Size` int, `Product_Quantity` int); Со 9 следующими значениями: INSERT INTO tblProduct (`Product_ID`, `Product_Name`) VALUES (1, 'Shoes1'), (2, 'Shoes2'); И INSERT INTO tblProductExtended (`Product_ID`, `Product_size`, `Product_Quantity`) VALUES (1, 36, 20), (1, 37, 20), (1, 38, 30), (2, 36, 50), (2, 37, 60), (2, 37, 75); Очевидно, что Product_ID 8 в tblProdu ...
MS Access вызывает хранимую процедуру SQL Server
... то, я обращаюсь 8 к ним по имени, например [Customers]. Также у меня есть 7 хранимая процедура в SQL Server под названием 6 sp_CopyData, которую мне нужно вызвать из моего кода 5 VBA. Как я могу это сделать, не создавая 4 новое соединение с SQL Server (он у меня 3 у ...
Как отслеживать значения в словаре в окне просмотра Excel VBA?
... xcel VBA через dict As New Dictionary (и 15 добавляю ссылку на среду выполнения сценариев). Когда 14 я пытаюсь отслеживать их во время отладки, я 13 вижу только те ключи, которые лежат в словаре, но 12 не соответствующие значения каждого ключа. Есть 11 ли способ увидеть и ценность? Для меня это 10 упростило бы отладку. ИЗМЕНИТЬ: Судя по вашим ответам, простого 9 решения нет, но я могу сделать ...
Выберите элемент из ComboBox
... е. Я 8 написал код VBA для события загрузки формы, чтобы 7 найти SubTopicID в таблице, и соответствующий SubTopic выбран 6 в ComboBox. Мой текущий код выглядит примерно 5 так: Set rsST = dbs.OpenRecordset(strSqlst) For i = 0 To Me.cmbSubTopic.ListCount - 1 If Me.cmbSubTopic.Column(0, i) = rsST.Fields("SubTopicID").Value Then Me.cmbSubTopic.SetFocus Me.cmbSubTopic.Selected(i) = True Exit For End If ...
Как я могу получить значение несвязанного столбца в поле со списком?
... -1 2 Jim -1 3 Jane 0 Он 6 привязан к полю в моей форме в столбце 1, а 5 ширина моего столбца установлена на 0 4 "; 1"; 0 ", так что отображается только 3 имя. Что бы я действительно хотел сделать, это 2 выяснить, когда выбрана Джейн, что столбец 1 Active ...
Почему 30 декабря 1899 года является нулевой датой в Access / SQL Server, а не 31 декабря?
... 6 возник сегодня, и я знаю, что 1899-12-30 5 использовался как дата «по умолчанию» и 4 нулевая дата в Access и более стар ...
Как добавить логический столбец в ms-доступ через SQL в vb.net
... 0001 BOOLEAN" Я получаю 8 сообщение об ошибке "Синтаксическая ошибка 7 в определении поля" Спасибо за вашу помощь РЕДАКТИРОВАТЬ: Теперь 6 я хотел бы сделать по умолчанию null, а не false. Я 5 пробовал default null, и это все еще дает мне false, может 4 ли кто-нибудь помочь с этим? РЕЗУЛЬТАТ: Ба ...
Разница между событием «При открытии» и событием «При загрузке» для формы ввода данных
... или 9 «загружена») для использования, я хочу, чтобы 8 для каждой «группы параметров» не был выбран 7 ни один из ее ответов. Я знаю код VBA, который 6 можно использовать для этого. Я хочу знать 5 разницу между событием «При загрузке» и 4 событием «При открытии» для любой формы 3 ввода данных. Узнав раз ...
Преобразование запроса Access TRANSFORM / PIVOT в SQL Server
... ELSE 0 END) AS Expr1 SELECT [temp].[Description] FROM [temp] GROUP BY [temp].[Description] PIVOT [temp].[Perio ...
Связанная таблица ms Access 2010 изменить строку подключения
... сылка на связанную 9 таблицу с базой данных Sql Server. При наведении 8 указателя мыши на связанную таблицу я вижу 7 строку подключения 'ODBC;DRIVER=SQL Server;SERVER=10.0.0.1;UID=testdb;APP=Microsoft Office 2003;WSID=abc;TABLE=dbo.user' Это похоже на связанную 6 ...
Как обновить форму доступа
... ние MS Access, в котором 10 все формы являются модальными. Однако после 9 изменения данных в форме я хочу обновить 8 родительскую форму этой формы новыми данными. Есть 7 ли способ это сделать. Для дальнейшего уточнения: Предположим, существует 6 две формы: ф ...
Преобразование времени UTC в местное
... ня есть приложение MS Access, которое 14 используется в двух разных часовых поясах. Разница 13 составляет 7 часов. Мне нужно было найти 12 время, когда оба офиса отключены, чтобы 11 я мог закрыть их базы данных, а также выполнить 10 сжатие, восстановление и резервное копирование. Таким 9 образом, мне не нужно создавать два отдельных 8 интерфейса, и я сообщаю о закрытии базы 7 данных: одну в 10:00, а другую в 4:00. Я ...
Экспорт всех SQL-запросов MS Access в текстовые файлы
... ues, тогда я хотите 5 извлечь SQL в файл с именем q_warehouse_issues.sql Я 4 НЕ ХОЧУ ЭКСПОРТИРОВАТЬ НАБОР РЕЗУЛЬТАТОВ 3 ЗАПРОСА, ТОЛЬКО SQL! Я знаю, что могу сделать 2 это ...
Доступ к VBA: можно ли сбросить обработку ошибок?
... шибок после того, как он был использован? Set objexcel = CreateObject("excel.Application") objexcel.Visible = True On Error GoTo Openwb wbExists = False Set wbexcel = objexce ...
Access 2010 VBA запрашивает таблицу и просматривает результаты
... олнить 3 для таблицы. С результатами я хочу что-то 2 сделать. В моей голове псевдокод: var q = "select * from table where some condition"; var results = db.getResu ...
Альтернатива coalesce в Access SQL
... CT ProductId, COALESCE(Price, 0) FROM Products Как сделать ...
SQL для запроса текста в доступе с апострофом в нем
... О'Нил) в 4 именах столбцов tblStudents в базе данных Access, однако 3 Access сообщает о синтаксической ошибке 2 с инс ...
Свойство Persist Security Info = true и Persist Security Info Property = false
... Info=true и Persist Security Info=false Можете ли вы сказать мне, в 2 чем разница между ними, и если я не добавлю 1 это в свое соединение, что произойдет? connect.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12 ...
Как подключить клавишу Enter к кнопке "Отправить"
... ле в данный момент находится в фокусе, нажатие 5 Enter запустит сценарий отправки. Итак, как 4 связать клавишу Enter с кнопкой "Отправить"? Лучше 3 всего создать событие OnKeyPress для каждого 2 активированного текстового поля. По понятным 1 причи ...
Как проверить, есть ли у определенного элемента управления фокус?
... еня есть форма доступа 2007, и я хочу 5 проверить, имеет ли конкретный элемент управления 4 (кнопка переключения) фокус, что-то вроде: if gotfocus(mytoggle) then dosomething endif или 3 может быть та ...
Время ожидания запроса ADODB
... Sets = False SQL Support = 283 Catalog Location = 1 Catalog Term = database Catalog Usage = 15 Rowset Conversions on Command = True Extended Properties = Cache Authentication = True Encrypt Password = Persist Encrypted = Persist Security Info = False Asynchronous Processing = 0 Connec ...
ADODB.Connection и ADODB.Recordset - тип, определяемый пользователем, не определен
... rosoft.ACE.OLEDB.12.0;Data Source=\\Bmcstr01\grp\SRV\Allsrv\Resource Planning\Forecasting & MI\MI\backup DM\HH Complaints\Database (TCS Version)\Complaints DB.accdb;" Set rs = New ADODB.Recordset rs.Open "Access_Log", cn, adOpenKeyset, adLockOptimistic, adCmdTable rs.Filter = "ID='335266' AND Work='Test'" rs("Login").Value = "02/07/2018" rs.Update rs.Close Set rs = Nothin ...
Вставить запись в таблицу, если запись не существует в другой таблице - с дополнительным поворотом
... гой (table2) .., а затем вставить новые 12 записи в table2, основанные на записях в 11 table1, следующим образом: [таблица1] file_index: имя 10 файла [таблица2] file_index: имя_файла Я хочу: Выберите 9 все записи из таблицы 1, где [имя файла] похоже 8 на aud и соответствующее значение [file_index] которого 7 не существуют в таблице 2 с полем [Celeb_name] = 'Audrey 6 Hepburn' Выбрав этот вариант, я хоч ...
