閲覧総計:&counter();  (本日:&counter(today);  昨日:&counter(yesterday);)

 MS-AccessのデータをOleDb接続でハンドリングする際、MS-Accessの各データ型は
OleDbTypeではどの様に表現するか?の対照表は重宝する。
 一覧にまとめてあるページを見付けたのでリンクを張っておく。 10/11/13

↓MS-Accessのデータ型とOleDbTypeの対照表
http://support.microsoft.com/kb/320435/ja

|*MS-Accessのデータ型|*OleDbType|
|テキスト|VarWChar|
【代表例】
|~MS-Accessのデータ型|~OleDbType|
|テキスト型|VarWChar|
|長整数型|Integer|
|テキスト|VarWChar|
|テキスト|VarWChar|
|整数型|SmallInt|
|オートナンバ型|Integer|
|日付/時刻型|Date|
|通貨型|Numeric|

【コード記述例】
 'AccessDBにOleDbで接続
 Using objDb As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\AccessDB.mdb")
     '弁当注文情報の取得
     Dim objCom As New OleDbCommand("SELECT * FROM [弁当注文テーブル] WHERE [名前] = @syainNam AND [昼食日付] = @CalDate", objDb)
     objCom.Parameters.Add("@syainNam", OleDbType.VarWChar, 50)
     objCom.Parameters("@syainNam").Value = Label2.Text
     objCom.Parameters.Add("@CalDate", OleDbType.WVarChar, 10)
     objCom.Parameters("@CalDate").Value = e.Day.Date.ToString("yyyy/MM/dd")
     objDb.Open()
     
     Dim objDr As OleDbDataReader = objCom.ExecuteReader()
     '各日の注文した昼食弁当情報を日付セル(e.Call)配下のコントロールとして追加
     Do While objDr.Read()
         e.Cell.Controls.Clear()
         'e.Cell.Controls.          
         e.Cell.Controls.Add(CancelConfirm(e))
         e.Cell.Controls.Add(New LiteralControl("<br />" & objDr.GetString(3)))
         'Sessionへの情報記述
         Session(e.Day.Date.ToString("yyyy/MM/dd")) = objDr.GetValue(0)
     Loop
 End Using

~
#comment_nospam
#vote(参考になった[0],ふつう[0],参考にならなかった[0])


トップ   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS