在excel2003中如何使用条件格式设置自动提醒 推荐回答:
如图:
以提前3天红底色提醒为例:
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/ejc/)选中区域--点"格式"--"条件格式"--"公式"--"=$B2-3=TODAY()"--"格式"--'图案"--选红色--"确定',如图:
--"确定",效果如图:
在ASP程序中打印Excel报表的新方法
目前,B/S模式(浏览器/服务器模式)成为企业网上首选的计算模式。由于B/S模式的特殊性,在C/S下相对较易实现的Excel报表打印功能在B/S下却成为一个难点。本人通过研究写了一个基于ASP程序的打印Excel报表的程序。本程序的特点是无须任何组件。
Print.asp
------------------------------------------------
htmltitle打印Excel报表/title
%
'控制脚本语言
response.write"script language="&"VBScript"&""
%
//*****************本程序由火星工作室提供(andy2001p@hotmail.com)******************
//*******************版权所有 随意拷贝********************************
function ccprint()
Set xlApp = CreateObject("EXCEL.APPLICATION")
//打开工作表!
Set xlBook = xlApp.Workbooks.Open("c:book1.xlt")
set xlsheet1 = xlBook.ActiveSheet
% db="zhk.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
set rsd=server.createobject("adodb.recordset")
str="select * from cjb00"
rsd.open str,conn
ii=1
do while not rsd.eof and ii11
%
%response.write"xlSheet1.cells("&ii+4&",2).value="%"%=rsd("姓名")%"
%response.write"xlSheet1.cells("&ii+4&",3).value="%"%=rsd("学号")%"
%
rsd.movenext
ii=ii+1
loop
rsd.close
set rsd=nothing tuLaoShi.com;
%
xlSheet1.Application.Visible = True
end function
//*****************本程序由火星工作室提供******************
%
response.write"/script"
%
htmltitle打印Excel报表/title
body
center
h2font color=red学生表(Demo)/font/h2
p /p
form name="fmp" method="post" action=""
%
db="zhk.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
set rsd=server.createobject("adodb.recordset")
str="select * from cjb00"
rsd.open str,conn
%
table width="396" height="58" border="1" bordercolor="#00FF00" bgcolor=lightyellow
tr bgcolor=deepskyblue
thb姓名/b/th
thb学号/b/th
/tr
%
do while not rsd.eof
%
tr align=center
td %=rsd("姓名")%
/td
td %=rsd("学号")%
/td
/tr
%
rsd.MoveNext
loop
%
% rsd.close
set rsd=nothing
conn.close
set cnn=nothing %
/table
p
input name="Submit2" type="button" onclick="ccprint()" onDblClick="ccprint()" value="打印"
br
/p
/form
/center
/body
/html
如何把php导出的Excel 作为邮件发送
现在实现了点击后下载excel,和发送文本邮件的功能,怎么能结合下,把php导出的excel作为附件发送就完美了。
1 .生成excel:
header("Content-type:application/octet-stream");
header("Accept-Ranges:bytes");
header("Content-type:application/vnd.ms-excel");
header("Content-Disposition:attachment;filename=".$filename.".xls");
header("Pragma: no-cache");
header(tulaoShi.com"Expires: 0");
if (!empty($title)){
foreach ($title as $k = $v) {
$title[$k]=iconv("UTF-8", "GB2312",$v);
}
$title= implode("t", $title);
echo "$titlen";
}
if (!empty($data)){
foreach($data as $key=$val){
foreach ($val as $ck = $cv) {
$data[$key][$ck]=iconv("UTF-8", "GB2312", $cv);
}
$data[$key]=implode("t", $data[$key]);
}
echo implode("n",$data);
}
2 . 发送邮件:
用了phpmailer类库
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/ejc/)$mail = new PHPMailer();
$mail-CharSet = 'UTF-8';
$mail-IsSMTP();
$mail-SMTPAuth = true;
$mail-SMTPSecure = '';
$mail-Host = $config['SMTP_HOST']; // SMTP 服务器
$mail-Port = $config['SMTP_PORT']; // SMTP服务器的端口号
$mail-Username = $config['SMTP_USER']; // SMTP服务器用户名
$mail-Password = $config['SMTP_PASS']; // SMTP服务器密码
$mail-SetFrom($config['FROM_EMAIL'], $config['FROM_NAME']);
$replyEmail = $config['REPLY_EMAIL']?$config['REPLY_EMAIL']:$config['FROM_EMAIL'];
$replyName = $config['REPLY_NAME']?$config['REPLY_NAME']:$config['FROM_NAME'];
$mail-AddReplyTo($replyEmail, $replyName);
$mail-Subject = $subject;
$mail-MsgHTML($body);
$mail-AddAddress($to, $name);
if(is_file($attachment)){ // 添加附件
$mail-AddAttachment($attachment);
}
return $mail-Send()
------解决方案--------------------
第7行处加入
ob_start();
第23行后加入
$s = ob_get_flush();
file_put_contents($filename.".xls", $s);
$attachment = $filename.".xls";
执行邮件发送
------解决方案--------------------
肯定是你哪里出错了,认真检查一下
你实际输出的是文本文件,用记事本就可打开
ob 函数的功能、用法,手册中都有
------解决方案--------------------
汗!那样导出的还没有路径,你如何作为附件发送呢??
你这不是天方夜谭么?
------解决方案--------------------
提个思路,你可参考下:
先把excel保存在服务器上,然后获得该excel的路径,然后作为附件进行email发送,如果你不需要这个文件了,然后再执行删除操作就OK了