-Поиск по дневнику

Поиск сообщений в rss_sql_ru_access_programming

 -Подписка по e-mail

 

 -Постоянные читатели

 -Статистика

Статистика LiveInternet.ru: показано количество хитов и посетителей
Создан: 16.03.2006
Записей:
Комментариев:
Написано: 4

Invalid link!








Добавить любой RSS - источник (включая журнал LiveJournal) в свою ленту друзей вы можете на странице синдикации.

Исходная информация - http://www.sql.ru/forum/actualtopics.aspx?bid=4.
Данный дневник сформирован из открытого RSS-источника по адресу http://www.sql.ru/forum/actualrss.aspx?id=4, и дополняется в соответствии с дополнением данного источника. Он может не соответствовать содержимому оригинальной страницы. Трансляция создана автоматически по запросу читателей этой RSS ленты.
По всем вопросам о работе данного сервиса обращаться со страницы контактной информации.

[Обновить трансляцию]

Печать отчета - 2 стр на лист.

Среда, 05 Марта 2014 г. 11:10 + в цитатник
Захожу в конструктор, вызываю просмотр, настраиваю параметры страницы и печати, назад в конструктор и сохраняю.

Число копий 2 сохраняется для отчета, а вот печать в 2 стр на лист слетает, приходится опять лезть внутрь настроек принтера и выставлять.
Может связано с отсутствием на основной форме печати поля с количеством страниц на лист?

http://www.sql.ru/forum/1080888/pechat-otcheta-2-str-na-list


Cоздание ADP в Access2010 и MS SQL 2012 Express

Вторник, 04 Марта 2014 г. 17:25 + в цитатник
Попробовал создать проект ADP в 2010 аксесе и присоединится к базе на сервере на компе в сети. Там стоит SQL 2012 Express, база создана, ODBC к ней отлично коннектиться с 2-мя доступными драйверами. VisualStudio сервер видит, к базам коннектится.
Брандмауэры на обоих компах отключены, антивирусы на блокировку внутреннего трафика выключены. Если базу создать на том же компютере, на которм висит сервер то все работает. С других компов в сети не хочет.
Не видит SQL-сервер вообще, комбобокс с доступными серверами просто пустой, если заполнить его руками и попробовать поискать базу, то выдает ошибку "SQL сервер не найден". В какую сторону копать?

http://www.sql.ru/forum/1080758/cozdanie-adp-v-access2010-i-ms-sql-2012-express


Вопрос по TransferSpreadsheet

Вторник, 04 Марта 2014 г. 15:43 + в цитатник
Делаю экспорт в Excel при помощи TransferSpreadsheet (около 18 тыс записей)

DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, stDocName, strPath & "РМОНС.xls", True


При ручном экспорте при проверке додумался поставить птичку (запомнить шаги). Теперь при любом программном TransferSpreadsheet первым листом выводится запомненая последовательность, на на втором листе нужная информация.

Надо удалить то, что запомнил. Как это сделать?

Удалил уже запрос, на основании которого создавал последовательность. Не помогает.

http://www.sql.ru/forum/1080728/vopros-po-transferspreadsheet


Запрос на обновление

Вторник, 04 Марта 2014 г. 14:31 + в цитатник
Доброго времени суток!
Собственно вопрос!
Существует таблица "Поступления" где отражаются поступления по договорам. Нужно обновить в таблице "договора" поле "Оплата", а именно записать сумму поступлений по конкретному договору.
Спасибо за ответ!

http://www.sql.ru/forum/1080712/zapros-na-obnovlenie


Местонахождение и время в запросе

Вторник, 04 Марта 2014 г. 01:00 + в цитатник
В данный момент я выбрала конкретный вариант и мне нужно вместо 3-х записей, которые выводит запрос, вывести две.
То есть, есть клиенты и вполне возможно, что местоположение их может измениться и эту связь я связала с датой [date_begin]. И по мере обращения в центр, должно выводиться то местоположение, где они находятся в данный момент.
То ли схема у меня недоработана, то ли запрос. Сейчас не пойму в какое направление лучше идти, чтобы вывести именно то, что хочу.

SELECT patients.id_patient, patients.patient_num, patients.family, 
patients_history.nimushis_code, patients_history.input_date, 
prison.prison_name, prison_history.date_begin
FROM prison 
INNER JOIN ((patients 
LEFT JOIN patients_history ON patients.id_patient = patients_history.id_patient) 
INNER JOIN prison_history ON patients.id_patient = prison_history.id_patient) 
ON prison.id_prison = prison_history.id_prison
WHERE (((patients.patient_num)=4) AND ((patients_history.input_date)>=[date_begin]))
ORDER BY patients_history.input_date;

