关于CDONTS的有关问题，特别

关于CDONTS的问题，在线等～～～～～特别急
用CDONTS.Session来收邮件为什么不行？要在服务器上设置什么吗？      
    我的代码：      
                Dim   sess   As   CDONTS.Session   =   New   Session
                sess.LogonSMTP( "jiangchuan ",   "[email protected] ")

                Dim   inb   As   Object   =   sess.GetDefaultFolder(1)


                'Dim   inb   As   Object   =   sess.Inbox
                Dim   mess   As   Messages   =   inb.messages

                Dim   i   As   Integer   =   mess.Count    

    其中mess.count总为0，可我明明有邮件的（[email protected]）

------解决方案--------------------
我来帮顶，顺便接分...