ある nakagami の日記

.NET Provider のインストールパスや接続文字列は、適当に変更してくだされ

import clr
from System import Environment

fbClientFolder = Environment.GetFolderPath(
                        Environment.SpecialFolder.ProgramFiles)

# Append %ProgamFiles%\FirebirdClient
clr.Path.append(fbClientFolder + '\\FirebirdClient')
clr.AddReferenceToFile('FirebirdSql.Data.FirebirdClient.dll')

from FirebirdSql.Data.FirebirdClient import *

conn_string = '''
User=SYSDBA;
Password=masterkey;
Database=c:\\test.fdb;
DataSource=localhost;
Port=3050;Dialect=3;
Charset=SJIS_0208;
Role=;
Connection lifetime=0;
Connection timeout=15;
Pooling=True;
Packet Size=8192;
Server Type=0'''

def fb_tables():
    sqlStmt = '''select rdb$relation_name TABLE_NAME,
                rdb$owner_name TABLE_OWNER, rdb$view_source VIEW_SOURCE,
                rdb$system_flag SYSTEM_FLAG
                from rdb$relations where rdb$flags=1
                order by rdb$relation_name'''
    conn = FbConnection(conn_string)
    conn.Open()
    cmd = FbCommand(sqlStmt, conn)
    dr = cmd.ExecuteReader()
    for r in dr:
        print r['TABLE_NAME'], r['TABLE_OWNER']

if __name__ == '__main__':
    fb_tables()