http://www.sql.ru/forum/1080623/mestonahozhdenie-i-vremya-v-zaprose


Проблема с запросом в Access 2007 со связанными таблицами.

Понедельник, 03 Марта 2014 г. 21:09 + в цитатник
Привет =)

Проблема с MS Access 2007

Имеются таблицы:
1) Договор поставки
2) Стороны договора (Контрагенты).

Связь между таблицами: "Договор поставки" м - 1 "Контрагенты"
Картинка с другого сайта.

Стороны договора могут быть как продавцами в одном договоре, так и покупателями во втором.
Нужно сделать запрос, который выведет всех контрагентов списком, которые были в договорах и покупателями и продавцами.

Пример.
Контрагенты:
№| ФИО контрагента
1 | Ivanov
2 | Petrov
3 | Sidorov

Договоры:
№| контрагент | тип (продавец/покупатель)
1 | Ivanov | продавец
2 | Petrov | продавец
3 | Ivanov | покупатель
4 | Sidorov | покупатель
5 | Sidorov | покупатель
6 | Ivanov | продавец

Запрос выведет:
№ договора | ФИО контрагента | тип
1 | Ivanov | продавец
3 | Ivanov | покупатель
6 | Ivanov | продавец

Запрос вывел только Иванова, т.к. только он являлся и продавцом и покупателем.


Заранее спасибо =)

http://www.sql.ru/forum/1080588/problema-s-zaprosom-v-access-2007-so-svyazannymi-tablicami


Операция с датой

Понедельник, 03 Марта 2014 г. 19:48 + в цитатник
Всем добрый вечер.
Вводные следующие:
1. Рекордсет rs1
2. Поле с датой в рекордсете. Пример даты 25.12.1985
3. Переменная period%, хранящая целое число.
Нужно к полю рекордсета даты прибавить period% дней и заменить год на текущий.
Просто сохраняю дату так:
!from = Format(rs1.Fields("birthday"), "mm\.dd\.2014")
Как в другое поле сохранить 25.12.2014 + period% дней?
_____________________
А что на самом деле хотел сказать Frost_Imp никто не знает, так как администрация форума попросила его быть вежливым.

http://www.sql.ru/forum/1080572/operaciya-s-datoy


Выбор строки из свободного списка

Понедельник, 03 Марта 2014 г. 16:33 + в цитатник
Здравствуйте!
Есть форма, на которой размещен элемент "Свободный список", содержащий фамилии из таблицы КЛИЕНТЫ. Надо выбрать из этого списка фамилию, считать ее анкетный номер и найти этот номер в другой таблице.
Вот мой код:
Option Compare Database
Option Explicit
' В Е Т К А "С Т А Р Ы Й К Л И Е Н Т"
Private Sub Список6_AfterUpdate()
Dim rst6 As Object, anknom As Long
Set rst6 = Me.Recordset.Clone
With rst6
.MoveLast
.MoveFirst
.FindFirst "[АнкетныйНомер]=" & Str(Nz(Me![Список6], 0))
Me.Bookmark = .Bookmark
anknom = АнкетныйНомер
DoCmd.OpenForm "frmЗаказы", , , "tblКЛИЕНТЫ.АнкетныйНомер=" & anknom
End With
rst6.Close
End Sub

Выдается ошибка Variable not defined в строке anknom = АнкетныйНомер (подсвечивается АнкетныйНомер). Чего ей не так-то????

http://www.sql.ru/forum/1080525/vybor-stroki-iz-svobodnogo-spiska


Вопрос по Access

Понедельник, 03 Марта 2014 г. 16:26 + в цитатник
есть сводная таблица по кредитам, есть 4 вспомогательные таблицы по кредитам разделенные по % ставки, помогите советом, как подтянуть процентную ставку по кредитам со вспомогательных таблиц на свод.

http://www.sql.ru/forum/1080523/vopros-po-access


убрать цветную печать

Понедельник, 03 Марта 2014 г. 15:51 + в цитатник
Здравствуйте, подскажите, пожалуйста, как исправить такую проблему. Есть в организации несколько принтеров, один из них цветной. В Access 2007 создан отчет. В нем надписи сделаны цветом. Так вот необходимо пока временно, чтобы этот отчет печатался в черно-белом варианте.

http://www.sql.ru/forum/1080506/ubrat-cvetnuu-pechat


Смена подчиненой формы?

Понедельник, 03 Марта 2014 г. 10:48 + в цитатник
Уважаемые господа! Подскажите пожалуйста каким образом на главной форме можно менять подчиненые формы?

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

Заранее премного благодарен.

******

http://www.sql.ru/forum/1080428/smena-podchinenoy-formy


Фильтр

Воскресенье, 02 Марта 2014 г. 23:51 + в цитатник
Доброе время суток.

есть три связанных таблицы: клиент, входные данные, выходные данные. таблицы связаны один к одному, т.е. к одному клиенту только по одной записи в двух других таблицах.
есть форма клиент, там все его основные данные (ФИО возраст и т.д.) и тут же мы заполняем входные данные, и из этой формы я по нажатию на кнопку попадаю в форму в которой мы вносим выходные данные. Я ставлю фильтр чтобы при попадании на форму вых.данные поля ФИО возраст и т.д. были автоматически заполнены, но акс не фильтрует т.к. в табл. выходные данные нет записей. как можно обойти этот момент?

надеюсь понятно описал

http://www.sql.ru/forum/1080400/filtr


Запрос со конкатенацией строк

Воскресенье, 02 Марта 2014 г. 16:40 + в цитатник
Здравствуйте.
Как с помощью запроса собрать в одну строку все значения поля КритерийПоиска, если все остальные поля одинаковы?
Фрагмент исходной таблицы:
ФИО                   КритерийПоиска    МаркаАвто   МодельАвто ТипКузова  ЦенаОт  ЦенаДо
-------------------------------------------------------------------------------------------
Новый покупатель       ГодВыпуска        Acura         MDX	  Джип
Новый покупатель       Цена              Acura	       MDX        Джип
Новый покупатель       Модель            Acura	       MDX        Джип
Новый покупатель       Марка             Acura	       MDX        Джип
Новый покупатель       ТипКузова         Acura	       MDX        Джип
Новый покупатель1      ГодВыпуска        Toyota        Prado      Джип
Новый покупатель1      Цена              Toyota        Prado      Джип
Новый покупатель1      Модель            Toyota        Prado      Джип
Новый покупатель1      Марка             Toyota        Prado      Джип
Новый покупатель1      ТипКузова         Toyota        Prado      Джип

Результат запроса:
ФИО	           КритерийПоиска                          МаркаАвто МодельАвто ТипКузова ЦенаОт ЦенаДо
------------------------------------------------------------------------------------------------------
Новый покупатель   Марка,Модель,Цена,ГодВыпуска,ТипКузова  Acura      MDX       Джип
Новый покупатель1  Марка,Модель,Цена,ГодВыпуска,ТипКузова  Тoyota     Prado     Джип

Заранее благодарю.

http://www.sql.ru/forum/1080348/zapros-so-konkatenaciey-strok


Ошибка #ИМЯ? в поле на форме

Воскресенье, 02 Марта 2014 г. 15:14 + в цитатник
Подскажите может кто то сталкивался? В проекте Access 2010 на форме есть поле, данные поля равно например =Date() (независимо от функции) на экране в поле выводится ошибка "#ИМЯ?" и это только на одной машине на всех остальных машинах все нормально!
На всех машинах Офис 2010 и Win XP.

http://www.sql.ru/forum/1080336/oshibka-imya-v-pole-na-forme


Как отключить сообщения об ошибках ADO connection.Execute.

Воскресенье, 02 Марта 2014 г. 15:05 + в цитатник
Делаю вот так:
Set ccon = CurrentProject.Connection
ccon.Execute "INSERT INTO [Modem]([Number],[IMEI]) VALUES(" & i & ", '" & gIMEI & "')", j

поле IMEI должно быть ровно 15 цифр, если их больше или меньше выскакивает сообщение. Как его убрать, пусть при ошибке (любой) возвращает 0 в RecordsAffected или не меняет его совсем.

http://www.sql.ru/forum/1080334/kak-otkluchit-soobshheniya-ob-oshibkah-ado-connection-execute


Запрос в Dsum

Пятница, 28 Февраля 2014 г. 20:33 + в цитатник
StrSql2 = "SELECT tbl_Naryad.*, [tbl_Tarifi s Otchtom].*, [tbl_Tarifi s Otchtom].Oblasti " & _
"FROM [tbl_Tarifi s Otchtom] RIGHT JOIN tbl_Naryad ON [tbl_Tarifi s Otchtom].[Kod Stancii] = tbl_Naryad.Stancia"

ss = DSum("[Vagonov otgrugeno]", StrSql2, "[Oblasti] = 'СКО'")



Так не работает подскажите как правильно использовать запрос в функции Спасибо

http://www.sql.ru/forum/1080138/zapros-v-dsum


продолжение работы формы после ошибки

