Using Inet1 and mget in VB

I have some VB code which uses inet1 and can "get" single files with no problem. Now I need to use "mget" but do not know how to set the switch so the confirm prompt is not sent when I try to get multiple files. Any help would be greatly appreciated.

FTPGetRoutine_Top:
'Get FTP file
Inet1.Protocol = icFTP
'Inet1.AccessType = icUseDefault
Inet1.AccessType = icDirect
Inet1.UserName = strUserName
Inet1.Password = strPassword
Inet1.URL = "ftp://" & strUserName & ":" & strPassword & "@ftp.mysite.com"
DspStatus.Text = "Connected - Issuing GET"
DspStatus.Refresh
Inet1.Execute , "mget *.*.*.* " + App.Path + "\" + "*.*.*.*.*"
Me.WaitForResponse
If Inet1.ResponseCode = 80 Then
'Kill App.Path + "\smartank" + SavDateTime + ".csv"
MsgBox "ReponseCode: 80"
GoTo FTPGetRoutine_Top
End If
If Inet1.ResponseCode = 123 Then
DspStatus.Text = "FTPGetRoutine Finished - No File"
DspStatus.Refresh
DoEvents
Sleep (5000)
Exit Sub
End If
If Inet1.ResponseCode <> 0 Then
MsgBox "Errorcode: " & Inet1.ResponseCode & " " & Inet1.ResponseInfo
End If
'Inet1.Execute , "QUIT"
'Me.WaitForResponse
DspStatus.Text = "FTPGetRoutine Finished"
DspStatus.Refresh
'
DoEvents
'
Sleep (5000)
'
End Sub

Friend Sub WaitForResponse()
'
Dim fWait As Boolean
fWait = True
Do Until fWait = False
DoEvents
fWait = Inet1.StillExecuting
Loop
'
Exit Sub
End Sub