2009-07-28 15 views
1

私はAccess 2007データベースに格納されている添付ファイルを電子メールで送信する簡単なルーチンを作成しようとしています。何らかの理由で、私はそれの最も単純な部分を働かせることはできません。Access 2007のField2へのアクセス

は、私は次の行の「ユーザー定義型は定義されていません」というエラーが出ます:私はアクセスしていないこの時点まで今

Dim attachmentField As DAO.Field2 

任意のDAOはまだオブジェクトが、私の仮定はIということでした関連する参照を追加するだけです。私は、その参照が何であるかについて誤解を持っているようです。私は "Microsoft DAO 3.6 Object Library"を試してみましたが、同じエラーメッセージが表示されています。それから、私は同じものの3.5を試してから、JETを試してみました。

ここでは完全なリストがあります。本当に基本的なことが分からない場合は、こちらをご覧ください。私はそれが大変なクリーンアップを必要としていることを知っていますが、まずそれを働かせたいと思います。

Private Sub Command4_Click() 
    Dim appOutLook As Outlook.Application 
    Dim MailOutLook As Outlook.MailItem 
    Set appOutLook = CreateObject("Outlook.Application") 
    Set MailOutLook = appOutLook.CreateItem(olMailItem) 

    With MailOutLook 
    .To = Description.Value 
    .Subject = "Confirmation of " & ID.Value 

    'Error on the next line 
    Dim attachmentField As DAO.Field2 
    attachmentField = Recordset("Att") 
    attachmentField.SaveToFile "C:\Temp\" & Att.FileName 
    Attachments.Add "C:\Temp\" & Att.FileName, olByValue, 1, "Document" 

    '.DeleteAfterSubmit = True 
    .Send 
    End With 
End Sub 

答えて

4

あなたはDAOバージョン12を参照する必要がある - "Microsoft Officeの12.0 Accessデータベースエンジン"

-2

変更も

Dim attachmentField As DAO.Field 

に行、レコードセットから来るのでしょうか?レコードはどこにありますか?

+0

いや - この参照を追加する新しいFIELD2オブジェクト

てみをサポートしています。私はField2を探しています - それはあなたが添付ファイルのフィールドを操作するために必要なものです。 –