|
|
|
 |
添付ファイル型フィールドで選択する |
|
|
|
|
|
|
添付ファイル型フィールドの個々のファイル情報を参照するときは、「フィールド名.FileName」（ファイル名）、「フィールド名.FileType」（種類／拡張子）のようにフィールド名に必要なプロパティを指定し記述します。SELECT句に定義すれば選択結果に、WHERE句に定義すれば抽出条件として使用できます。
|
|
|
|
|
|
| 添付ファイル型フィールドを使いレコードを選択する例 |
|
|
|
|
次のプログラムは、VBAを使い添付ファイル型フィールド内に特定の種類のファイルが保存されているレコードを処理するサンプルです。DAOを使い選択クエリ（SELECT文）を実行しています。添付ファイル型フィールドは「報告書」です。
選択フィールドや抽出条件では、前述の通り「フィールド名.FileType」と記述しているのがポイントです。
Sub Sample(pFindKey As Long)
Dim objMDB As DAO.Database
Dim objRS As DAO.Recordset
Dim strSQL As String
Set objMDB = Application.CurrentDb
strSQL = "SELECT 報告日付, 報告者コード, 報告書.FileType As 種類" _
& " FROM 業務日報マスタ" _
& " WHERE 報告書.FileType = " & pFindKey
Set objRS = objMDB.Execute(strSQL)
Do Until objRS.EOF = True
'①
'ここで必要な処理を行う
objRS.MoveNext
Loop
objRS.Close
Set objRS = Nothing
Set objMDB = Nothing
End Sub
|
※サンプルでは、具体的な処理内容（①のコメントの部分）は割愛しています
参考までに、選択するファイルの種類(pFindKey)は引数で指定しています。また、コネクションはDAO(DAO.Database)を使用しています。
|
|
|
|
|
※
※ 
※
へジャンプします。※は共著作品）