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

Поиск сообщений в 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 ленты.
По всем вопросам о работе данного сервиса обращаться со страницы контактной информации.

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

Заполнение ячеек Excel из Access

Среда, 08 Октября 2014 г. 17:41 + в цитатник
такая вот ошибка, в чем дело не могу понять

http://www.sql.ru/forum/1119893/zapolnenie-yacheek-excel-iz-access


Быстродействие Access

Среда, 08 Октября 2014 г. 16:25 + в цитатник
Добрый день!

Задача подразумевает тяжелый анализ данных, реализуемый через многократное выполнение несложных SELECT -ов и UPDATE -ов. База должна быть локальной. Потестировал ACCESS 2007: быстродействие не устроило. Подскажите, есть ли СУБД шустрее, чем ACCESS? Можно ли как-то оптимизировать ACCESS? Увеличение ОЗУ компьютера повлияет ли на скорость? (сейчас 2 ГБ)

Спасибо.

http://www.sql.ru/forum/1119875/bystrodeystvie-access


Загонный вопрос про табличную форму.

Среда, 08 Октября 2014 г. 14:20 + в цитатник
Суть вопроса: можно ли табличную форму отфильтровать – вывести 50 последних записей. ТО, что сделать через запрос это я занаю, а вот можно умудрится саму форму так фильтрануть?
Спасибо.

http://www.sql.ru/forum/1119846/zagonnyy-vopros-pro-tablichnuu-formu


Как преобразовать к типу Дата?

Среда, 08 Октября 2014 г. 13:43 + в цитатник
Использовал в таблице1 DateSerial для расчета даты. Теперь при попытке union с таблицей2 ругается " Несоответствие типов данных в выражении условия отбора ".
p.s. Проверял - проблема точно из-за этого.
pps как не ошибиться с форматом, к которому надо привести, если таблица1 - это запрос?

http://www.sql.ru/forum/1119834/kak-preobrazovat-k-tipu-data


Запрос - расчет накопления по времени

Среда, 08 Октября 2014 г. 13:42 + в цитатник
Нужно сделать столбик, который подсчитывает накопление прибыли (типа Кэш-Флоу) по времени:
Прибыль(n) = Доход(n)-Расход(n)
КФ(1)=Прибыль(1)
КФ(n)=КФ(n-1)+Прибыль(1)

Или так: КФ(n)=Сумма Доходов (1...n) + Сумма расходов (1...n)

Таблица
Дата | Доход | Расход
08.10.2014 | 1 | 2
09.10.2014 | 5 | 2
10.10.2014 | 2 | 7
11.10.2014 | 9 | 0

Нужно получить:
Дата | Прибыль | КФ
08.10.2014 |-1 |-1
09.10.2014 | 3 | 2
10.10.2014 |-5 |-3
11.10.2014 | 9 | 6

Возможно ли такое сделать? Подскажите как работать с "задними" значениями

http://www.sql.ru/forum/1119833/zapros-raschet-nakopleniya-po-vremeni


Добавление данных из excel в соответствующую строку таблицы БД

Среда, 08 Октября 2014 г. 12:07 + в цитатник
Добрый день, знатоки.

Я создаю учет пройденных тестов и столкнулся со следующей проблемой (на мой взгляд новичка).
В БД имеется информация о плане прохождения теста в таблице accounting.
В екселе есть информация о факте и об оценке этого же теста.

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

БД и екселевский файл прилагаю.

Помогите, прошу вас.

http://www.sql.ru/forum/1119808/dobavlenie-dannyh-iz-excel-v-sootvetstvuushhuu-stroku-tablicy-bd


Код для подстановки значения в поле ленточной формы

