我用NMSMTP控件写了个发送邮件的程序。发送的地址是[email protected]
由于我这里比较特殊,局域网内大家通过代理上网,设代理的同事用猫拨号,用wingate做代理。
他的ip 是134.33.32.155
请问我该怎样通过代理发送邮件呢?就象foxmail设置socket5代理一样。
我的连接邮件服务器代码为:
self.NMSMTP1.Host:='134.33.32.155';//我写 smtp.sina.net//提示连接不上
self.NMSMTP1.UserID:='wchen';
self.NMSMTP1.Port:=80;
self.NMSMTP1.Connect;发送邮件代码:
self.NMSMTP1.PostMessage.FromAddress:= self.LabeledEdit7.Text;
self.NMSMTP1.PostMessage.FromName:= self.LabeledEdit8.Text;
self.NMSMTP1.PostMessage.ToAddress.Text:= self.LabeledEdit4.Text;
self.NMSMTP1.PostMessage.Subject:=self.LabeledEdit6.Text;
self.NMSMTP1.PostMessage.Body.Text:=self.MemoEx1.Lines.Text;
self.NMSMTP1.SendMail;
请问我该怎样做才能发送出去?
由于我这里比较特殊,局域网内大家通过代理上网,设代理的同事用猫拨号,用wingate做代理。
他的ip 是134.33.32.155
请问我该怎样通过代理发送邮件呢?就象foxmail设置socket5代理一样。
我的连接邮件服务器代码为:
self.NMSMTP1.Host:='134.33.32.155';//我写 smtp.sina.net//提示连接不上
self.NMSMTP1.UserID:='wchen';
self.NMSMTP1.Port:=80;
self.NMSMTP1.Connect;发送邮件代码:
self.NMSMTP1.PostMessage.FromAddress:= self.LabeledEdit7.Text;
self.NMSMTP1.PostMessage.FromName:= self.LabeledEdit8.Text;
self.NMSMTP1.PostMessage.ToAddress.Text:= self.LabeledEdit4.Text;
self.NMSMTP1.PostMessage.Subject:=self.LabeledEdit6.Text;
self.NMSMTP1.PostMessage.Body.Text:=self.MemoEx1.Lines.Text;
self.NMSMTP1.SendMail;
请问我该怎样做才能发送出去?
解决方案 »
- 自己写的图形程序,在写GUI时,请教如何设定IME中文编辑那个窗口到指定坐标?
- 如何能让dbgrid1.columns[i].picklist在选中单元格时就自动弹出列表来?
- pointer(x)和@x有什么区别?
- 关于dBgrid的小问题.
- 请问谁碰到过Access + Delphi + Excel打印出现方框字符的问题
- 求救各位大侠,请问谁有完成端口的技术资料?
- 100分求Delphi8 for .NET下载地址,构架版,企业版都行。
- 一个dll中pchar返回值的问题
- activex时而灵时而不灵
- 高手帮忙,调用地图数字化的文件的问题!
- 又是关于IntraWeb & TMS!
- 高分求教:修改了计算机名称之后,怎样使SQLServer7.0能够继续干活???
self.NMSMTP1.Port:=21;
2、
邮件服务器地址和USERID必须正确,就可以连接成功。试试sina.net。
3、
如果发送不出去,就要看看是否需要进行密码验证。