VB如何发送文件到邮箱

'先下载jmail.dll，放到c:\windows\下，jmail.dll下载地址：;fr=01txf_fid=391f53f49109d2e911c33b3edbec6d49d718e398

Dim jmail

Private Sub Command1_Click()

Set jmail = CreateObject("jmail.Message")

jmail.Charset = "gb2312"