VB.net 2010 视频教程 VB.net 2010 视频教程 python基础视频教程
SQL Server 2008 视频教程 c#入门经典教程 Visual Basic从门到精通视频教程
当前位置:
首页 > 网站开发 > ASPnet >
  • asp.net教程之利用ASP在浏览器上打印输出

利用asp结合javascript或vbscript可以生成动态的web页面。在将这种方法用于实际应用中时,不可避免的要将结果打印输出。我们同样可以将查询结果整理后输出,并用浏览器工具栏上的打印按钮直接打印输出。以下程序是访问sql server自带的数据库pubs中的sales表,服务器和工作站端都采用vbscript。当工作站端采用javascript时,可用navigator访问。 

   
  〈html〉〈head〉 
  〈meta http-equiv=″content-type″ content=″text/html; charset=gb—2312-80″〉 
  〈meta name=″vi60—defaultclientscript″ content=″vbscript″〉 
  〈meta name=″generator″ content=″microsoft frontpage 3.0″〉 
  〈title〉sales〈/title〉〈/head〉 
  〈body〉〈form〉 
  〈table border=″0″ width=″800″ cellspacing=″0″ cellpadding=″0″〉  
  ′定义表宽800点 
  〈tr〉〈td〉〈div align=″center″〉〈center〉〈h2〉〈strong〉订单报表〈/strong〉〈/h2〉 
  〈/center〉〈/div〉〈/td〉〈/tr〉〈tr〉〈td〉〈div align=″right″〉〈p〉单位:元 〈/td〉〈/tr〉〈/table〉 
  〈table border=″1″ width=″800″ cellspacing=″0″ cellpadding=″0″〉〈tr〉 
  〈td width=″25%″ align=″center″〉stor_id 
  〈/td〉〈td width=″25%″ align=″center″〉ord_num〈/td〉 
  〈td width=″25%″ align=″center″〉ord_date〈/td〉〈td width=″25%″ align=″center″〉qty〈/td〉〈/tr〉〈% set cn=server.createobject(″adodb.connection″) 
  ′定义一个ado的连接对象 
  cn.open ″provider=sqloledb;data source=202.203.208.1;initial catalog=pubs;user id=sa;password=; ″ 
  ′定义数据库连接 
  sql=″select stor_id,ord_num,ord_date,qty from salesswheresord_date〉′1994-5-1′″ 
  set rs=cn.execute(sql) 
  while not rs.eof  
  ′判断是否为最后一条记录 
  qtyv=rs(″qty″) 
  sumqtyv=sumqtyv+qtyv%〉 
  〈tr〉〈td〉〈%=rs(″stor_id″)%〉〈/td〉 
  〈td〉〈%=rs(″ord_num″)%〉〈/td〉 
  〈td〉〈%=rs(″ord_date″)%〉〈/td〉 
  〈td〉〈%=qtyv%〉〈/td〉〈/tr〉 
  〈%rs.movenext ′移动到下一条记录wend%〉〈tr〉 
  〈td colspan=″3″〉合计〈/td〉 
  〈td〉〈%=sumqtyv%〉〈/td〉 
  〈/tr〉〈/table〉〈%cn.close%〉〈/form〉〈/body〉〈/html〉  
  为保证能打印各种大小的报表,可先将浏览器中打印设置的纸张大小定为最宽,然后通过调整〈table width=″″〉的值输出不同的报表大小。

相关教程