2 2days Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-23 #88 我也加上刚刚在csdn看到的一个,存成mht文件 function GetMhtText(URL:string):string; var iMsg,iConflevariant; begin imsg:=createoleobject('CDO.Message'); iConf:=CreateoleObject('CDO.Configuration'); imsg.Configuration := iConf; try iMsg.CreateMHTMLBody(url,0,'domain/username','password'); result:=imsg.getstream.readtext; except raise; end; end;
我也加上刚刚在csdn看到的一个,存成mht文件 function GetMhtText(URL:string):string; var iMsg,iConflevariant; begin imsg:=createoleobject('CDO.Message'); iConf:=CreateoleObject('CDO.Configuration'); imsg.Configuration := iConf; try iMsg.CreateMHTMLBody(url,0,'domain/username','password'); result:=imsg.getstream.readtext; except raise; end; end;
魔 魔鬼大师 Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-23 #89 生活就像强奸,要么就反抗要么就去享受 工作就像轮奸,你不行就别人上 社会就像自慰,一切都要靠双手去解决
K kthy Unregistered / Unconfirmed GUEST, unregistred user! 2003-12-21 #95 2days 的方法不错,经测试,在Win2000 Server中有效。不过,因需要CDO的支持,在Win2K Server版以下版本不支持!继续寻找更通用的方法!
L ljl0206 Unregistered / Unconfirmed GUEST, unregistred user! 2004-01-27 #97 2days方法试过了,时灵时不灵;为什么老出现好多乱码,特别是本地的文件,老是出现乱码