Источник строк для Новичка!

@Scrat2005 · Регистрация: 04.01.2017

Студворк — интернет-сервис помощи студентам

Доброго времени суток! Дайте ссылку, направление, куда копать, по работе с источником строк-список значений...
не получается у меня чето...

Заранее благодарен за отклик...

@Scrat2005 · 11.05.2017, 20:07 **[ТС]**

Блин , а че 2 раза отправилось????? Вот источники из 2 форм:

@Scrat2005 · 11.05.2017, 20:14 **[ТС]**

для информации: в схеме БД связи между Базой и otr_str_podr НЕТ!!! Я не делал, хотя поле "kod_osp" для связи в тбл. БАЗА есть...))))))

@ltv_1953 · 11.05.2017, 20:51

Макет поправьте. И сделайте связь в базе данных - иначе все время будут подобные проблемы возникать.

@Scrat2005 · 11.05.2017, 22:50 **[ТС]**

ltv_1953, Спасибо. Попробую.

Добавлено через 41 минуту
а почему ширина столбцов 0;9? У меня в других 0;4

@ltv_1953 · 12.05.2017, 06:36

Сообщение от Scrat2005

а почему ширина столбцов 0;9?

По ширине поля в форме - 9,312. Можете поставить любую, лишь бы значения помещались ... .

@Scrat2005 · 12.05.2017, 08:27 **[ТС]**

ltv_1953, Доброго времени суток! Спасибо еще раз! Извиняюсь за наглость... Нужна помощь вот поэтому вопросу:
Пытаюсь связать список и пфФорму. Чтобы при выборе например "Архив", в пф появлялись значения только Архива. Не могу сообразить как их связать через основные и подчиненные поля.... или может другой путь подскажете...
В базе запустить форму frmPortfeli.

@Scrat2005 · 12.05.2017, 21:33 **[ТС]**

Доброго времени суток, господа Профессионалы!!! Не ругайте, заранее приношу свои извинения, что не создал тему. Дабы не плодить тему "Импорт из Ексель...". Потому как темы импорта очень много на форуме.
Делаю импорт из Ексель в Акссес вот таким кодом:

PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Private Sub ImportExcel_Click()
Dim app As Object, wrk As Object
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("select * from Tenders")
Set app = CreateObject("excel.application")
Set wrk = app.workbooks.Open("C:\Áàçà\øàáëîí ýêñåëü.xlsx")
rst.AddNew
rst![DataNproject] = app.Range("C2")
rst![DataKproject] = app.Range("D2")
rst![Ïëîùàäêà] = app.Range("E2")
rst![Íîìåð_çàêóïêè] = app.Range("F2")
rst![Íàèìåíîâàíèå_ïðîåêòà] = app.Range("G2")
rst![Çàêàç÷èê_Ðåãèîí] = app.Range("H2")
rst![Ñóììà] = app.Range("I2")
rst![Öåíà_EXCCOM] = app.Range("J2")
rst![Ïîáåäèòåëü] = app.Range("K2")
rst![Öåíà_ïîáåäèòåëÿ] = app.Range("L2")
rst![Ïðèìå÷àíèå] = app.Range("M2")
rst![Ðàçìåð_äåìïèíãà] = app.Range("N2")
'...................................
rst.Update
app.Quit
 
End Sub

Все прекрасно работает за одним исключением. После импорта процессе системы остается EXCEL*32(2 дня не мог догадаться). Из-за него, я так думаю, не работает повторно импорт.Нажимаю кнопку, ничего не происходит. Делаю снять задачу, Импорт работает...
Дайте подсказку плиз...

Новые блоги и статьи Все статьи Все блоги /
Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .

@Scrat2005 2 / 2 / 1 Регистрация: 04.01.2017 Сообщений: 166

	Источник строк для Новичка! 11.05.2017, 09:29. Показов 7178. Ответов 26 Метки нет (Все метки) Доброго времени суток! Дайте ссылку, направление, куда копать, по работе с источником строк-список значений... не получается у меня чето... Заранее благодарен за отклик... Миниатюры 0

@Scrat2005 2 / 2 / 1 Регистрация: 04.01.2017 Сообщений: 166
	11.05.2017, 20:07 [ТС]
	Блин , а че 2 раза отправилось????? Вот источники из 2 форм: Миниатюры 0

@Scrat2005 2 / 2 / 1 Регистрация: 04.01.2017 Сообщений: 166
	11.05.2017, 20:14 [ТС]
	для информации: в схеме БД связи между Базой и otr_str_podr НЕТ!!! Я не делал, хотя поле "kod_osp" для связи в тбл. БАЗА есть...)))))) 0

@ltv_1953 17536 / 7288 / 1663 Регистрация: 21.06.2012 Сообщений: 13,957
	11.05.2017, 20:51
	Макет поправьте. И сделайте связь в базе данных - иначе все время будут подобные проблемы возникать. Миниатюры 1

@Scrat2005 2 / 2 / 1 Регистрация: 04.01.2017 Сообщений: 166
	11.05.2017, 22:50 [ТС]
	ltv_1953, Спасибо. Попробую. Добавлено через 41 минуту а почему ширина столбцов 0;9? У меня в других 0;4 0

@Scrat2005 2 / 2 / 1 Регистрация: 04.01.2017 Сообщений: 166
	12.05.2017, 08:27 [ТС]
	ltv_1953, Доброго времени суток! Спасибо еще раз! Извиняюсь за наглость... Нужна помощь вот поэтому вопросу: Пытаюсь связать список и пфФорму. Чтобы при выборе например "Архив", в пф появлялись значения только Архива. Не могу сообразить как их связать через основные и подчиненные поля.... или может другой путь подскажете... В базе запустить форму frmPortfeli. Миниатюры 0