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

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

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

Заполнение таблицы с условием

Воскресенье, 01 Июня 2014 г. 00:10 + в цитатник
Скажите, как сделать следующее:
допустим, есть таблица с двумя столбцами. В первом столбце, например, название товара. Во втором количество заказанных единиц. В базе для каждого Клиента и для каждого его обращения ведётся запись того, что он заказывает. Список товаров постоянный. Нужно при нажатии на кнопку заполнить шаблон ворд и таблицу. Причём так, чтобы в таблице напротив каждого товара выставилось значение: если клиент заказал товар, то проставилось его количество, если нет, то прочерк.
Например. Есть шаблон с перечнем товаров в первом столбце: Молоко, Квас, Сало, Полотенце, Очки, Плед.
Клиент заказал только Очки - 2шт. Значит в таблице нужно проставить везде прочерки напротив наименований товара. А напротив Очки поставить 2.

В базе записываются только те товары, которые клиент заказал и их количество.

Как такое сделать?
Методом поиска и замены со сдвигом вправо? Или как?

http://www.sql.ru/forum/1097933/zapolnenie-tablicy-s-usloviem


Сортировка записей в форме

Суббота, 31 Мая 2014 г. 22:18 + в цитатник
Есть форма А, которая берет свои значения из таблицы Б.
В форме А необходимо сделать возможность сортировать данные по датам. Сделать это предполагается с помощью кнопки и текстового поля, т.е. вводишь в текстовое поле дату, нажимаешь на кнопку и выдаются только те записи, которые соответствуют этой дате. Так же хотелось бы чтобы была возможность сортировки "между датами".
Я в аксессе полный профан. очень надеюсь на вашу помощь.

http://www.sql.ru/forum/1097926/sortirovka-zapisey-v-forme


группировка

Суббота, 31 Мая 2014 г. 21:36 + в цитатник
Скажите, по умолчанию (без указания как сортировать), группы в поле запроса всегда расположены по возрастанию

http://www.sql.ru/forum/1097923/gruppirovka


help

Суббота, 31 Мая 2014 г. 20:55 + в цитатник
Столкнулся с такой проблемой.
Создаю таблицу с двумя столбцами, в которых должны хранится числа с максимум тремя знаками после запятой (3,260; -6,589; 5,000 и т.д.). Соответственно, для каждого столбца выбираю размер поля "одинарное с плавающей точкой", формат поля "фиксированный", число десятичных знаков "3" и ввожу данные.
Затем создаю запрос в котором вывожу эти два столбца и добавляю третий, в котором произвожу сравнение первого столбца со вторым и, в случае выполнения условия, вывожу значение первого столбца, если же условие не выполняется - второго столбца.
Проблема в том, что после вывода данных в третьем столбце запроса, вместо, например, числа 5,000 выводится число 5,00000009536743.
В чем тут проблема?

http://www.sql.ru/forum/1097917/help


Ошибка в коде VBA

Суббота, 31 Мая 2014 г. 18:31 + в цитатник
Создал тестовую базу специально чтобы оттестить работу заполнения шаблона. В Форме Клиент есть кнопка. При нажатии на кнопку происходит заполнение шаблона Word методом поиска и замены. А так же в коде вызывается функция, которая должна из запроса zzz с параметром отбора по id клиента из формы заполнить таблицу в том же документе Word, начиная с закладки NZ. А в столбце Num должна проставить нумерацию по порядку. Ну так вот. Наживаю кнопку. Документ заполняется и всё. Ошибок никаких не пишет, но из запроса он таблицу не заполняет. Причём я пробовал ту же схему и с запросом обычынм (без условий отбора). Тот же эффект.

Прикладываю базу в Access 2000 и файл *.dot
В коде VBA нужно будет поменять абсолютный пусть к этому файлу, чтобы заработало хоть что-то.

