邮件服务器-邮件系统-邮件技术论坛(BBS)
标题:
谁有WEBEASYMAIL二次开发经验？
[打印本页]
作者:
parabird
时间:
2004-9-24 01:20
标题:
谁有WEBEASYMAIL二次开发经验？
阿
作者:
电脑报
时间:
2004-9-24 13:26
标题:
re:我没有，相信也不多
我没有，相信也不多
作者:
甘哥
时间:
2004-10-7 23:20
标题:
re:我在测试的时候做过一个asp,调用它的s...
我在测试的时候做过一个asp,调用它的sdk中的对象，显示所有用户、email地址及注册信息。
作者:
电脑报
时间:
2004-10-9 18:33
标题:
re:楼上的大侠，是否能有机会看到你二次开发的...
楼上的大侠，是否能有机会看到你二次开发的经验成果？
作者:
甘哥
时间:
2004-10-10 19:29
标题:
re:好象有个对象可以列出可以列出用户名。...
好象有个对象可以列出可以列出用户名。<br>
每个用户名都是mail目录下的目录，用fso打开用户目录下的moreinfo文件读去用户信息。再next。
作者:
电脑报
时间:
2004-10-10 22:08
标题:
re:看样子好像不错，虽然我不是很懂～
看样子好像不错，虽然我不是很懂～
作者:
甘哥
时间:
2004-10-10 23:07
标题:
re:
<html><br>
<head><br>
<title>Untitled Document</title><br>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"><br>
</head><br>
<br>
<body bgcolor="#FFFFFF"><br>
1<%<br>
Set easymail = Application("em")<br>
<br>
count=easymail.GetUsersCount()<br>
%> <br>
<table width="80%" border="1" cellspacing="0" cellpadding="0" align="center"><br><tr> <br><td> <br><div align="center">编号</div><br></td><br><td><br><div align="center">email</div><br></td><br><td> <br><div align="center">姓名</div><br></td><br><td> <br><div align="center">部门</div><br></td><br></tr><br><%<br>
for i=0 to count-1<br>
easymail.GetUserByIndex i, outname, outdomain, outcomment<br>
<br>
Set fs = Server.CreateObject("Scripting.FileSystemObject")<br>
path=Server.MapPath("../")&"\mail\"&outname&"\MoreInfo.ini"<br>
'response.write path&"<br>"<br>
Set f = fs.OpenTextFile(path,1)<br>
<br>
f.SkipLine<br>
f.SkipLine<br>
f.SkipLine<br>
f.SkipLine<br>
f.SkipLine<br>
f.SkipLine<br>
f.SkipLine<br>
<br>
if not f.AtEndOfStream then <br>
f.Skip(8)<br>
name=Trim(f.ReadLine)<br>
else<br>
name=""<br>
end if<br>
<br>
'f.SkipLine<br>
<br>
if not f.AtEndOfStream then <br>
f.Skip(7)<br>
dep=Trim(f.ReadLine)<br>
else<br>
<br>
dep=""<br>
end if<br>
%> <br><tr> <br><td> <br><div align="center"><%=i%></div><br></td><br><td><%=outname&"@"&outdomain%></td><br><td> <br><div align="center"><%=name%></div><br></td><br><td> <br><div align="center"><%=dep%></div><br></td><br></tr><br><%<br>
<br>
f.close<br>
set f=nothing<br>
set fs=nothing<br>
next<br>
%> <br>
</table><br>
<%<br>
Set easymail = nothing <br>
%> <br>
<p></p></body><br>
</html>
作者:
电脑报
时间:
2004-10-14 11:34
标题:
re:谢谢楼上的兄弟分享我收下了
谢谢楼上的兄弟分享<br>
我收下了<br>
欢迎光临 邮件服务器-邮件系统-邮件技术论坛(BBS) (http://bbs.5dmail.net/)
Powered by Discuz! X3.2