![]() |
запрос на выборку в Аксесе
вот такое дело пишу запрос на выборку данные из запроса беруться из полей в форме у меня 20 полей и в базе 5000 клиентов. надо чтобы осуществлялся запрос по нескольким полям (не поконкретным а именно поразным) как это сделать??
|
попробуй так:
Dim curtab As Database, recsec As QueryDef Dim inteval As Integer, strsecSQL As String, Srname As String, st As String Set curtab = CurrentDb inteval = Me.Grupsector.Value Srname = "Sector" st = Srname & "_#" & inteval strsecSQL = "SELECT [" & st & "].Id, [" & st & "].Num, [" & st & "].Surname, [" & st & "].Data, FROM [" & st & "] ORDER BY [" & st & "].Data;" curtab.QueryDefs.Delete ("Calculsector") Set recsec = curtab.CreateQueryDef(Srname, strsecSQL) DoCmd.OpenForm "Receipt" DoCmd.Close acForm, "Mainform", acSaveYes но я менял здесь имя таблицы а тебе ставить критерий на поле |
как с тобой связаться7??
как с тобой связаться??? кроме мыла!
|
| Часовой пояс GMT +4, время: 11:48. |
Powered by vBulletin® Version 3.8.5
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.