掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
IIfがうまくいきません (ID：81467)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
失敗って、どういうことですか？ 抽出結果が Access での実行結果と異なるということですか？ エラーが発生するということですか？ ちなみに、下のコードを実行するとどうなりますか？ Private Sub pTest() Dim daoDe As DAO.DBEngine Dim daoWs As DAO.Workspace Dim daoDb As DAO.Database Dim daoRs As DAO.Recordset Set daoDe = New DAO.DBEngine Set daoWs = daoDe.CreateWorkspace("", "Admin", "") Set daoDb = daoWs.OpenDatabase("X:\xxx\db1.mdb") Set daoRs = daoDb.OpenRecordset("Select iif(項目１<=項目２,項目２\項目１,項目１) as 項目３ from テーブル") Do While daoRs.EOF = False Debug.Print daoRs!項目3 daoRs.MoveNext Loop daoRs.Close: Set daoRs = Nothing daoDb.Close: Set daoDb = Nothing daoWs.Close: Set daoWs = Nothing Set daoDe = Nothing End Sub
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.