Date: Wed, 25 Jun 2003 15:16:42 +0900
From: "Yonetsuka" <who@example.co.jp>
米塚です。
自分で解決してしまいました。すいません。
---------------------------------
Private Sub cboTest_AfterUpdate()
Dim cn As New ADODB.Connection
Dim sqlstr As String
cn = CurrentProject.Connection
'--- ＳＱＬの生成
sqlstr = "select XXX from tblTEST"
'---- RowSource へセット＆再表示
Set Me.lstTEST.RowSource = sqlstr
Me.lstTEST.Requery
cn.Close
Set cn = Nothing
End Sub
------------------------------------
これで良かったんですね。
失礼しました。
| [MSDE/SQLServerに関して、今、どんなことにお困りですか？] |
| よろしければお困りの内容を、電子メールで教えて下さい。 |
|
質問を電子メールで作成する
|
[ウィンドを閉じる][MSDE/SQLServer FAQ ][MSDE / MSDE2000 技術サポート情報一覧]
|
