狠狠色丁香婷婷综合尤物/久久精品综合一区二区三区/中国有色金属学报/国产日韩欧美在线观看 - 国产一区二区三区四区五区tv

：憑證打印-全部傳輸類型的傳SQL方法

1. 首先將sql賦給excel_sql_to

    excel_sql_to=sql

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

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

<%if excel_sql_to&"CS"<>"CS" then excel_sql_to=DSConvert(Lcase(excel_sql_to),1) '半角轉(zhuǎn)全角%>

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

</form>

補(bǔ)充說明：用到DSConvert()函數(shù)需要先引入下面這個文件

<!--#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. 添加對應(yīng)的JS的函數(shù)功能

function printvoucher(){

if (document.getElementById('excel_sql_to').value+'CS'=='CS'){alert('請先點(diǎn)擊查詢，得到結(jié)果后再打印！');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_to")

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

6. 改造打印界面的表頭表尾與中間明細(xì)

第一種

order_time=rs("order_time")

order_type_i=rs("order_type")

order_id=rs("order_id")

voucher_code=rs("voucher_code")

product_code=rs("product_code")

product_name=rs("product_name")

unit_price=rs("unit_price")

batch_no=rs("batch_no")

warehouse_subject_code=rs("warehouse_subject_code")

client_name=rs("client_name")

client_code=rs("client_code")

all_cost_price=rs("all_cost_price")

all_quantity=rs("all_quantity")

sub_sample_order=rs("sub_sample_order")

invoice_no=rs("invoice_no")

第二種

order_type_i=rs("order_type")

order_id=rs("order_id")

voucher_code=rs("voucher_code")

product_code=rs("product_code")

product_name=rs("product_name")

client_product_code=rs("client_product_code")

unit_price=rs("unit_price")

batch_no=rs("batch_no")

warehouse_subject_code=rs("warehouse_subject_code")

client_name=rs("client_name")

all_cost_price=rs("all_cost_price")

all_quantity=rs("all_quantity")

sub_sample_order=rs("sub_sample_order")