| |
|
|
| | подскажите пожалуйста, имеется таблица в которой поле со счетчиком от 1 до 10, так вот как через VB написать обращение, например на 3 строку определенного поля? 
заранее благодарю  | |
| |
| |
| |
|
|
| | Чтобы к кому-то обратиться надо точно знать его "имя"
посмотрите функцию -
msgbox Dfirst("поле","таблица","[поле_счётчик] = 3" )
|
 | |
| |
| |
| |
|
|
| | поскольку это ключевое поле и возвращаемая запись одна, то dlookup будет логичнее, по моему. | |
| |
| |
| |
|
|
| | а если например нужно будет обратиться ко всем записям из одного поля по очереди, тогда как ? | |
| |
| |
| |
|
|
| | читать Help про Recordset | |
| |
| |
|
|
| |
|
|
| | По выполнении доложить по команде  | |
| |
| |
|
|
| |
|
|
| | Уважаемый час подскажите пожалуйста, есть поле со списком где указаны начальные буквы договоров, К; В и О, так вот в форме мне нужно создать поля общей суммы и отдельно К, В, О
с общей суммой все понятно, а по отдельность, что то не варится , пробую вот так:
[Поле28] = Sum("Общее", "Общее январь", "[К/В/О] = К")
буду очень благодарен | |
| |
| |
| |
|
|
| | Уважаемый час подскажите пожалуйста, есть поле со списком где указаны начальные буквы договоров, К; В и О, так вот в форме мне нужно создать поля общей суммы и отдельно К, В, О
с общей суммой все понятно, а по отдельность, что то не варится , пробую вот так:
[Поле28] = Sum("Общее", "Общее январь", "[К/В/О] = К")
буду очень благодарен | |
| |
| |
| |
|
|
| | Немного не так...
Так как К - строковое значение - условие надо попробовать заключит в апостофы ' К '
а SUM попробовать заменитьна DSUM
Поле28] = Sum("Общее", "Общее январь", "[К/В/О] = 'К'")
====================================================
а поле общее - оно это суммы? числовое или денежное оно???
Поле28] =DSUM("Общее", "Общее январь", "[К/В/О] = 'К'")
Поле29] =DSUM("Общее", "Общее январь", "[К/В/О] = 'В'")
Поле30] =DSUM("Общее", "Общее январь", "[К/В/О] = 'О'") | |
| |
| |
| |
|
|
| | да поле "общее" денежное, только он ругается на ошибку 3075, ошибка синтаксиса, пропущен оператор в выражении запроса sum(общее)
что то начал считать, только не понятно, что! совсем другие суммы | |
| |
| |
| |
|
|
| | Это хорошо.....
может сюда таблицу с формой положишь??? | |
| |
| |
| |
 18 Кб. |
|
| | Вот примерно такая форма | |
| |
| |
| |
33 Кб. |
|
| | Чёта Вы не так делаете или не то.......
Но из того что Вы прислали вот два варианта
обратите внимание добавлен запрос....... | |
| |
| |
| |
|
|
| | Странно, спасибо вам большое, будем грызть дальше 
Все получилось! Огромное спасибо час!!!!!! | |
| |
| |
| |
|
|
| | Час, а если есть второйкритерий? например по контракту К/В/О имеются оплаченые и не оплаченые можно ли вписать второй критерий?
[Поле11] = DSum("Общее", "Общее январь", "[Проплата] = 'Оплачено'", "[К/В/О] = 'К' ") | |
| |
| |
| |
|
|
| | Конечно можно.....
тока надо вместо запятой_________ And ________ писать, как в условиях запросов.
Что бы понять как писать - в конструкторе можете создать запрос с двумя условиями и посмотреть результат - что выводит запрос..
если Вас устраивает -
откройте запрос в режиме строки SQL...........
Эту строку можно вставить в код VBA ,
и она будет работать аналогично тому, что мы пишем ...
========================================================
Поэкспериментируйте с запросами как описано выше
У Вас сразу появится прогресс в программировании
(Моё мнение)
=======================================================
вот пример использования строк запросов
DoCmd.RunSQL("SELECT proff FROM proff_t;") -
==========================================================
или вот
Dim SQL_Text as String
SQLText = "INSERT INTO T_Orders ( Order_Numb, ITEMDESC, XTNDPRCE, QUANTITY ) SELECT SOPNUMBE, ITEMDESC, XTNDPRCE, QUANTITY " & _
"FROM SOP30300 where SOPNumbe='" & Me.Previous_Order_ & "' or sopnumbe='" & Me.ReplOrder_ & "' or sopnumbe='" & Me.CR_ & "'"
'
DoCmd.RunSQL SQLText
|
===========================================================================
или вот
Public Sub RUN_Query
Dim SQL_Text as String
SQL_Text = "Delete * from Моя_Табла"
Удаляем все записи из таблицы
используя при этом строку, созданную в конструкторе запросов.
Docmd.RunSQL (SQL_Text, false)
End Sub
|
| |
| |
| |
| |
|
|
| | Вот посмотри
моё_Поле = DSum("[СтоимостьДоставки]", "Заказы", _
"[СтранаПолучателя] = 'Литва' AND [ДатаИсполнения] > #1-1-95#")
|
Все условия отбора в общих кавычках.......... | |
| |
| |
| |
|
|
| | Спасибо Час, я так и сделал, 2 дня интернета небыло чтоб отписаться, огромное спасибо Час! | |
| |
| |
| |
|
|
| | Я так и сделал час, 2 дня интернета небыло чтоб просмотреть, вот и начал эксперементировать, огромное спасибо за совет, и за подсказки | |
| |
| |