Среда, 08 Октября 2014 г. 09:30 + в цитатник
мне нужно задать поле в ленточной форме , аналогичный код есть.
Изменил по аналогии - ошибка. Если не добавлять
& " AS [q]"
, то показывает значение которое есть в первой записи, в остальных ошибка.
Аналогичный работающий код:
Public Function LastMeeting(kod)
Dim s
    s = "SELECT Min([дата_заседания]) " _
    & " FROM (SELECT Заседания.дата_заседания " _
    & " FROM Данные INNER JOIN Заседания ON Данные.код = Заседания.код_записи " _
    & " WHERE (((Заседания.дата_заседания)>=Date()) " _
    & " And ((Данные.код)=" & kod & "))) AS [q]"
    LastMeeting = CurrentDb.OpenRecordset(s).Fields(0)
End Function


Код , который нуждается в исправлении:
Public Function ArbitrName(kod)
Dim Ar
      Ar = "SELECT ФИО.[фио] " _
      & " FROM ФИО inner join Данные On ФИО.Код=Данные.фио " _
      & " WHERE Данные.код=" & kod & " AS [q]"
      ArbitrName = CurrentDb.OpenRecordset(Ar).Fields(0)
End Function

http://www.sql.ru/forum/1119767/kod-dlya-podstanovki-znacheniya-v-pole-lentochnoy-formy


Модернизация БД

Среда, 08 Октября 2014 г. 06:09 + в цитатник
Доброго всем времени.
Имеем БД с одной таблицей.
Надо посчитать кол-во заявителей в таблице(по 2м условиям), вывести минимальное, максимальное и среднее время ожидания в очереди, также кол-во заявителей прождавших в очереди больше 15 минут, ну и % посетителей которые прождали меньше 15 минут.

Я это реализовал на форме, путем создания 4х запросов и вывода результатов в соответствующие поля.
Некоторые результаты, например, общее кол-во и % заявителей я посчитал через выражения.(можно ли при таком расчете делать условия по дате? )

Вроде бы все корректно работает, но мне не нравиться одно, "НО". Все это громоздко и я не могу это упростить.
Возникает одна идея все эти запросы реализовать в VBA и значения выводить в соответствующие поля, но не хватает знаний что бы это реализовать.
Буду рад любой помощи.
С уважением.

http://www.sql.ru/forum/1119760/modernizaciya-bd


Коннект из аксесса в SQL Server

Вторник, 07 Октября 2014 г. 16:02 + в цитатник
Проблемка такая. В аксессе есть база на access 2010 "db1", которая подключена к SQL server-у "server1" (sql server 2012), виндовая конкатенация, трастовая. На этом сервере есть хранимая процедура SP1, которая имеет входной параметр @i (int). Хочу в форме "Form1" источником сделать эту процедуру, а параметр пусть = 1. Пожалуйста, помогите. Никак не могу связаться с сервером и процедурой

http://www.sql.ru/forum/1119646/konnekt-iz-aksessa-v-sql-server


Не выходит импортировать xsd в Access

Вторник, 07 Октября 2014 г. 15:18 + в цитатник
Access 2013 x64, пустая база.

цель - создать локальную копию архива госзакупок по нужному региону в базе Access.
они хранятся в виде XML файлов разных типов, которые описаны в xsd:
http://zakupki.gov.ru/epz/main/public/download/downloadDocument.html?id=3229
(fcsExport.xsd и fcsIntegration.xsd, ссылающиеся на IntegrationTypes.xsd)

каждая запись имеет сложную структуру с вложенными с подструктурами, в т.ч. с множественным вхождением в эту структуру.

при попытке загрузки самого XML в Access (даже если рядом лежит xsd), каждая из подструктур ложится в свою таблицу, без id связок между собой.

если попытаться импортировать сами xsd, то при импорте Acess пишет "an error processing XML schema in file IntegrationTypes.xsd: unspecified error".

Вопрос - как импортировать исходную XML с сохранением структуры данных?

http://www.sql.ru/forum/1119636/ne-vyhodit-importirovat-xsd-v-access


Ошибка Определено слишком много полей

Понедельник, 06 Октября 2014 г. 22:55 + в цитатник
Приветствую всех заинтересовавшихся!

Господа, столкнулся с проблемой, решить которую не получается.


