Mail Merge

Does anyone know how to access a query instead of a table whilst doing a mail merge from access in VB?? The current code I have is;


    'Start a new main document for the mail merge.
    Set oMainDoc = oApp.Documents.Add

    With oMainDoc.MailMerge

        'Setting Mail Merge typ eot directory, not letter. This will allow a list
        'of records apposed to a new record on each page
         .MainDocumentType = wdDirectory

        'Set up the mail merge data source to MySQL - Dissertation using Access front end
        sDBPath = "C:\Documents and Settings\Andy\My Documents\Disertation\VB Project\Database\ODBC.mdb"
        .OpenDataSource Name:=sDBPath, _
           SQLStatement:="SELECT * from [fullreport]"

        'Add the field codes to the document to create the form letter.
         With .Fields
         'Setting the question fields
         
            Set oSel = oApp.Selection
            'Selecting the range of data from the table
            'Formatting mail merge
            oSel.TypeParagraph
            oSel.TypeText "Question:  "
            .Add oSel.Range, "Question"
            'Formatting mail merge
            oSel.TypeParagraph
            oSel.TypeParagraph
            'Setting the question fields
            oSel.TypeText "Answer:  "
            'Selecting the range of data from the table
            .Add oSel.Range, "Answers"
            'Formatting mail merge
            oSel.TypeParagraph
        End With
    End With
   
   
        With oMainDoc
   
        'Perform the mail merge to a new document.
        .MailMerge.Destination = wdSendToNewDocument
        .MailMerge.Execute Pause:=False

    End With