Eeeek Option Strict On [Resolved]

[Oliver1]

Just reading a post about Option Strict On, not being on by default, so thought I know I'll go into my project and switch it ON.
Thinking to myself that It'll all be fine, low and behold I get about a trillion error messages. Anyway most are easy peasy. Am a little stuck on the below.
I do a lot of interaction in my project with outlook. How would I do the below with option strict on.
It says option strict disallows late binding, which is were I get stuck, as how can I pre assign the below before runtime, as I don't know how many e-mail will be in the inbox, if any.
Anyway very confused.

For x = myitems.Count To 1 Step -1
                objSafeMail.item = myitems(x) 'errors here
                Me.txttotalemail.Text = CStr(CInt(Me.txttotalemail.Text) + 1)
                Me.txtcurrmess.Text = myitems(x).Subject 'errors here
                mtype = emailtype()
 
                If typeemail(mtype) = True Then
                    myitems(x).Delete() 'errors here
 
                Else
                    myitems(x).Move(destfolder) 'errors here
 
                End If
            Next x