DevExpress の XPCollection でのデータ追加です。

VB.net(サーバ側)からXPO経由でデータ追加する手順です。

現状の画面デザインはこのようになっています。

20150629_03

ボタンを配置してVB.net(サーバ側)で県名のレコードを追加します。

【事前準備】

  • DBのテーブルを用意します。
  • 「DevExpress ORM Data Model」を用意します。
    「DevExpress ORM Data Model」作成手順は、過去ブログの「DevExpress の XPO のサンプル作成手順」を参照して下さい。

<テーブル名:SAMPLE.TABLECHIHO>

20150817_01

<テーブル名:SAMPLE.TABLEKEN>

20150818_01

<ORM Data Model:SAMPLE.TABLECHIHO、SAMPLE.TABLEKEN>

20150817_02

<VB.net(サーバ側)で県名のレコードを追加>

・画面に「県名追加」のボタンを用意します。

【生成PG】

  • セッションを生成します。(New DevExpress.Xpo.Session)
  • XPO経由でのデータアクセスを生成します。(New DevExpress.Xpo.XPCollection)
    第一引数:セッション
    第二引数:取得するデータクラス型
  • レコードを作成します。(「都道府県めい」「hoge」を作成する)
  • レコードを追加します。(Add)
    第一引数:追加するレコード
  • レコードを保存します。(Save)
  • グリッドを再描画します。(DataBind)

【生成PG(VB.net)】

 

画面を表示すると「県名追加」のボタンがあります。

20151021_01

「県名追加」のボタンをクリックします。

20151021_02

 

20151021_03

都道府県めい「hoge」が一覧表示されましたので、
VB.net(サーバ側)からXPO経由でデータ追加することが出来ました。