qq怎么发邮件

如何批量发送html邮件,使⽤qq邮箱批量发送邮件实例源码

（⽀持富⽂本）

【实例简介】

【实例截图】

【核⼼代码】

usingSystem;

c;

entModel;

;

g;

;

;

;

usingWinHtmlEditor;

;

;

namespaceMailSending

{

publicpartialclassForm1:Form

{

publicForm1()

{

InitializeComponent();

}

privatevoidForm1_Load(objectnder,EventArg)

{

//初始化邮箱服务器

//DictionarydicList=newDictionary();

//("",25);

//("",25);

//("",25);

//("",25);

//("",25);

//("",25);

//("",25);

//foreach(varitemindicList)

//{

//();

//}

//edIndex=0;

//初始化⽪肤

//le="";

//le="";

//le="";

le="";

m(this);

nerHTML="";

//me=newFontFamily("Arial");

//ze=;

}

privatevoidbutton1_Click(objectnder,EventArg)

{

//固定只能看表格

="MicrosoftExcelfiles(*.xls)|*.xls;*.xlsx";

lDirectory=pPath;

//路径选择

DialogResultdr=alog();

if(dr==)

{

stringfilepath=me;

stringfullname=ing(dexOf(@"")1);

stringfilename=ing(0,dexOf("."));

//路径添加到textBox

=filepath;

#region读取相应的表名的Excel⽂件中数据到当前DataGridview中显⽰

stringstrConn=("Provider=.12.0;""DataSource={0};""ExtendedProperties='Excel

8.0;HDR=NO;IMEX=1';",());

if((ension(())).ToLower()==".xls")

{

strConn="Provider=.4.0;""datasource="()";ExtendedProperties=Excel5.0;Persist

SecurityInfo=Fal";

//sConnString="Provider=.4.0;DataSource="()";ExtendedProperties="Excel

8.0;HDR="strHead";IMEX=1"";

}

using(OleDbConnectionoleDbConn=newOleDbConnection(strConn))

{

();

DataTabledt=DbSchemaTable(,newobject[]{null,null,null,"TABLE"});

//判断是否cmb中已有数据，有则清空

urce=null;

();

//遍历dt的rows得到所有的TABLE_NAME，并Add到cmb中

foreach()

{

((String)drow["TABLE_NAME"]);

}

if(>0)

{

edIndex=0;

}

}

getExcelDataByTableName((),strConn);

#endregion

}

}

//按Excel表名查询表下所有数据

publicvoidgetExcelDataByTableName(stringsTableName,stringstrConn)

{

OleDbConnectionole=null;

OleDbDataAdapterda=null;

DataTabledtShow=null;

stringstrExcel="lect*from["sTableName"]";

try

{

ole=newOleDbConnection(strConn);

();

da=newOleDbDataAdapter(strExcel,ole);

dtShow=newDataTable();

(dtShow);

urce=dtShow;

intj=0;

[j].="序号";

for(inti=0;i<;i)

{

j=i1;

[i].=ng();

}

//因为⽣成Excel的时候第⼀⾏是标题，所以要做如下操作：

//1.修改DataGridView列头的名字，

//2.数据列表中删除第⼀⾏

//intaaa=;

//for(inti=0;i<;i)

//{

////s[i].AutoSizeMode=ls;

////s[i].Name=s[i].ColumnName;

//s[i].=[0][i].ToString();//c#winform⽤代码修改DataGridView列头的名

字，设置列名,修改列名

//}

//DataGridView删除⾏

//([0]);//删除第⼀⾏

//(tRow);//删除当前光标所在⾏

//([-1]);//删除最后⼀⾏

//();//删除所有⾏

();

}

catch(Exceptionex)

{

(e);

}

finally

{

if(ole!=null)

();

}

}

privatevoidbutton2_Click(objectnder,EventArg)

{

if(().Length==0||().Length==0)

{

("发件⼈和密码不能为空!");return;

}

if(().Length==0||().Length==0)

{

("中⽂名称和标题不能为空!");return;

}

intconut=;

intbb=0;

intcc=0;

for(inti=0;i

{

//获取发送内容

stringcontent=[i].Cells[0].ng().Trim();

//判断邮箱类型("",25);

//("",25);

//("",25);

//("",25);

//("",25);

//("",25);

//("",25);

stringsmtp="";

if(ns("@"))

{

smtp="";

}

elif(ns("@"))

{

smtp="";

}

elif(ns("@"))

{

smtp="";

}

elif(ns("@"))

{

smtp="";

}

elif(ns("@"))

{

smtp="";

}

elif(ns("@"))

{

smtp="";

}

elif(ns("@"))

{

smtp="";

}

//滚动到发送的⾏

tCell=[i].Cells[0];

//设置⾏样式为红⾊

[i].Cells[0].lor=;

//发送邮件

boolflag=il(,,,,,

nerHTML,content,openFileDialog1,smtp,null);

//判断记录发送成功和发送失败的数量

if(flag)

{

bb;

}

el

{

cc;

}

}

("发送完成！共发送"(bbcc)"条！成功："bb"条！失败："cc"条！");

//boolflag=il(,,,,

,nerHTML,,openFileDialog1,,null);

//if(flag)

//{

//("发送成功！");

//}

//el

//{

//("发送失败！");

//}

}

//privatevoiddataGridView1_RowPostPaint(objectnder,DataGridViewRowPostPaintEventArg)

//{

//Rectanglerectangle=newRectangle(on.X,on.Y,

dersWidth-4,);

//xt(cs,(ex1).ToString(),,

rectangle,

//lor,

//alCenter|);

//}

}

}