：凭证打印-传SQL到打印界面的方法

1. 首先将sql赋给excel_sql

    excel_sql=sql

2. 添加保存sql的文本框和提交的表单

<form method="post" name="print_to">

<%if excel_sql&"CS"<>"CS" then excel_sql=DSConvert(Lcase(excel_sql),1)  '半角转全角%>

<textarea name="excel_sql" id="excel_sql" style="width:0;height:0;border:none;" ><%=excel_sql%></textarea>

</form>

补充说明：用到DSConvert()函数需要先引入下面这个文件

<!--#include file="../mrp/function/sql_replace.asp"-->

3. 添加打印的按钮

 <input type="button" name="buttonprint" id="buttonprint" class="button_60px" value="打印" style="padding-left:5px;" onmouseout="this.style.backgroundPosition='0 0';" onmouseover="this.style.backgroundPosition='0 -21px';" onclick="javascript:printvoucher();">

4. 添加对应的JS的函数功能

function printvoucher(){

if (document.getElementById('excel_sql').value+'CS'=='CS'){alert('请先点击查询，得到结果后再打印！');return false;}

window.print_to.target="_blank"; window.print_to.action="sales_order_voucher_add_checkinfo.asp"//修改成具体打印界面的名称

window.print_to.submit();  

}

5. 在打印界面接收SQL语句，把sql还原回来。

excel_sql=request("excel_sql")

if excel_sql&"CS"<>"CS" then excel_sql=DSConvert(Lcase(excel_sql),0)

6. 改造打印界面的表头表尾与中间明细

<%if excel_sql&"CS"<>"CS" then excel_sql=DSConvert(Lcase(excel_sql),1)  '半角转全角%>

<textarea name="excel_sql" id="excel_sql" style="width:0;height:0;border:none;" ><%=excel_sql%></textarea>

把form2提交的action改为当前打印页面的文件名

如下图：

href="sales_order_voucher_add_checkinfo.asp"

把对应的模板名称换掉。