-

   rss_sql_ru_access_programming

 - e-mail

 

 -

 LiveInternet.ru:
: 16.03.2006
:
:
: 4

:


, 07 2018 . 11:19 +
!
:
Access 2010 Office Professional 2010,
Frm, - , - .
- SQL Tbl1, x1 ( String)
Tbl2, "--".
Tbl2 Tbl3 x2 ( String).
bl1.[x1] Frm.[x], - .
Frm.[y], - - SQL Tbl3.

OnOpen Frm:

Private Sub Form_Open(Cancel As Integer)
  Dim RecSource As String, S As String

  RecSource = varSQL_PK '     
  Me.RecordSource = RecSource
  S = Me.[x] ' 
  With [y]
    .BoundColumn = 1
    .RowSource = _
      "SELECT Tbl3.[x2], Tbl3.[x3] FROM Tbl3" + _
      " INNER JOIN (Tbl2" + _
      " INNER JOIN " + RecSource + _
      " ON Tbl2.[x1]=" + RecSource + ".[x1])" + _
      " ON Tbl3.[x2]=Tbl2.[x2]" + _
      " WHERE Tbl2.[x1]='" + _
      S + "'" + _
      " ORDER BY Tbl3.[x3];"

    .RowSourceType = "Table/Query"
    .ColumnCount = 2
    .ColumnWidths = "0;3,652"
    .LimitToList = True
    .AllowValueListEdits = False
    .InheritValueList = True

    .Requery
  End With

End Sub

:
1) Frm.[y] , [y]
2) [y] , .. Access
Me.[x], - .

WHERE - , .

?

, , !

P.S. Frm.[y] Tbl1 [y] - - Tbl1 ?
.. , .

http://www.sql.ru/forum/1300582/kontroll-v-forme-ne-pokazyvaet-rezultat-zaprosa


: [1] []
 

:
: 

: ( )

:

  URL