任意の場所に新規データベースを作るには？ (ID:108912)

名前

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

本文 > VB6でJet3.0です。 Jet 4.0 (Access 2000相当)でも Jet 3.5x(Access 97相当)でもなく、 Jet 3.0 (Access 95相当)ですか…？ > 既定のWorkspaceにしか作れません。(T_T) DAOの Workspaceオブジェクトの事でしょうか。 (規定のWorkspaceだと、何か問題があるのでしょうか?) 任意のWorkspaceを生成し、その中でデータベースを作成したいなら、 Dim WS As DAO.Workspace Dim DB As DAO.Database Set WS = DBEngine.CreateWorkspace(〜〜〜) Set DB = WS.CreateDatabase(〜〜〜) のようなイメージになるかと。