При добавлении поля в таблицу (alter table .... add column ...), в которой ДО добавления 213 полей (при этом в ходе работы алгоритма поля удаляются / добавляются), появляется ошибка Определено слишком много полей.

После действия Сжать и восстановить БД отдельно выполняю отдельно запрос на добавление поля в эту таблицу - и вуаля, всё работает.

Подскажите пожалуйста, что делать, куда копать.

http://www.sql.ru/forum/1119529/oshibka-opredeleno-slishkom-mnogo-poley


Макрос-выбор значений

Понедельник, 06 Октября 2014 г. 20:21 + в цитатник
Здравствуйте!

Ситуация следующая:
Имеется база данных, которая включает в себя большое множество значений: |счет Дебет|счет Кредит|Назначение|Сумма| То есть большой набор разных сумм сопоставляемых с разными счетами (ДЕБЕТ и КРЕДИТ). В данной базе использованы разного типа счета по КРЕДИТУ.
Помогите пожалуйста сделать выгрузку по каждому определенному типу счета КРЕДИТ
1. С двумя максимальными суммами
2. С двумя средними суммами
3. С двумя минимальными суммами.

То есть чтоб из всех всех значений выгрузилось так


| сч.Дт (любой) | сч.Кт. (одного типа) | Сумма (max)| назначение
| сч.Дт (любой) | сч.Кт. (одного типа) | Сумма (max)| назначение
| сч.Дт (любой) | сч.Кт. (одного типа) | Сумма (средняя)| назначение
| сч.Дт (любой) | сч.Кт. (одного типа) | Сумма (средняя)| назначение
| сч.Дт (любой) | сч.Кт. (одного типа) | Сумма (min)| назначение
| сч.Дт (любой) | сч.Кт. (одного типа) | Сумма (min)| назначение


| сч.Дт (любой) | сч.Кт. (другого типа) | Сумма (max)| назначение
| сч.Дт (любой) | сч.Кт. (другого типа) | Сумма (max)| назначение
| сч.Дт (любой) | сч.Кт. (другого типа) | Сумма (средняя)| назначение
| сч.Дт (любой) | сч.Кт. (другого типа) | Сумма (средняя)| назначение
| сч.Дт (любой) | сч.Кт. (другого типа) | Сумма (min)| назначение
| сч.Дт (любой) | сч.Кт. (другого типа) | Сумма (min)| назначение

и т.д.


Надеюсь понятно смог написать... Заранее сильно благодарен!!!

http://www.sql.ru/forum/1119508/makros-vybor-znacheniy


Как убрать пустоту (уменьшить линейку прокрутки)

Понедельник, 06 Октября 2014 г. 18:14 + в цитатник

При вызове через Eval функция из модуля формы выполняется дважды?

Воскресенье, 05 Октября 2014 г. 23:13 + в цитатник
Здравствуйте!

Разбираюсь с функцией Eval.
Вызываю абсолютно одинаковые функции, находящиеся а) в модуле формы, б) в стандартном модуле.
Результат разный.
При вызове той, которая в модуле формы, результат удваивается.
Простая "учебная" форма с двумя кнопками вызова функций и двумя полями для вывода результатов.
Вот код модуля формы
+
Option Compare Database
Option Explicit
Dim k1 As Integer, _
    m1 As Integer, _
    m2 As Integer

Private Sub Form_Open(Cancel As Integer)
 k2 = 0
End Sub

Private Sub Butt_Eval1_Click()
 m1 = m1 + 1
 FF1 = Nz(FF1) & vbCrLf & m1 & ".   " & Eval("Forms!" & Name & ".Start1")
End Sub

Private Sub Butt_Eval2_Click()
 m2 = m2 + 1
 FF2 = Nz(FF2) & vbCrLf & m2 & ".   " & Eval("Start2()")
End Sub

Function Start1() As Integer
 k1 = k1 + 1
 Start1 = k1
End Function
Вот код стандартного модуля
+
Option Compare Database
Option Explicit
Public k2 As Integer

Function Start2() As Integer
 k2 = k2 + 1
 Start2 = k2