Пятница, 28 Февраля 2014 г. 19:43 + в цитатник
В обработчиках открытия и закрытия формы вызываются функции создающая и удаляющая, соответственно, ряд запросов с названиями по номерам "ServiceQR1", ServiceQR2" и т.д. Количество запросов зависит от данных в базе (определяется в функции их создания) и харнится во внешней (в рамках одного модуля) переменной iout, значение которой присвается в функции открытия формы, а используется при удалении запросов в обработчике открытия.
Все работает, но если вылетает какая-то ошибка, то при последующем закрытии формы запросы не удаляются. Я проверил, после вылетания ошибки iout становится равной 0.
В чем может быть проблема?
P.S. На предмет использования этой переменной в других функция я проверил - нет. Значение перед вылетанием ошибки проверял - все ок, без ошибки тоже все работает.

Private Sub Form_Close()
Module1.deletequeries
End Sub

Private Sub Form_Open(Cancel As Integer)
Module1.CreateQueries
End Sub


из Module1:
Sub CreateQueries()
'If FormCount = 0 Then
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("Структура", dbOpenDynaset)
rst.MoveFirst
Dim t As Long
t = rst.Fields("Спонсор")
Dim query1 As String
query1 = "SELECT Структура.Спонсор AS Спонсор, Структура.Дистрибьютор AS Дистрибьютор " _
& "FROM Структура " _
& "WHERE Структура.Спонсор=" & t
iout = 15 'осталось со времен отладки - чтоб не зацикливалось,
' но решил оставить, потому что для этого примера будет кстати
Dim str As String
str = "ServiceQR"
Dim qr1 As DAO.QueryDef
Set qr1 = CurrentDb.CreateQueryDef(str & "1", query1)
Dim i As Long
Dim j As Long
j = 1
i = 0
Do While qr1.OpenRecordset(dbOpenDynaset).RecordCount <> 0
query1 = "SELECT Структрура.Спонсор AS Спонсор, Структура.Дистрибьютор AS Дистрибьютор " _
& "From Структура INNER JOIN " & str & j & " ON Структура.Спонсор = " & str & j & ".Дистрибьютор; "
j = j + 1
Set qr1 = CurrentDb.CreateQueryDef(str & j, query1)
i = i + 1
Loop
iout = j
MsgBox (iout)
qr1.Close
FormCount = FormCount + 1

End Sub


Sub deletequeries()
Dim str As String
str = "ServiceQR"
Dim j As Long
j = 1
Do While j <= iout

CurrentDb.QueryDefs.Delete str & j
j = j + 1
Loop
FormCount = FormCount - 1
End Sub

http://www.sql.ru/forum/1080131/prodolzhenie-raboty-formy-posle-oshibki


Функция Count с группировкой значений на VBA

Пятница, 28 Февраля 2014 г. 17:43 + в цитатник
Доброго времени суток!
Вопрос следующий. Как при помощи VBA реализовать функцию Count, чтобы при этом производилась группировка одинаковых значений??

Заранее благодарен!

http://www.sql.ru/forum/1080108/funkciya-count-s-gruppirovkoy-znacheniy-na-vba


Помогите ПОЖАЛУСТА!! создать БД Access за деньги для диплома!!!

Пятница, 28 Февраля 2014 г. 16:16 + в цитатник
Доброго всем времени суток. прошу помощи в создании БД в среде разработки Access.
По диплому дали задание, создание БД Сервисного центра по обслуживанию холодильного оборудования.
Работа предприятия строиться следующим образом есть несколько клиентов у которых есть с несколько десятков торговых точек на которых установлено какое то количество различного оборудования.
Задача предприятия каждый месяц или раз в несколько месяцев объезжать торговые точки и обслуживать обрудование.
В штате находиться несколько мастеров которые все это дело обслуживают.
База должна уметь добавлять заявки на ремонт оборудования, выводить отчеты, добавлять новых клиентов новые торговые точки и принимать в штат мастеров.
P.S Занимаюсь автоматизацией производства. В Access и SQL Дубоват))) Помогите пожалуйста, о благодарности договоримся.
ford1275@inbox.ru

http://www.sql.ru/forum/1080086/pomogite-pozhalusta-sozdat-bd-access-za-dengi-dlya-diploma


Выборка Sql

Пятница, 28 Февраля 2014 г. 13:06 + в цитатник
База ниже, нужны запросы. Помогите или объясните пожалуйста что да как.

http://zalil.ru/34987772

Нужно:

1. Какие книги самые дорогие
2. Какие книги проданы в 1992 году.
3. Сколько авторов писали книги по теме psychology
4. Какие издательства находятся в USA
5. Какие книги проданы в июне.
6. Удалить книги, изданные в Dallas
7. Кто из авторов имеет телефон, номер которого начинается на 5.
8. Сколько книг стоят больше 10.
9. Добавить запись о новом авторе.

Select *
From
...
Заранее огромнейшее спасибо!

http://www.sql.ru/forum/1080034/vyborka-sql



Поиск сообщений в rss_sql_ru_access_programming
Страницы: 353 ... 22 21 [20] 19 18 ..
.. 1 Календарь