Visual Basic Oracle Database 11ｇ Release 1

Size: px

Start display at page:

Download "Visual Basic Oracle Database 11ｇ Release 1"

よしたかまるこ
5 years ago
Views:

1 Visual Basic Oracle Database 11g Release 初音玲 XML WEB サービス Part.3

2 index WEBサービス OracleとADO.NETの関係接続データ取得データ更新権限

3 自己紹介 Z80 アセンブラ 6809 アセンブラ F-BASIC N88-BASIC FORTRAN 77 COBOL LISP Turbo Pascal Prolog KABA C 言語 M シリーズアセンブラ PL/I VB3.0~ PL/SQL T-SQL VB2005/2008

4 はじめに WEBサービス OracleとADO.NETの関係接続データ取得データ更新権限

5 XMLWEB サービスとは XML XML SOAP XML

6 SOAP とは POST /WankumaTokyo22/Connection.asmx HTTP/1.1 Host: localhost Content-Type: application/soap+xml; charset=utf-8 Content-Length: length <?xml version="1.0" encoding="utf-8"?> <soap12:envelope xmlns:xsi= > <soap12:body> : </soap12:body> </soap12:envelope> HTTP/ OK Content-Type: application/soap+xml; charset=utf-8 Content-Length: length <?xml version="1.0" encoding="utf-8"?> <soap12:envelope xmlns:xsi= > <soap12:body> : </soap12:body> </soap12:envelope>

7 Windows アプリ +WEB サービス Win アプリ XML WEB サービス DB

8 WEB アプリ +WEB サービスブラウザ WEBアプリ XML WEBサービス DB FW

9 WEB サービスの配置について開発環境実行環境 MSIL 手動 XCOPY MSIL 初回時 naitive サイトの発行 MSIL 手動 XCOPY MSIL 初回時 naitive MSIL FTP MSIL 初回時 naitive HTTP MSIL 初回時 naitive ソース手動 XCOPY ソース初回時 MSIL 初回時 naitive

10 Web サイトの発行 WEB アプリのときは aspx ファイルの内容をサイト上で更新できるかを決定 ASPX dll (aspx.vb の MSIL) JIT コンパイルテンポラリアセンブリ

11 プロジェクトと仮想フォルダの関係についてソリューション IIS プロジェクト 1 仮想フォルダ 1 WP プロジェクト 2 仮想フォルダ 2 WP プロジェクト 3 仮想フォルダ 3 WP プロジェクト 4 仮想フォルダ 4 WP

12 はじめに WEBサービス OracleとADO.NETの関係接続データ取得データ更新権限

13 ADO.NET の基本的な構造.NET データプロバイダ Parameter DataAdapter プログラミング Command Connection DataReader Transaction DataSet プログラミングデータベース Windows コントロール ASP.NET コントロール

14 ODP.NET の基本的な構造 ODP.NET OracleParameter OracleDataAdapter プログラミング OracleCommand OracleConnection OracleDataReader OracleTransaction DataSet プログラミング Oracle Database Windows コントロール ASP.NET コントロール

15 Visual Studio ビルドアセンブリ ODT デプロイ.NET ストアド ( アセンブリ ) ODP.NET ODP.NET ODE.NET ODP.NET ODP.NET:Oracle Data Provider for.net ODT :Orace Developer Tools for Visual Studio ODE.NET:Oracle Database Extensions for.net Oracle Database

16 対応 DB バージョン ODT 10.1.x.x Oracle 9i Database Release 2 Oracle Database 10g Release 1 ODT Oracle 9i Database Release 2 Oracle Database 10g Release 1 Oracle Database 10g Release 2 対応 Visual Studio Visual Studio.NET 2003 Visual Studio.NET 2003 ODT Oracle8i R 以降 Visual Studio.NET 2003 Visual Studio 2005 ODT Oracle 9i Database Release 2~ Visual Studio.NET 2003 Visual Studio 2005 Visual Studio 2008 ~ODT 10.2: サーバーエクスプローラとは別 ODT 11.1~: サーバーエクスプローラに統合

17 専用ミドルウェアはやっぱり速い OLE DB.NET Data Provider OLE DB Provider for Oracle ODP.NET oo4o ログオン参照追加更新 VB2005+oo4o の処理時間を 1 としたときの相対比独自プログラムによる測定 17

18 DataSet クラスメモリ上の仮想データベース DataTablesコレクション DataTable クラス DataRowsコレクション DataColumnsコレクション Constraintsコレクション DataRelations コレクション RDBMSのリレーション定義に相当親子関係を定義行列主キー, 外部キー制約

19 ODP.NET OracleConnection オブジェクト特定のデータソースへの接続を確立 OracleCommand オブジェクトデータソースに対してコマンドを実行 OracleDataReader オブジェクトデータソースから前方向読取専用でデータ取得 OracleDataAdapter オブジェクト DataSet を設定しデータソースを使用して更新内容を解決

20 index WEBサービス OracleとADO.NETの関係接続データ取得データ更新権限

21 OracleConnection オブジェクト <WebMethod(Description:=" 認証チェック ")> _ Public Function IsLogin2(ByVal userid As String, _ ByVal password As String) As Boolean Dim isok As Boolean = False Dim cn As New OracleConnection() cn.connectionstring = _ String.Format(Setting.ConnectionString, userid, password) cn.open() isok = True Try cn.close() Catch ex As Exception End Try End Function

22 Try~Catch ADO.NET からのエラーの取得エラー処理をおこなって呼び出し元に戻る cn.open を Try~Catch で囲む Catch には Exception Global.asax エラーは例外として呼び出し元に戻るエラーログを一元取得したいとき Try~Catch では囲まない