End Function
А вот результат
+
Картинка с другого сайта.
Где-то у меня ошибка. Но найти не могу.
Помогите, пожалуйста.

http://www.sql.ru/forum/1119359/pri-vyzove-cherez-eval-funkciya-iz-modulya-formy-vypolnyaetsya-dvazhdy


If KeyCode = vbKeySubtract Then

Воскресенье, 05 Октября 2014 г. 17:58 + в цитатник
If KeyCode = vbKeySubtract Then

это срабатывает и на Ctrl + "-". Как сделать чтобы срабатывал только на "-" без комбинации с другими?

http://www.sql.ru/forum/1119333/if-keycode-vbkeysubtract-then


Форматирование текста выводимого в Word через VBA

Воскресенье, 05 Октября 2014 г. 16:31 + в цитатник
заполняю из Access шаблон Word, используя закладки. Нужно чтобы то, что вставляется в место закладки (денежная сумма) выглядело следующим образом: 22 222,22 , а не 22222,22.
Вот с таким кодом

.Bookmarks.Item("сумма_долга1").Range.Text = Nz(Format(Forms!Данные!Сумма_долга, "# ### ##0,00"))


в начале ставиться пробел, если в числе больше цифр, чем количество # . Можно исправить?

http://www.sql.ru/forum/1119327/formatirovanie-teksta-vyvodimogo-v-word-cherez-vba


2013 + 64

Воскресенье, 05 Октября 2014 г. 15:39 + в цитатник
Мое почтение коллегам и спасибо заранее.

Есть система на Аксессе 2013. Сейчас ее пытаются запустить под Аксессом не просто 2013, но именно 64-битным. Некоторые файлы открываются, а некоторые приводят к сообщению, что они созданы под 32-битной версией, и просто не открываются.

Вопросы:
1. Прав ли я, что эта проблема может быть только с файлами accde?
2. Если я создам accde из-под 64-битного Аксесса, станет ли он открываться из-под 32-битного?

http://www.sql.ru/forum/1119319/2013-64


Вывод информации в документ Word из Access

Воскресенье, 05 Октября 2014 г. 14:25 + в цитатник
Доброго времени суток!
У пользователя есть шаблоны документов в Word и мне необходимо после открытия документа из Access в нужные места документа вставлять необходимые данные. Возможно ли такое?

http://www.sql.ru/forum/1119311/vyvod-informacii-v-dokument-word-iz-access


Подсчет количества дней в запросе

Пятница, 03 Октября 2014 г. 16:26 + в цитатник
Друзья, вот тут задача. Помогите решить, бьюсь уже очень долго!

Есть таблица
Дата Признак ИНН
01.01.2014 0 0000000000
07.01.2014 0 0000000000
14.01.2014 1 0000000000
.....
01.02.20140 0000000000
.....
01.03.20141 0000000000
....
01.08.20141 0000000000
01.09.20141 0000000000
01.10.20141 0000000000


Дата добавляется с периодом в 7 дней.
Задача: вывести четвертым столбцом количество дней с признаком 1

http://www.sql.ru/forum/1119050/podschet-kolichestva-dney-v-zaprose


Помогите разобраться с кодом

Четверг, 02 Октября 2014 г. 18:00 + в цитатник
Помогите, перевести код из Делфи в vba Access
понимаю, что за чем, а реализовать не могу, очень давно в Делфи с помощью книг наваял

dbModule.TableStore.Append;
if InputForm.ShowModal=mrOk then
    begin
       dbModule.TableStore.FieldByName('S_Quantify').AsFloat := 0;
       dbModule.TableStore.Post;
    end
    else dbModule.TableStore.Cancel;


Как в vba добавить запись в самый конец, т.е. что соответствует Append, Post, Cancel (из Делфи)

И как реализовать ShowModal=mrOk

http://www.sql.ru/forum/1118871/pomogite-razobratsya-s-kodom



Поиск сообщений в rss_sql_ru_access_programming
Страницы: 353 ... 84 83 [82] 81 80 ..
.. 1 Календарь