9570_ja-JP

liliconcom

Access データベースからテーブルのリストを取得する<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />

こんにちは、

アプリケーションビルダーで、ネイティブ機能とJSLを使用してユーザーフォームを作成しようとしています。 私にはアイデアがあり、次に進む必要があります...

まず、Access データベース内のすべてのテーブルのリストを取得する方法を知っている人はいますか? もちろん、そのリストはユーザーフォームにあります。

ご支援ありがとうございます。JMP 11 の操作を開始します。

Re: Access データベースからテーブルのリストを取得する

1. アクセスでモジュールを作成し、このコードを貼り付けます。
2. デバッグウィンドウで実行
3. 生成されたテーブル リストをイミディエイト ウィンドウにコピーします。

Public Sub List_fields_in_tables()
    Dim tdf As DAO.TableDef
    Dim fld As DAO.Field

    For Each tdf In CurrentDb.TableDefs
        If Left(tdf.Name, 4) <> "MSys" Then
            Debug.Print
            Debug.Print
            Debug.Print tdf.Name
            Debug.Print "----------------------------------------"
    
            
            For Each fld In tdf.Fields
                Debug.Print fld.Name & Space(20 - Len(fld.Name)) & fld.Size & Space(10 - Len(Str(fld.Size))) & FDataType(fld.Type)
        
            Next fld
        End If
    Next tdf

End Sub

Private Function FDataType(intType As Integer) As String

    Dim RetString As String
    
    Select Case intType
        Case 1
            RetString = "Boolean"
        Case 8
            RetString = "Date"
        Case 3
            RetString = "Integer"
            
        Case 7
            RetString = "Double"
        
        Case 10
            RetString = "String"
            
        Case 4
            RetString = "Long Integer"
        
        Case Else
            RetString = "Unknown"
            
    End Select
    
    FDataType = RetString

End Function

 

 

Re: Access データベースからテーブルのリストを取得する

ありがとうエリック、

非常に明確でより完全にするために、私はこれを使用しました：

"SELECT MSysNameMap.Name FROM MSysNameMap WHERE (MSysNameMap.Type = 1)"

その後：

各行 (List1 << append(:Name))

--> 完璧に動作します!

ありがとうございました。

Re: Access データベースからテーブルのリストを取得する

ほとんどのデータベースには、WHERE 句などに一致するデータベース内のすべてのテーブルのリストを取得するために SQL クエリを書き込むことができるシステム ビューがあります。私は MS Access を持っていませんが、いくつかの Google 検索を行うと、次のようなものがうまくいくかもしれません:

SELECT MSysObjects.Name FROM MSysObjects WHERE (MSysObjects.Type = 1);

あなたも試してみてください」 WHERE (MSysObjects.Type = 6) " を WHERE 句として使用します。したがって、JSLを使用できますデータベースを開く関数を使用してそのクエリを MS Access に送信すると、Access テーブル名を含む JMP データ テーブルが得られます。各行。

MS Access 情報を見つけた場所へのリンクを次に示します。

ms access - すべてのテーブルからすべてのフィールドを返すSQL文

MsysObject の使用

HTH、

エリック

Re: Access データベースからテーブルのリストを取得する

ご協力ありがとうございました。

これは、データベースに接続できるようにするためのヘルプ ファイルです。 データベースで使用可能なすべてのテーブル名のリストを自分で作成したいと考えています。

何かのようなもの：

x=リスト()

my_database の各テーブル定義

x1<

(x, x1) に挿入します。

最後に、少し複雑です。 JMP テーブルに格納されているものを使用して SQL ステートメントを自動的に作成したいと考えています。 ほぼ完成、きっと… . しかし、その前のステップとして、ユーザーがその JMP テーブルに情報を簡単に保存できるようにしたいと考えています。 彼は 2 つのリストから選択する必要があります。最初にデータベース内のテーブルを選択し、次にこのテーブルで彼が興味を持っている特徴を選択します。 次に「OK」をクリックすると、彼の選択が JMP テーブルに保存されます。 次に、SQL ステートメントをコンパイルして、その JMP テーブルに格納されているすべての選択肢についてデータベースからデータを取得できます。

私が明確であることを願っています...野心的ですか？

Re: Access データベースからテーブルのリストを取得する

http://www.jmp.com/software/whitepapers/pdfs/102427_jmp_odbc.pdf

これはオンラインで見つけたもので、データベースと JMP を接続するための段階的な手順が記載されており、そこから取得できます。

よろしく

ウダイ