23 接続接続処理切断疑似接続疑似切断疑似接続疑似アプリケーション切断 ODP.NET 疑似 DB サーバ User Id={0};Password={1};Data Source= ホスト文字列 ; ODP.NET のデフォルト動作は Pooling=True

24 index WEBサービス OracleとADO.NETの関係接続データ取得データ更新権限

25 OracleDataReader <WebMethod(Description:="EMP テーブルから EMPNO,ENAME を取得する ")> _ Public Function GetRecords(ByVal userid As String, _ ByVal password As String) As (Of TStatus) Using _cn As New Oracle.DataAccess.Client.OracleConnection() : Using _cmd As New OracleCommand(sqlString, _cn) Dim rd As OracleDataReader = Nothing rd = _cmd.executereader Do While rd.read Dim item As New TStatus item.empno = rd.item("empno").tostring item.ename = rd.item("ename").tostring emp.add(item) Loop End Using _cn.close() End Using Return emp End Function

26 Parameter オブジェクト以下の条件を与えたときの実行結果は?

27 index WEBサービス OracleとADO.NETの関係接続データ取得データ更新権限

28 データソースと DataSet クラスの対応付け.NET データプロバイダには更新可能セットがない DataSet は仮想的なデータベースもちろん更新も可能.NET データプロバイダと DataSet の相互乗り入れ DataSet によるデータソースの更新可能セットを実現アプリデータソース Command DataAdapter Dataset

29 OracleDataAdapter オブジェクト <WebMethod(Description:="EMP テーブルを取得する ")> _ Public Function GetRecords(ByVal userid As String, _ ByVal password As String) As System.Data.DataSet Const sqlstring As String = "SELECT * FROM EMP" Dim Ds As New System.Data.DataSet Using _cn As New OracleConnection() _cn.connectionstring = String.Format(Setting.ConnectionString, userid, password) _cn.open() Using _cmd As New OracleCommand(sqlString, _cn) Using _da As New OracleDataAdapter(_cmd) _da.fill(ds, "EMP") End Using End Using _cn.close() End Using Return Ds End Function

30 OracleCommandBuilder で SQL 作成 Using _tr As OracleTransaction = _cn.begintransaction() Using _cmd As New OracleCommand(sqlString, _cn) _cmd.transaction = _tr '### 重要 ### Using _da As New OracleDataAdapter(_cmd) Using cb As New OracleCommandBuilder(_da) _da.updatecommand = cb.getupdatecommand() _da.insertcommand = cb.getinsertcommand() _da.deletecommand = cb.getdeletecommand() _da.update(ds, "EMP") isok = True If isok Then _tr.commit() Else _tr.rollback() End If End Using End Using End Using End Using

EMPTableAdapterオブジェクト OracleCommand OracleConnection オブジェクトオブジェクト

31 暗黙的なトランザクション TableAdapter ごとに Connection が存在 Connection に対するトランザクションでは無理 DEPTTableAdapterオブジェクト OracleCommand OracleConnection オブジェクトオブジェクト EMPTableAdapterオブジェクト OracleCommand OracleConnection オブジェクトオブジェクト Oracle Database MS-DTC ( マイクロソフト分散トランザクションコーディネータ ) System.Transactions クラスを使う 31

32 暗黙的なトランザクション Try Me.Validate() Using _trn As New System.Transactions.TransactionScope Me.DEPTBindingSource.EndEdit() Me.DEPTTableAdapter.Update(Me.DataSet1.DEPT) ' Me.EMPBindingSource.EndEdit() Me.EMPTableAdapter.Update(Me.DataSet1.EMP) ' _trn.complete() ' トランザクション完了 End Using Catch ex As System.Transactions.TransactionAbortedException MessageBox.Show(ex.Message) Catch ex As Exception End Try MessageBox.Show(ex.Message) ADO.NET 2.0 からは COM+ カタログ登録不要 GAC への登録不要 System.Transactions の参照設定を忘れないように 32

33 index WEBサービス OracleとADO.NETの関係接続データ取得データ更新権限

34 接続はアプリ固有ユーザ ID 権限コネクションプーリングアプリ側でアクセス制御直接ツールで接続されたら? アプリ側にバグがあったら? 接続は利用者固有ユーザ ID コネクションプーリング DB の設定でアクセス制御直接ツールで接続されても安全アプリ側にバグがあっても安全

35 Oracle におけるユーザ管理 Oracle 認証 Oracle インスタンスユーザー Security Policy 認証権限 Windows 認証 Windows Oracle インスタンスユーザーユーザー Security Policy 認証 Security Policy ローカル認証だと 4 万人くらいが限界なので AD 認証も考慮権限

36 Windows アプリにおけるお勧め認証構造 Win アプリ XML WEB サービス DB ID/ パス渡し DB 認証 Windows 認証

37 WEB アプリにおけるお勧め認証構造ブラウザ WEBアプリ XML WEBサービス DB ID/ パス渡し DB 認証

38 まとめ接続接続プーリングデータ取得コード記述開発 GUI 操作開発権限 Oracle 認証 Windows 認証データ更新 CommandBuilder トランザクション

MVP for VB が語る C# 入門

MVP for VB が語る C# 入門 2008.08.09 初音玲自己紹介 Z80 アセンブラ 6809 アセンブラ F-BASIC N88-BASIC FORTRAN 77 COBOL LISP Turbo Pascal Prolog KABA C 言語 M シリーズアセンブラ PL/I VB3.0~ PL/SQL T-SQL VB2005/2008 index Microsoft Visual