Содержание
- Как исправить ошибку Microsoft Access 3075
- Анализ «Microsoft Access Error 3075»
- Что на самом деле вызывает ошибку времени выполнения 3075?
- Распространенные проблемы Microsoft Access Error 3075
- Истоки проблем Microsoft Access Error 3075
- Access VBA — run time error ‘3075’
- 1 Answer 1
- Run-time error 3075
- 1 Answer 1
- Access VBA Run-time Error 3075
- Runtime Error 3075 MS Access VBA when running query
- 1 Answer 1
Как исправить ошибку Microsoft Access 3075
Номер ошибки: | Ошибка 3075 | |
Название ошибки: | Microsoft Access Error 3075 | |
Описание ошибки: | |1 in query expression ‘|2’. | |
Разработчик: | Microsoft Corporation | |
Программное обеспечение: | Microsoft Access | |
Относится к: | Windows XP, Vista, 7, 8, 10, 11 |
Анализ «Microsoft Access Error 3075»
Эксперты обычно называют «Microsoft Access Error 3075» «ошибкой времени выполнения». Разработчики, такие как Microsoft Corporation, обычно проходят через несколько контрольных точек перед запуском программного обеспечения, такого как Microsoft Access. Тем не менее, возможно, что иногда ошибки, такие как ошибка 3075, не устранены, даже на этом этапе.
Некоторые люди могут столкнуться с сообщением «|1 in query expression ‘|2’.» во время работы программного обеспечения. В случае обнаруженной ошибки 3075 клиенты могут сообщить о наличии проблемы Microsoft Corporation по электронной почте или сообщать об ошибках. Затем Microsoft Corporation исправит ошибки и подготовит файл обновления для загрузки. Таким образом, когда ваш компьютер выполняет обновления, как это, это, как правило, чтобы исправить проблемы ошибки 3075 и другие ошибки внутри Microsoft Access.
Что на самом деле вызывает ошибку времени выполнения 3075?
Проблема с исходным кодом Microsoft Access приведет к этому «Microsoft Access Error 3075», чаще всего на этапе запуска. Мы можем определить происхождение ошибок ошибки 3075 во время выполнения следующим образом:
Ошибка 3075 Crash — это распространенная ошибка 3075 во время выполнения ошибки, которая приводит к полному завершению работы программы. Это возникает, когда Microsoft Access не реагирует на ввод должным образом или не знает, какой вывод требуется взамен.
Утечка памяти «Microsoft Access Error 3075» — ошибка 3075 утечка памяти приводит к увеличению размера Microsoft Access и используемой мощности, что приводит к низкой эффективности систем. Возможные причины из-за отказа Microsoft Corporation девыделения памяти в программе или когда плохой код выполняет «бесконечный цикл».
Ошибка 3075 Logic Error — «логическая ошибка», как говорят, генерируется, когда программное обеспечение получает правильный ввод, но генерирует неверный вывод. Это видно, когда исходный код Microsoft Corporation включает дефект в анализе входных данных.
Основные причины Microsoft Corporation ошибок, связанных с файлом Microsoft Access Error 3075, включают отсутствие или повреждение файла, или, в некоторых случаях, заражение связанного Microsoft Access вредоносным ПО в прошлом или настоящем. Возникновение подобных проблем является раздражающим фактором, однако их легко устранить, заменив файл Microsoft Corporation, из-за которого возникает проблема. В качестве последней меры мы рекомендуем использовать очиститель реестра для исправления всех недопустимых Microsoft Access Error 3075, расширений файлов Microsoft Corporation и других ссылок на пути к файлам, по причине которых может возникать сообщение об ошибке.
Распространенные проблемы Microsoft Access Error 3075
Типичные ошибки Microsoft Access Error 3075, возникающие в Microsoft Access для Windows:
- «Ошибка приложения Microsoft Access Error 3075.»
- «Microsoft Access Error 3075 не является приложением Win32.»
- «Возникла ошибка в приложении Microsoft Access Error 3075. Приложение будет закрыто. Приносим извинения за неудобства.»
- «Не удается найти Microsoft Access Error 3075»
- «Отсутствует файл Microsoft Access Error 3075.»
- «Ошибка запуска в приложении: Microsoft Access Error 3075. «
- «Не удается запустить Microsoft Access Error 3075. «
- «Ошибка Microsoft Access Error 3075. «
- «Ошибка в пути к программному обеспечению: Microsoft Access Error 3075. «
Обычно ошибки Microsoft Access Error 3075 с Microsoft Access возникают во время запуска или завершения работы, в то время как программы, связанные с Microsoft Access Error 3075, выполняются, или редко во время последовательности обновления ОС. Выделение при возникновении ошибок Microsoft Access Error 3075 имеет первостепенное значение для поиска причины проблем Microsoft Access и сообщения о них вMicrosoft Corporation за помощью.
Истоки проблем Microsoft Access Error 3075
Большинство проблем Microsoft Access Error 3075 связаны с отсутствующим или поврежденным Microsoft Access Error 3075, вирусной инфекцией или недействительными записями реестра Windows, связанными с Microsoft Access.
В частности, проблемы Microsoft Access Error 3075 возникают через:
- Поврежденная или недопустимая запись реестра Microsoft Access Error 3075.
- Вирус или вредоносное ПО, которые повредили файл Microsoft Access Error 3075 или связанные с Microsoft Access программные файлы.
- Вредоносное удаление (или ошибка) Microsoft Access Error 3075 другим приложением (не Microsoft Access).
- Другое программное приложение, конфликтующее с Microsoft Access Error 3075.
- Неполный или поврежденный Microsoft Access (Microsoft Access Error 3075) из загрузки или установки.
Совместима с Windows 2000, XP, Vista, 7, 8, 10 и 11
Источник
Access VBA — run time error ‘3075’
For starters, I have practically no knowledge of VBA Code. What I’m trying to do here is take information from a form and subform and enter it as a new record into a table that is set as the record source of the subform.
The error code reads: run time error ‘3075’:
Syntax Error (Missing Operator) in query expression ‘GENERAL METAL (CUBEX)’.
Also I apologize for how messy it is. I honestly just tried to copy what I saw in a YouTube video that kind of represented what I was trying to do.
1 Answer 1
This part concerns me: ‘» & Me.moldlocation & _ Me.specialconcerns & «‘
It looks like you’re missing the closing quote before the line suppression. Any time you see «& _» it’s telling the code that you’re moving to a new line, but to supress that line break when the code is run. You generally need to close up your quotes before you do that, just like was done in the other line suppressor: qtycast) » & _ » VALUES(
So, in short, give this a shot:
Since I don’t know your data, I’ll just remind you that anything that’s TEXT needs to be enclosed with single quotes (i.e. ‘» & Me.grade & «‘,) and anything that’s an INT does not need the single quote (i.e. » & Me.customer & «,). Just make sure all your variables are enclosed accordingly or that will cause an error as well.
If this answers your question, please don’t forget to give the answer a checkmark. Thanks!
Источник
Run-time error 3075
I do wish to create a multiple filter function in VBA to sort a subform from controls on the main form.
Here is my code
However I keep getting a run-time error 3075 (Syntax error (missing operator) in query expression.
I can see my variables in the error message though.
I know it’s my query expression that is malformed. But I can’t figure what.
1 Answer 1
Okay, I feel compelled to answer this because it seems like you’re fundamentally not getting something, or more than one thing, and I’m not getting through with my comments.
I don’t know if you’re just copying and pasting code without understanding it, or in such a rush that you aren’t taking the time to understand it.
Let’s start with:
The piece of code lngLen = Len(strWhere) — 5 If lngLen Is supposed to get rid of that tail
does two things. It sets lngLen equal to the length of your strWhere variable, minus 5. It then checks to see if the length is less than or equal to 0.
If your strWhere statement was.
. you would set lngLen equal to 13.
Since 13 is not less than or equal to zero, we move into your ELSE statement, and set the filter.
See? You’ve still got your trailing AND because you never update your strWhere variable.
Here is what I tried Me.Sub_Desi_Schedule.Form.Filter = Len(strWhere) — 5 and Me.Sub_Desi_Schedule.Form.Filter = lngLen in both cases, the error is gone. However no filters are applied.
So now you’re just doing
which is the equivalent of
That doesn’t accomplish anything. You’re setting the filter equal to the length of the variable, not the actual strWhere variable. This should have been apparent if you put any break points in your code.
I recommended using LEFT to trim down your string, like this:
Источник
Access VBA Run-time Error 3075
Before I get started, I know there are a TON of Error 3075 questions on here, and I’ve had a good look through them to find one that can help me, but I have been unable to.
I have an Access database written in VBA. I am attempting to execute an SQL statement which is simply querying the database. I am getting the classic 3075 error, which suggests that my SQL query is invalid. I have printed the query to a message box and to me it looks fine, but I’m using Inner Joins and I’m not too familiar with them.
Could someone please check over my code to give me a hand?
My SQL related VBA code is below:
Pretty standard stuff. I haven’t included how I make up strSQL because it is based on a complex set of if statements. The value of strSQL when I try to set the Recordset is:
My suspicion is that there is something wrong with the way I am referencing the dates. Just to give you the whole picture, below are the three tables referenced:
tblHistory:
tblBooks: Continued:
tblBookTypes:
I’ve tried isolating the problem by cutting the SQL statement right down. I could get it to work with a simple statement like SELECT * FROM tblHistory , as well as adding a WHERE parameter to that, but once I introduced the Inner Join, I got the 3075 error again.
Does anyone know where I’m going wrong? This is driving me mad!
Источник
Runtime Error 3075 MS Access VBA when running query
I’m trying to run this query via VBA code and I’m getting «Run -Time 3075 error». I tried to reorganize in diferent ways but its not working out. It runs fine as a query.
Here is the original query:
And VBA Code I’m using
1 Answer 1
I rarely comment on code but I’m sorry to have to say that this code it truly horrendous and you shouldn’t be surprised that you’re getting errors you can’t fix.
There are many kinds of wrong here, the biggest one being that this SQL query is impossible to read.
Having said that:
Your first line of SQL VBA end with And, , that , doesn’t make sense.
Same issue with the second line.
Your third line also ends with an extra , which causes the AS [Request Date] on the next line to be on its own, which will also generate an error.
Your fourth line also ends with an extra , . Since ti’s followed by FROM on the next line, you will also get an error message.
Your sixth line misses a [ : FROM TB_POLine Query] should be FROM [TB_POLine Query] .
You said that the queries were the same, but they are not. The query that you say works has a GROUP BY and a HAVING clause that the VBA query doesn’t have.
You have to seriously consider being more meticulous:
Format your SQL, even in VBA. Use something like SQL Pretty Printer or some other free software or online service to help you.
clean up your code: your code for building teste is probably not going to work in all the various cases you are trying to check.
When testing VBA-build SQL code, put a breakpoint at the point where the SQL is passed to OpenRecordset , print it to the immediate window and copy it into a new SQL Query to check where the Query editor complains. You would have found your errors if you had at least tried to debug the resulting VBA SQL into the Query editor.
All I can predict, is that if you continue writing code like that, you’re going to be in a lot of pain for a long time, and I wouldn’t be surprised if some of what seems to work, actually doesn’t work properly.
Write code that anyone can read.
At least write code that you can read.
Источник
mserg1972 1 / 1 / 2 Регистрация: 18.12.2013 Сообщений: 239 |
||||
1 |
||||
30.01.2014, 09:19. Показов 6024. Ответов 13 Метки нет (Все метки)
Ошибка в передаче данных в запрос? или в синтаксисе?
Миниатюры
__________________
0 |
16799 / 6965 / 1551 Регистрация: 21.06.2012 Сообщений: 12,998 |
|
30.01.2014, 09:26 |
2 |
AND здесь зачем, наверное при копировании осталось …?
1 |
mobile 26772 / 14451 / 3192 Регистрация: 28.04.2012 Сообщений: 15,782 |
||||
30.01.2014, 10:14 |
3 |
|||
РешениеПлюс к сказанному ltv_1953, обращение к переменной cfo надо выносить из под кавычек
1 |
1 / 1 / 2 Регистрация: 18.12.2013 Сообщений: 239 |
|
30.01.2014, 10:43 [ТС] |
4 |
Если я правильно понял, то при обращении к переменной правильно писать ‘» & cfo & «‘
0 |
26772 / 14451 / 3192 Регистрация: 28.04.2012 Сообщений: 15,782 |
|
30.01.2014, 11:23 |
5 |
Решение
Если я правильно понял, то при обращении к переменной правильно писать ‘» & cfo & «‘ Запрос не понимает переменных и ему надо предложить значение переменной. А не ее идентификатор. Апострофы нужны, если переменная текстового типа. Если числовая, то не нужны. Если датная, то в американском формате даты Format(cfo, «#mm/dd/yyyy#»)
1 |
mserg1972 1 / 1 / 2 Регистрация: 18.12.2013 Сообщений: 239 |
||||||||
31.01.2014, 09:05 [ТС] |
6 |
|||||||
в чем разница с другим вариантом, он тоже работает
0 |
mobile 26772 / 14451 / 3192 Регистрация: 28.04.2012 Сообщений: 15,782 |
||||||||
31.01.2014, 10:04 |
7 |
|||||||
в чем разница с другим вариантом, он тоже работает Код Visual Basic1
Именно в таком варианте, без символов конкатенации, точно не пройдет. Будет ошибка синтаксиса. Вы, видимо, говорите о варианте типа
Такая запись равнозначна той, которую я привел выше. Символы «#» соединяются с выражением формата с помощью символов конкатенации «&». Но мне лично кажется удобным не разбивать единое выражение на блоки, а записывать их слитно.
1 |
0 / 0 / 0 Регистрация: 24.10.2015 Сообщений: 16 |
|
24.10.2015, 21:14 |
8 |
Здравствуйте! У меня вот тоже синтаксическая ошибка: s = «Select студенты.[фамилия],avg(экзамен.оценка) as среднее, count(экзамен.[код дисциплины])» НУЖНО: отобрать всех студентов, сдавших экзамены по всем дисциплинам не менее 4. Что не так?
0 |
8521 / 5303 / 564 Регистрация: 27.03.2013 Сообщений: 18,552 |
|
24.10.2015, 21:22 |
9 |
AND здесь зачем,
А не ее идентификатор. А Вы ваще точно на Русском языке помогаете ТСу, я вот лично и половины из сказанного не понял.
0 |
shanemac51 Модератор 11267 / 4597 / 740 Регистрация: 07.08.2010 Сообщений: 13,182 Записей в блоге: 4 |
||||
25.10.2015, 08:43 |
10 |
|||
явно пропущено WHERE и первая часть условия и зачем то второй FROM
0 |
шапоклякистка 8-го дня 3672 / 2232 / 391 Регистрация: 26.06.2015 Сообщений: 4,647 Записей в блоге: 1 |
|
26.10.2015, 08:17 |
11 |
зачем то второй FROM Там подзапрос
0 |
7262 / 4465 / 287 Регистрация: 12.08.2011 Сообщений: 13,446 |
|
26.10.2015, 09:18 |
12 |
НУЖНО: Сначала сделать в конструкторе с нормальными связями, потом sql-представление скопировать в VBA. Представленный ужас с декартовым умножением трёх таблиц даже обсуждать не хочу.
0 |
шапоклякистка 8-го дня 3672 / 2232 / 391 Регистрация: 26.06.2015 Сообщений: 4,647 Записей в блоге: 1 |
|
26.10.2015, 12:43 |
13 |
Где там три таблицы? Я вижу только одну, тблИнвентаризацииОценки. P.S. Хотя в приведенном коде мне кажется странным буквально все, начиная с идеи открывать необновляемый рекордсет, содержащий единственную запись. Добавлено через 1 минуту
0 |
26772 / 14451 / 3192 Регистрация: 28.04.2012 Сообщений: 15,782 |
|
26.10.2015, 12:47 |
14 |
Где там три таблицы? Я вижу только одну, тблИнвентаризацииОценки. Обсуждается пост Ошибка 3075 в запросе, пишет отсутствует оператор И там действительно три
s = s & » From студенты, экзамен, дисциплины» Добавлено через 2 минуты
1 |
Номер ошибки: | Ошибка 3075 | |
Название ошибки: | Microsoft Access Error 3075 | |
Описание ошибки: | |1 in query expression ‘|2’. | |
Разработчик: | Microsoft Corporation | |
Программное обеспечение: | Microsoft Access | |
Относится к: | Windows XP, Vista, 7, 8, 10, 11 |
Анализ «Microsoft Access Error 3075»
Эксперты обычно называют «Microsoft Access Error 3075» «ошибкой времени выполнения». Разработчики, такие как Microsoft Corporation, обычно проходят через несколько контрольных точек перед запуском программного обеспечения, такого как Microsoft Access. Тем не менее, возможно, что иногда ошибки, такие как ошибка 3075, не устранены, даже на этом этапе.
Некоторые люди могут столкнуться с сообщением «|1 in query expression ‘|2’.» во время работы программного обеспечения. В случае обнаруженной ошибки 3075 клиенты могут сообщить о наличии проблемы Microsoft Corporation по электронной почте или сообщать об ошибках. Затем Microsoft Corporation исправит ошибки и подготовит файл обновления для загрузки. Таким образом, когда ваш компьютер выполняет обновления, как это, это, как правило, чтобы исправить проблемы ошибки 3075 и другие ошибки внутри Microsoft Access.
Что на самом деле вызывает ошибку времени выполнения 3075?
Проблема с исходным кодом Microsoft Access приведет к этому «Microsoft Access Error 3075», чаще всего на этапе запуска. Мы можем определить происхождение ошибок ошибки 3075 во время выполнения следующим образом:
Ошибка 3075 Crash — это распространенная ошибка 3075 во время выполнения ошибки, которая приводит к полному завершению работы программы. Это возникает, когда Microsoft Access не реагирует на ввод должным образом или не знает, какой вывод требуется взамен.
Утечка памяти «Microsoft Access Error 3075» — ошибка 3075 утечка памяти приводит к увеличению размера Microsoft Access и используемой мощности, что приводит к низкой эффективности систем. Возможные причины из-за отказа Microsoft Corporation девыделения памяти в программе или когда плохой код выполняет «бесконечный цикл».
Ошибка 3075 Logic Error — «логическая ошибка», как говорят, генерируется, когда программное обеспечение получает правильный ввод, но генерирует неверный вывод. Это видно, когда исходный код Microsoft Corporation включает дефект в анализе входных данных.
Основные причины Microsoft Corporation ошибок, связанных с файлом Microsoft Access Error 3075, включают отсутствие или повреждение файла, или, в некоторых случаях, заражение связанного Microsoft Access вредоносным ПО в прошлом или настоящем. Возникновение подобных проблем является раздражающим фактором, однако их легко устранить, заменив файл Microsoft Corporation, из-за которого возникает проблема. В качестве последней меры мы рекомендуем использовать очиститель реестра для исправления всех недопустимых Microsoft Access Error 3075, расширений файлов Microsoft Corporation и других ссылок на пути к файлам, по причине которых может возникать сообщение об ошибке.
Распространенные проблемы Microsoft Access Error 3075
Типичные ошибки Microsoft Access Error 3075, возникающие в Microsoft Access для Windows:
- «Ошибка приложения Microsoft Access Error 3075.»
- «Microsoft Access Error 3075 не является приложением Win32.»
- «Возникла ошибка в приложении Microsoft Access Error 3075. Приложение будет закрыто. Приносим извинения за неудобства.»
- «Не удается найти Microsoft Access Error 3075»
- «Отсутствует файл Microsoft Access Error 3075.»
- «Ошибка запуска в приложении: Microsoft Access Error 3075. «
- «Не удается запустить Microsoft Access Error 3075. «
- «Ошибка Microsoft Access Error 3075. «
- «Ошибка в пути к программному обеспечению: Microsoft Access Error 3075. «
Обычно ошибки Microsoft Access Error 3075 с Microsoft Access возникают во время запуска или завершения работы, в то время как программы, связанные с Microsoft Access Error 3075, выполняются, или редко во время последовательности обновления ОС. Выделение при возникновении ошибок Microsoft Access Error 3075 имеет первостепенное значение для поиска причины проблем Microsoft Access и сообщения о них вMicrosoft Corporation за помощью.
Истоки проблем Microsoft Access Error 3075
Большинство проблем Microsoft Access Error 3075 связаны с отсутствующим или поврежденным Microsoft Access Error 3075, вирусной инфекцией или недействительными записями реестра Windows, связанными с Microsoft Access.
В частности, проблемы Microsoft Access Error 3075 возникают через:
- Поврежденная или недопустимая запись реестра Microsoft Access Error 3075.
- Вирус или вредоносное ПО, которые повредили файл Microsoft Access Error 3075 или связанные с Microsoft Access программные файлы.
- Вредоносное удаление (или ошибка) Microsoft Access Error 3075 другим приложением (не Microsoft Access).
- Другое программное приложение, конфликтующее с Microsoft Access Error 3075.
- Неполный или поврежденный Microsoft Access (Microsoft Access Error 3075) из загрузки или установки.
Продукт Solvusoft
Загрузка
WinThruster 2022 — Проверьте свой компьютер на наличие ошибок.
Совместима с Windows 2000, XP, Vista, 7, 8, 10 и 11
Установить необязательные продукты — WinThruster (Solvusoft) | Лицензия | Политика защиты личных сведений | Условия | Удаление
Runtime error 3975
is Invalid operator
, according to a quick Google search on access vba runtime error 3075
(which you could have made yourself).
The problem is that you only assign a value of ""
to stCriteria
. If the first if
statement executes, stCriteria
is then assigned the value of stCriteria AND stCriteria1
, which is invalid.
The same thing happens if the second if
statement is executed. (In fact, if both are actually run, stCriteria
now contains AND stCriteria1 AND stCriteria2
, which is even worse.)
The solution is to modify your code to only add the AND
if it’s needed:
stLinkCriteria = ""
stDocName = "frmDisplayInfo"
If (Me!txtMainName <> "") Then
stLinkCriteria = "[Main Applicant Name] Like ' " & Me![txtMainName] & "'"
End If
If (Me!txtIDNo <> "") Then
If stLinkCriteria <> "" then
stLinkCriteria = stLinkCriteria & " AND "
End If
stLinkCriteria2 = "[ID No] Like ' " & Me![txtIDNo] & "'"
stLinkCriteria = stLinkCriteria & " And " & stLinkCriteria2
End If
For future reference, the way to solve these kind of problems is to actually examine the value of the variable (in this case stCriteria
) just before the line causing the error (here, it’s the DoCmd.OpenForm
line) executes. You do so by setting a breakpoint on the line where the error happens, running your app until the breakpoint is hit, and then examining the value of the variable. This shows you exactly what the variable contains, which can reveal the problem.
- Remove From My Forums
-
Question
-
A simple query, the WHERE clause is giving a 3075 error on even a simple entry.
Field: TestName
Table: Parameters
Total: Where
Criteria: 10
Try to save or view the SQL and it returns: Syntax error in query expression ‘(((Parameters.[TestName])=»10″))’.
Click Help, it says: <Message> in query expression <expression>. (Error 3075)
The expression you typed is not valid for the reason indicated in the message. Make sure you have typed field names and punctuation correctly, and then try the operation again.
The error is spreading to another query that I was looking at for comparison. The other query pulls a parameter from a form. The query runs fine when another query calls it, but I can’t open in it design view anymore. Do I have a virus
or something causing this problem?
Answers
-
The problem was that I had a table named Parameters and a form named Parameters and it was confusing the query. I changed the names to tblparameters and frmparameters and all the places these objects were called and no more error.
Why that didn’t matter before and why my table and form that are both named Samples didn’t produce the same error? I don’t know. But from now on I will use those prefixes and no spaces in names, etc, to avoid any sensitivities that Access has
about it.Thank you Jaynet Zhang for your suggestions.
-
Marked as answer by
Wednesday, June 6, 2012 2:46 PM
-
Marked as answer by
Okay, I think this is the problem ( it is kind of hard to tell with just this little snippet to work with. )
Move the marked single quote down one line:
sql = sql & " Group By ContactID, TitleID, ContactName, SuffixID, Company, JobTitle, Email1, Email2, Email3, WebPageAddress, IMAddress"
If Me.chkExportPhone = True Then
sql = sql & " , PhoneNumber, PhoneNumberType "
End If
If Me.chkExportAddress = True Then
**'** sql = sql & " , AddressLine1, AddressLine2, City, State, Zip, AddressType "
sql = sql & " , AddressLine1 as PostalAddress, AddressLine2 as PostalSuburb,AddressLine3 as StreetAddress, City as Suburb, State, Zip as PostalCode, AddressType "
End If
sql = sql & " , Classification, ClassificationCopy,ReferenceNumber, InvoiceComments,AccountComments,Status,LastContactDate,Notes "
to
sql = sql & " Group By ContactID, TitleID, ContactName, SuffixID, Company, JobTitle, Email1, Email2, Email3, WebPageAddress, IMAddress"
If Me.chkExportPhone = True Then
sql = sql & " , PhoneNumber, PhoneNumberType "
End If
If Me.chkExportAddress = True Then
sql = sql & " , AddressLine1, AddressLine2, City, State, Zip, AddressType "
' sql = sql & " , AddressLine1 as PostalAddress, AddressLine2 as PostalSuburb,AddressLine3 as StreetAddress, City as Suburb, State, Zip as PostalCode, AddressType "
End If
sql = sql & " , Classification, ClassificationCopy,ReferenceNumber, InvoiceComments,AccountComments,Status,LastContactDate,Notes "
This comments out the incorrect line and replaces it with a good one. The AS keyword in the GROUP BY statement is causing the problem.
Okay, I think this is the problem ( it is kind of hard to tell with just this little snippet to work with. )
Move the marked single quote down one line:
sql = sql & " Group By ContactID, TitleID, ContactName, SuffixID, Company, JobTitle, Email1, Email2, Email3, WebPageAddress, IMAddress"
If Me.chkExportPhone = True Then
sql = sql & " , PhoneNumber, PhoneNumberType "
End If
If Me.chkExportAddress = True Then
**'** sql = sql & " , AddressLine1, AddressLine2, City, State, Zip, AddressType "
sql = sql & " , AddressLine1 as PostalAddress, AddressLine2 as PostalSuburb,AddressLine3 as StreetAddress, City as Suburb, State, Zip as PostalCode, AddressType "
End If
sql = sql & " , Classification, ClassificationCopy,ReferenceNumber, InvoiceComments,AccountComments,Status,LastContactDate,Notes "
to
sql = sql & " Group By ContactID, TitleID, ContactName, SuffixID, Company, JobTitle, Email1, Email2, Email3, WebPageAddress, IMAddress"
If Me.chkExportPhone = True Then
sql = sql & " , PhoneNumber, PhoneNumberType "
End If
If Me.chkExportAddress = True Then
sql = sql & " , AddressLine1, AddressLine2, City, State, Zip, AddressType "
' sql = sql & " , AddressLine1 as PostalAddress, AddressLine2 as PostalSuburb,AddressLine3 as StreetAddress, City as Suburb, State, Zip as PostalCode, AddressType "
End If
sql = sql & " , Classification, ClassificationCopy,ReferenceNumber, InvoiceComments,AccountComments,Status,LastContactDate,Notes "
This comments out the incorrect line and replaces it with a good one. The AS keyword in the GROUP BY statement is causing the problem.
- Remove From My Forums
-
Question
-
I cannot get this code to work although I am using a similar one in a different form.
I want to take the info placed in the form called form_Tblstart and place it into tblvýsledky.
Private Sub Command16_Click()
Dim S As StringS = «INSERT INTO tblVýsledky(Otazka, Odpoved1, Odpoved2, Odpoved3, Odpoved4, VaseOdpoved) values (» & Me.txt1 & «‘,'» & Me.txt2 & «‘,'» & Me.txt3 & «‘,'» & Me.txt4 & «‘,'»
& Me.txt5 & «‘,'» & Me.txt6 & «‘)»
CurrentDb.Execute S‘refresh
Form_TblStart.Form.RequeryEnd Sub
-
Edited by
Tuesday, August 18, 2015 12:02 PM
-
Edited by
Answers
-
You can post your DB on OneDrive and supply the link here for us to look at it.
Before you do that, try the following and see what happens:
Private Function BuildSQL(Val1 As String, Val2 As String, Val3 As String, Val4 As String, Val5 As String, Val6 As String) As String Dim strReturn As String strReturn = "INSERT INTO tblVýsledky (Otazka, Odpoved1, Odpoved2, Odpoved3, Odpoved4, VaseOdpoved) " & _ "VALUES ('" & Val1 & "','" & Val2 & "','" & Val3 & "','" & Val4 & "','" & Val5 & "','" & Val6 & "')" BuildSQL = strReturn End Function Private Sub Command16_Click() Dim strSQL As String strSQL = BuildSQL(Me.txt1, Me.txt2, Me.txt3, Me.txt4, Me.txt5, Me.txt6) Debug.Print strSQL 'CurrentDb.Execute strSQL 'Form_TblStart.Form.Requery End Sub
-
Marked as answer by
Rostislav S
Monday, August 24, 2015 7:23 AM
-
Marked as answer by