Подскажите, что не так???? А то я в толк не возьму(

http://www.sql.ru/forum/1097906/oshibka-v-kode-vba


Обращение к неактивному значению поля на субформе

Суббота, 31 Мая 2014 г. 12:00 + в цитатник
Подскажите пожалуйста!
Как обратиться к неактивному значению поля на субформе?
Поле состоит, например, из трех строк одного столбца таблицы.

К активному - понятно: Me.Controls("субформа1").Form.ИмяПоля
Если бы дело происходило на самой форме в листбоксе, то
Me.ИмяПолясосписком.Column(1, 0)
Me.ИмяПолясосписком.Column(1, 1)
Me.ИмяПолясосписком.Column(1, 3)

А вот к неактивному значению поля на субформе так не получается:
Me.Controls("субформа1").Form.ИмяПоля.Column(1, 0) - ошибка

http://www.sql.ru/forum/1097882/obrashhenie-k-neaktivnomu-znacheniu-polya-na-subforme


есть запрос все работает но при выполнении запроса запрашивает значения

Пятница, 30 Мая 2014 г. 23:33 + в цитатник
есть запрос все работает но при выполнении запроса запрашивает значения , как обойти чтоб не запрашивало


SELECT F1_inf_lac.Lname, Sum(F1_inf_lac.[Sale]) AS Выражение1, Sum(F1_inf_lac.[change]) AS Выражение2, Sum(F1_inf_lac.[rent]) AS Выражение3, [Выражение1]+[Выражение2]+[Выражение3] AS Выражение4
FROM F1_inf_lac
GROUP BY F1_inf_lac.Lname, [Выражение1]+[Выражение2]+[Выражение3]
HAVING (((F1_inf_lac.Lname) In (SELECT [Lname] FROM [F1_inf_lac] As Tmp GROUP BY [Lname] HAVING Count(*)>1 )))
ORDER BY F1_inf_lac.Lname;

http://www.sql.ru/forum/1097853/est-zapros-vse-rabotaet-no-pri-vypolnenii-zaprosa-zaprashivaet-znacheniya


как в вычислении выражения приплюсовать ноль вместо незаполненой записи

Пятница, 30 Мая 2014 г. 21:42 + в цитатник
то есть имеется : Выражение1: [Count-rent]+[Count-change]+[Count-Sale]

надо Выражение1: ЕСЛИ нет записи в [Count-rent] ТО [Count-rent] равняется нулю +[Count-change]+[Count-Sale] теперь это можно ли записать в машинном коде в ACCESS

http://www.sql.ru/forum/1097840/kak-v-vychislenii-vyrazheniya-priplusovat-nol-vmesto-nezapolnenoy-zapisi


тема старая но подзабыл

Пятница, 30 Мая 2014 г. 21:15 + в цитатник
имею запрос с общим подсчётом записей, некоторые записи не заполнены:

Field1 Filed2
St1 da da
St2 da
St3 da da

В итоге:
St1 = 2
St2 = ___
St3= 2

Как сделать чтобы St2 в Field2 автоматом взял ноль чтоб в итоге ST2 был равен 1 то есть St2=1

вот запрос:

SELECT query1.Lname, Sum(query1.[Count-Sale]) AS [Sum-Count-Sale], Sum(query2.[Count-rent]) AS [Sum-Count-rent], Sum(query3.[Count-change]) AS [Sum-Count-change], [Count-rent]+[Count-change]+[Count-Sale] AS Выражение1
FROM query3 RIGHT JOIN (query2 RIGHT JOIN (query1 RIGHT JOIN Lac ON query1.Lname = Lac.Поле1) ON query2.Lname = Lac.Поле1) ON query3.Lname = Lac.Поле1
GROUP BY query1.Lname, [Count-rent]+[Count-change]+[Count-Sale];

http://www.sql.ru/forum/1097836/tema-staraya-no-podzabyl


Всплывающие подсказки у Node в TreeView и у Item в ListView существует такое?

Пятница, 30 Мая 2014 г. 17:56 + в цитатник

Библиотека zLIB, файл без заголовка.

Пятница, 30 Мая 2014 г. 17:32 + в цитатник
Здравствуйте.
Уважаемые подскажите пожалуйста, всю кукушку уже сломал как что к чему.....
Есть файл прайс-листа поставщика (в прикреплённом к данной статье архиве файл file1.paq) зажат он библиотекой zLIB, без заголовка.
Идея в следующем: научить базу разархивировать этот файл. В приложенном архиве есть маленький пример того как работает эта библиотека, причём
сжать и разжать (во словечко ) файл она может, но только тот файл который сама сжала. Изучив разницу между файлом сжатой это БД и файлом получаемым от поставщика выяснилось что не хватает первых 8 бит в файле - заголовка файла.
Если в коде кнопки "Извлечь"

ПОСТАВИТЬ КОМЕНТАРИЙ ----> Get InFL, , InBuffSize ' Compressed buffer size
'InBuffSize = 409612 <---- УБРАТЬ КОМЕННТАРИЙ
ПОСТАВИТЬ КОМЕНТАРИЙ ----> Get InFL, , OutBuffSize ' Decompressed buffer size
'OutBuffSize = InBuffSize <---- УБРАТЬ КОМЕННТАРИЙ

то часть файла поставщика разархивируется, т.е. только первые 409612 байт а остальное нет.
Может кто что подскажет в этом вопросе? Описание библиотеке смотрел - мало что понял.

Заранее спасибо за дельные советы.

Архив лежит тут: http://yadi.sk/d/v4W3tL7eRiCBa

http://www.sql.ru/forum/1097795/biblioteka-zlib-fayl-bez-zagolovka


Суммирование в подчиненной форме

Пятница, 30 Мая 2014 г. 00:42 + в цитатник
на форма Категории не получается просуммировать все значения гонорара в подчиненной таблице. Пишу =Sum(CInt([Поле14])).. Прикрепляю саму базу данных

http://www.sql.ru/forum/1097667/summirovanie-v-podchinennoy-forme


сложение данных из 2-х разных запросов

Пятница, 30 Мая 2014 г. 00:15 + в цитатник
Добрый день!
Задача такова: нужно сложить количество товара из двух разных запросов, чтоб итоговая цифра получилась в третьем.
Выборка должна происходить по коду препарата.

Картинка с другого сайта.

это должно быть как то вот так:

Количество: [Ведомость_реализованной_продукции].[Количество]+[Ведомость_учета_продукции_по_доп_заявкам].[Количество]

только как это сделать.......

на схеме это выглядит так:
Картинка с другого сайта.

Если кто-нибудь поможет, буду очень благодарна!

http://www.sql.ru/forum/1097662/slozhenie-dannyh-iz-2-h-raznyh-zaprosov


Помогите решить проблему

Четверг, 29 Мая 2014 г. 23:44 + в цитатник
Хочу изменить базу, после изменения текста выдаёт данную ошибку.

Подскажите как сделать так, чтобы можно было начать изменять?

http://s1.hostingkartinok.com/uploads/images/2014/05/a4f29c5888d70c010a49b7ed66c60566.jpg

http://www.sql.ru/forum/1097658/pomogite-reshit-problemu


Дважды не работает GetCursorPos

Четверг, 29 Мая 2014 г. 21:37 + в цитатник
Две траблы в простом коде обычного модуля 2003:

Option Compare Database
Option Explicit

Private Type POINTAPI
   xxx As Integer
   yyy As Integer
End Type

Private Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
'
Sub sb_MoveMouse()
Dim uXY As POINTAPI
    Debug.Print GetCursorPos(uXY)
    Debug.Print uXY.xxx; uXY.yyy
End Sub

'---------------------------
'Microsoft Visual Basic
'---------------------------
'Run-time error '49':
'
'Bad DLL calling convention
'---------------------------
'OK Help
'---------------------------


1. Постоянно дает координату Y = 0. X опеределяет правильно.
2. Выходит из процедуры с ошибкой 49. Декомпайл не помогает...

Чо ей надо?

http://www.sql.ru/forum/1097640/dvazhdy-ne-rabotaet-getcursorpos


Задать формулу в итоге отчете для вычисления процентов

Четверг, 29 Мая 2014 г. 20:55 + в цитатник
Cоздала отчет, исходные данные из таблицы в суммовом выражении, а отчет надо рассчитать в процентах. Задала формулу, считает, но только если в группе больше одного значения. А нужно чтобы заполнены были все строчки.Не понимаю в чем ошибка.

http://www.sql.ru/forum/1097635/zadat-formulu-v-itoge-otchete-dlya-vychisleniya-procentov


не получается определить написать код

Четверг, 29 Мая 2014 г. 18:46 + в цитатник
Суть проста: есть поле в таблице, куда вносится информация о пользователе, если запись редактируется, то вносить ничего не нужно. Написал, но почему-то не работает, может кто поможет

Ошибка где-то тут: If Len(m) = Null Then

Private Sub Form_AfterUpdate()
Dim WshNetwork As Object
Dim CpmputerName As String

Dim rst As Recordset
Set rst = CurrentDb.OpenRecordset("Select Юзер From Заявки WHERE Код = " & Код & "")
m = rst.Fields("Юзер").Value
rst.MoveFirst
rst.Close
Set rst = Nothing


'Определяем Юзера
Set WshNetwork = CreateObject("WScript.Network")
CpmputerName = WshNetwork.ComputerName
Set WshNetwork = Nothing

  If Len(m) = Null Then    
 CurrentProject.Connection.Execute "UPDATE Заявки SET Юзер = '" & CpmputerName & "', ВремяВнесенияЗаписи = '" & TimeValue(Now()) & "', ДатаВнесенияЗаписи = '" & DateValue(Now()) & "' WHERE Код = " & Код & " "
 End If
End Sub

[/SRC]

http://www.sql.ru/forum/1097600/ne-poluchaetsya-opredelit-napisat-kod


Дата изменения связанной таблицы

Четверг, 29 Мая 2014 г. 18:09 + в цитатник
Посоветуйте пжлст метод (конечно если вообще возможно такое) узнать дату изменения прилинкованной таблицы из другой базы.
Ситуация такая:
Асс 2000. Есть база А в которой прилинкована таблица из другой базы Б. Датой изменения таблицы является дата ее локальных обработок в процедуре А. Но сама исходная таблица базы Б, к которой прилинкована А изменилась (обновилась и дата ее создания и изменения), но в базе А таблица так и остается со старой датой. Я пробовал обновить связи вручную через "Диспетчер связанных таблиц" - бестолку, дата изменения остается старой. Если же "убить" линк и связать заново, то датой становится текущая дата, что тоже не подходит. А мне бы нужно в идеале например через tdf.Properties("LastUpdated").Value знать дату реального изменения таблицы в базе Б (там то у таблицы дата как раз которая и нужна).
Конечно если бы это была база в файле например dbf или др., то я мог бы прочитать аттрибуты через FSO, но как залезть за ними в базу Асс просто не догоняю!

Это реально? Спасибо!

http://www.sql.ru/forum/1097590/data-izmeneniya-svyazannoy-tablicy


Не работает кнопка

Четверг, 29 Мая 2014 г. 15:56 + в цитатник
Подскажите, пожалуйста, с чем может быть проблема (у меня все работает, а у пользователя нет, удаленно подключиться нет возможности, офис 2010, 32бит - такой же как у меня):

На форме есть кнопка - и при нажатии не реагирует

обработчик:
Private Sub Кнопка15_Click()

If new_stage = "" Then
MsgBox "текст", vbCritical, "тект"
GoTo ex
End If

здесь инсерт в таблицу

ex:
DoCmd.Close acForm, "form"

End Sub

У пользователя включены все макросы, activex

http://www.sql.ru/forum/1097551/ne-rabotaet-knopka


как добавить Primary Key (PK) в новую таблицу с помощью Query

Четверг, 29 Мая 2014 г. 14:26 + в цитатник
Всем доброго времени суток
Использую следующий запрос для обработки данных

SELECT Atacand_Brand_Total.ClientID, Atacand_Brand_Total.ClientsName, Atacand_Brand_Total.ClientsAddress, Atacand_Brand_Total.[Macro Region], Atacand_Brand_Total.[SLSM Brick], Atacand_Brand_Total.Subject, Atacand_Brand_Total.CompanyType, Atacand_Brand_Total.CompanyChannel, Atacand_Brand_Total.CustomerGroup, Atacand_Brand_Total.StatementID, Atacand_Brand_Total.Brand, Atacand_Brand_Total.Product, Atacand_Brand_Total.SumOfSumOfAmount, Atacand_Brand_Total.SumOfSumOfValue_CP, [ClientID] & [Brand] AS Code
FROM Atacand_Brand_Total;

в эту таблицу хочу добавить новую колонку (SKU_ID) с PK (в столбце должна быть номер типа 1, 2, 3, и далее)
знаю что используется следующий код:

ALTER TABLE Atacand_Brand_Total
ADD CONSTRAINT PK_Number PRIMARY KEY (SKU_ID)


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

http://www.sql.ru/forum/1097525/kak-dobavit-primary-key-pk-v-novuu-tablicu-s-pomoshhu-query



Поиск сообщений в rss_sql_ru_access_programming
Страницы: 353 ... 50 49 [48] 47 46 ..
.. 1 Календарь