VB6.0でDAOを用いてデータベースにアクセスする方法 (ID:103052)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 自己解決です。 Set ws = DBEngine.Workspaces(0) → Set ws = DBEngine.CreateWorkspace("", "", "", dbUseODBC) とし、 Set rs = db.OpenRecordset( strSql ) → Set rs = db.OpenRecordset(strSql, dbOpenDynaset) とすることでエラーが出なくなりました。