|
|
|
| Как из Экселя изменить условие в запросе MS ACCESS? Подключаюсь через DAO. | |
|
| |
|
|
|
| именно условие или можно весь текст?
Querydefs("Запрос").SQL = "Select ....."
|
| |
|
| |
|
|
|
| именно условие на выборку. Только с SQL вообще не работал никогда. Желательно через то, к чему боль менее привык:
Dim Db As Database
Dim rrr As Recordset
Set Db = OpenDatabase(vspom.Cells(1, 1), True, False, "MS Access")
Set rrr = Db.OpenRecordset("запрос_склад", dbOpenDynaset)
трампапа
rrr.Close
Set rrr = Nothing
Db.Close
Set Db = Nothing
Вот что мне вместо трампапа вставить? | |
|
| |
|
|
|
| жаль что только условие, как только условие незнаю... если целиком текст запроса, то так
Dim Db As Database
Dim rrr As Recordset
Set Db = OpenDatabase(vspom.Cells(1, 1), True, False, "MS Access")
Db.querydefs("запрос_склад").sql = "SELEСТ......."
Set rrr = Db.OpenRecordset("запрос_склад", dbOpenDynaset)
rrr.Close
Set rrr = Nothing
Db.Close
Set Db = Nothing
|
| |
|
| |