说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

想知道用asp或asp+实现打印的方法吗??

编辑:说三道四文库 发布时间:2017-08-22 03:50
HTML文档下载 WORD文档下载 PDF文档下载

各位asp同胞:

     目前,打印网页,好像都是用javascript来实现!!
     我想与大家讨论一下,用asp如何实现打印的功能??
     最新的asp+在打印方面有什么特别的地方吗???
     欢迎大家吐水哈!!!
     
   
请教,javascript中的打印又是如何实现的呢?仅仅是window.print吗?我在很多地方看到同样的一段代码:
<OBJECT classid=CLSID:8856F961-340A-11D0-A96B-00C04FD705A2 height=0 id=WB width=0></OBJECT>
<input type=button value=Preview onclick="doPrintPreview()">
<input type=button value=Setting onclick="doPrintSetup()">
<script language="JavaScript"> 
function doPrintSetup(){
//打印设置
WB.ExecWB(8,1)
}
function doPrintPreview(){
//打印预览
WB.ExecWB(7,1)
}

有谁能详细的解释一下这段代码?
如何使用ASP进行打印操作 ?????!!!!!!!!
文件aspprint.asp代码如下:
  <%@ language=vbscript %>
  <%
  option explicit

  dim strsubmit        'form中用来保存提交按钮的值
  dim strprinterpath    'form中保存网络打印机路径的值
  dim strusername      'form中用户名的值
  dim strpassword      'form中密码的值
  dim strmessage        'form打印内容的值
  dim objfs            'vbscript中的文件系统对象
  dim objwshnet        'wsh中的网络对象
  dim objprinter        '打印对象

  strsubmit = request.form("submit")
  %>

  <html>
  <head>
  <meta name="generator" content="microsoft visual studio 6.0">
  </head>
  <body>

  <%
  if strsubmit = "" then
  %>

  注意的是:
      由于我是演示起见,其中有关nt的帐号和密码都是使用了不加密的手段在asp中传递的
  真正的运用中应该对该登录过程进行安全处理。
  <form action="aspprint.asp" method=post id=form name=form>
    <table width=100% align=center border=0 cellspacing=1 cellpadding=1>
        <tr>
          <td align=right nowrap>网络打印机路径:</td>
          <td align=left nowrap><input type="text" id=printerpath name=printerpath 
              value="\\< domain >\< printer >"></td>
        </tr>
        <tr>
          <td align=right nowrap>登录帐号:</td>
          <td align=left nowrap><input type="text" id=username name=username 
              value="<% = strusername %>"></td>
        </tr>
        <tr>
          <td align=right nowrap>登录口令:</td>
          <td align=left nowrap><input type="password" id=password 
              name=password></td>
        </tr>
        <tr>
          <td align=right nowrap>请输入你想打印的文字:</td>
          <td align=left nowrap><textarea rows=2 cols=20 id=message 
              name=message></textarea></td>
        </tr>
        <tr>
          <td align=right nowrap>&nbsp;</td>
          <td align=left nowrap><input type="submit" value="submit" 
              id=submit name=submit></td>
        </tr>
    </table>
  </form>

  当以上信息被提交后,就可以按照下面的代码进行打印了。
  <%
  else
    ' 从form中取得响应信息。
    strprinterpath = request.form("printerpath")
    strusername = request.form("username")
    strpassword = request.form("password")
    strmessage = request.form("message")

  we will now use the vbscript filesystemobject object and the wsh network object. the network object will
  give us the methods we need to open a printer connection, and the filesystemobject will allow us to stream our
  output to the printer. we create these objects in the following code example: 

    set objfs = createobject("scripting.filesystemobject")
    set objwshnet = createobject("wscript.network")
    ' 使用wsh连接网络打印机
    objwshnet.addprinterconnection "lpt1", strprinterpath, false, strusername, strpassword
    ' 使用文件系统对象将打印设备作为一个文件使用
    set objprinter = objfs.createtextfile("lpt1:", true)
    ' 给打印设备送出文本
    objprinter.write(strmessage)
    '关闭打印设备对象并进行错误陷阱处理
    on error resume next
    objprinter.close
    ' 如果发生错误,关闭打印连接,并输出错误信息
    if err then
        response.write ("error # " & cstr(err.number) & " " & err.description)
        err.clear    
    else
        ' 操作成功,输出确认信息
        response.write("<center>")
        response.write("<table width=100% align=center border=0 cellspacing=1 cellpadding=1>")
        response.write("<tr><td align=right><b>打印消息送出:</b></td>")
        response.write("<td align=left>" & strmessage & "</td></tr>")
        response.write("<tr><td align=right><b>网络打印机路径:</b></td>")
        response.write("<td align=left>" & strprinterpath & "</td></tr>")
        response.write("<tr><td align=right><b>登录帐号:</b></td>")
        response.write("<td align=left>" & strusername & "</td></tr>")
        response.write("</table>")
        response.write("</center>")
    end if
    ' 取消打印连接
    objwshnet.removeprinterconnection "lpt1:"
    set objwshnet  = nothing
    set objfs      = nothing
    set objprinter = nothing
  end if
  %>
  </body>
  </html>
  不错!!!
那ASP.NET如何打印呢?有没有方便一点的方法?如果是打印页面呢?
利用API函数开发DELPHI程序三例 利用Hook技术实现键盘监控-Delphi资料 利用浏览窗口 DragDrop 任意文件-Delphi资料 利用未公开函数实现Shell操作监视-Delphi资料 妙用Delphi的标识号 判断Windows类型和版本-Delphi资料 判断一个程序是否dos版本:-Delphi资料 屏蔽系统按键-Delphi资料 屏幕抓字技术揭密(转载)-Delphi资料 启动控制面板-Delphi资料 取得系统所有窗口的方法-Delphi资料 全部窗体可使用鼠标点中移动-Delphi资料 让图像旋转-Delphi资料 热启动控制-Delphi资料 如果隐藏和显示Windows的任务条-Delphi资料 如何把文件删除到回收站中-Delphi资料 如何从任务栏上隐藏应用程序的按纽?-Delphi资料 如何得到Windows 的temp路径-Delphi资料 如何得到WINDOWS的SYSTEM路径-Delphi资料 如何得到上一个激活的组件-Delphi资料 如何得到系统目录-Delphi资料 如何得到执行程序的当前路径-Delphi资料 如何访问一个进程的内存空间-Delphi资料 如何关CD机的门?-Delphi资料 如何关闭外部开启的应用程序-Delphi资料 如何获得系统内存的有关信息?-Delphi资料 如何获取硬盘的ID-Delphi资料 如何检查软驱中的软盘和光驱的光盘是否发生变化。-Delphi资料 如何检查一个驱动器是否就绪?并且不出现错误信息-Delphi资料 如何将Wav文件做到EXE文件里-Delphi资料 如何将你的程序放在Windows启动中-Delphi资料 给个匿名FTP站点做中转站。 刚才用了CButtonST,举爽,散分了。。 寻找开发调试器的网上资源! 急:为什么用iframe插入网页只显示一部分? --------开发工作流----------- 大侠们急救,高分给!!! 在98控制面板中发现MS DTC这项,请问它是干什么用的? 用recordset打开数据库的问题 帮忙? 告别美丽的初恋情人 本人开始学vc 请问一个定义全局变量的问题?? 字符比较的问题 用变量来建表的问题 簡單問題﹕請問怎樣用控件綁定數據(在線) !·#¥%施瓦辛格般的女生爱上你,该不该接受??? 建立怎样的数据库? Media Player 9的问题! 谁有播放MP3的算法?谢谢!! 关于文件夹创建问题:API高手进 我知道这里有很多高手的,故再一次参考各位高手或专家的建议 爱情、金钱、理想---------我徘徊、我郁闷。 InstallShield Engine EXE 遇到问题 各位老大问一个简单问题,如何把数字的每一位的数字取出来,如6245,取出为6,2,4,5 我用utl_smtp发送邮件时,中文的就变成乱码了?急需高手指点! 关于Deleterow()的疑问? 如何设置虚拟目录 如何捕获,comboBOx 选中下拉项中其中一项的事件? 有谁知道大富翁论坛离线资料的下载地址,就是那个chm格式的200多M的? 如何将字符串转换成ASCII码 假如我将扩展分区设成活动分区,然后在其中的一个驱动器安装98。问题:98能启动吗?主分区C盘有东西吗? 如何捕获,comboBOx 选中下拉项中其中一项的事件? c#中前面定义的变量,后面用到的时候也要和前面一样的大小写么?? 奇怪的问题,看谁能解答,高分给决不失言!! 如何在程序中获得鼠标的位置? VB生成的.EXE文件怎么取外面传过来的参数? 下面的代码有什么问题吗? 想继续考scjd.大家有什么好建议? 如何使表格出现纵向和横向滚动条,并第一行,第一列,最后一列固定不动? 访问网站正常,可是不能下载。流量一大网关就出错。马上揭帖。 我想请教一下 java中调用dll! 定时重发问题? 这个错误怎么解决,急!!! VB生成的.EXE文件怎么取外面传过来的参数? 请问如何才能得到程序窗口的句柄? 谁有KYLIX3的注册码 请各位大虾帮帮忙呀~~客户机配置问题??在线送分... 项目的设计和实现,请大家帮我一下 如何让datagrid在数据不足5行的时候显示5行? 各位帮帮忙,一个问题总是想不到解决的方法,急啊!!! 已知常数a,b满足|a-1|+ 请问一下大家带春的古诗有哪些,有点着急了啊,我在此先感谢各位朋友5N 若|4-2m|=-(2m-4),则m的取值范围是?用解不等式一样做 √4-√18+√1/2=a+b√2 已知a,b为常数,求a+b 吕英文怎么拼?我要做个英文名片 吕到底是lu 还是lv - 真是搞不懂了,烦死了,按传统来说应该是lv。lu就变成鲁了。但是感觉lv怪怪的。 不论m取何值,直线(m-1)x-y+2m-1=0都过定点A.(1,-1/2) B.(-2,1) C.(2,3) D.(-2,3) 已知A=[1 2 0 且R(A)=2,求常数a,b的值 a 1 1 b 1 2 1 2 1] 如图是一个六棱柱,用一个平面如图所示,从六棱柱上截去一小部分,请分别指出剩下的部分,有几个面,几条棱,几个顶点 伴反射性的引起心率加快的几种药 已知y+b与x+a(a、b均为常数)成正比例.(1)问y是x的什么函数,请给予说明.(2)在什么条件下,y是x的正比例函数? 用一个平面从正六棱柱上截去四棱柱,请分别指出剩下的部分有几个面,几条棱,几个顶点? 什么是反射性心跳停止? 已知常数a,b都是实数, 我有一个梦想作文当一名服装设计师 扩张血管为何反射性加快心率?扩张静脉为何会降后负荷? He is s____ to see me.首字母填空He is s____ to see me.We haven't seen each other for 10 years. 如果你有一个梦想,你一直想去完成,但也不知道为什么会有这个梦想,那你会不管一切的去实现它吗 如何判断穿过闭合回路的磁通量是否变化?比如B不变,将其上下,左右,旋转一定角度,磁通量如何变化?具体 根据上下文及所给的字母,填空J:ack's pet is lost.He is very s——.s后面填什么? 找这样的影视 主角为了一个模糊的或者看不见的愿望奋斗着 憧憬着或许是一座山 一条路 一个梦想 最后成功了 为什么 闭合回路 要看圈起来的磁通量 曝气沉砂池适用于多大水量的污水厂书上说长宽高分别为:7.5-20,2.5-7,2-5,水平流速0.1m/s,我能否理解为只能处理40000方/d的污水量,我设计4500立/d的沉砂池长宽高明显不合适,是不是用曝气沉淀池 根据提供的实际情况填写名句,格言.(1)在写作文时,我们有时无从下笔,经过晏思苦想,突然间文思泉涌,真可谓:________________.(2)艺术节上,欣赏着同学弹奏的醉人 ,北半球在春天,早中晚影长.在冬天,早中晚影长.在秋天.早中晚影长.在夏天,早中晚影长 污水厂设计我16万吨的水处理流量沉砂池选一座,可以吗 《从这个故事我想到了》六年级作文400ziyi上哦 二氧化硅做模板在乙醇溶液水热沉积二氧化锡时,为什么溶解如题,水热温度180摄氏度,水热三小时.另外,为什么选择乙醇溶液做溶剂 求设计,污水处理厂沉砂池设计.设计参数:日处理水量为25000 t/d,采用CASS工艺 请问如何计算沉砂池大小,流速,等详细参数. 六棱柱的表面中 互相平行的面最多有多少对. 生理学,影响心率的因素有哪些 城市污水处理的曝气沉砂池设计我处理的是城市小区污水,单日污水最大排放量为5550m3.那么是否有必要采用曝气沉砂池,或者就选用简单的平流式沉砂池就可以了,因为我计算得出的曝气沉砂池 瞄准镜上的倍数:4-16倍和倍数:2-7倍有什么区别吗谢谢了, 那个dy/dx=u+x*du/dx,是怎么算出来的,是怎么由u=y/x得出的 成都地区室外自来水管道需要电伴热吗? 如图:为什么我测的紫外吸收光谱图上580nm位置会有一个台阶?而不是平缓的峰?恳请专业人士详细解答.为什么我测的紫外吸收光谱图上在580nm位置会有一个台阶?而不是平缓的峰?我测过很多遍, 影响心率 因素 6年级作文《一次危险的遭遇》告诉我怎么写 我没有那种经历 帮我填写格言名句9.桃李不言,( )10.流水不腐,( )11.满招损,( )12.契而不舍,( )14.鞠躬尽瘁,( ) 设x=y^2+y,u=(x^2+x)^(3/2),求dy/du.(能不能结果中既有X又有Y?) 给句中的多音字填上正确的读音 有关紫外吸收谱图在分析紫外吸收谱图时,将一个吸收峰归为3T1g←3A2g,这个3T1g←3A2g表示什么意思啊? 影响心率的因素主要包括5个 造纸厂 用聚合氯化铝多吗 信息时代过后是什么时代? 影响心率的主要因素是什么 5点 《信息时代美好生活》400字左右的作文怎么写? 在三角形abc与三角形def中,ab=de,角a=角d,还要补充条件是( ),就可证三角形abc全等于三角形def(aas)货补充条件( ),可证三角形abc全等于三角形def(asa) 信息时代过后便是什么时代? Where is peter?He is in teachers' o_____ (根据首字母提示) 这是一次 的经历 400字作文500字以下空格处可填让你受到启发,让你感受到快乐,让你从中得到教训 写一件事 400字到500字之间 冬季,大陆会形成高压还是低压? 作文:信息时代的利与弊 信息时代美好生活400字作文如题 为什么有陆地会形成暖寒流?为什么南纬40°到60°各大洋连一体就没有暖寒流了呢? 求该函数的最值y=x∧4-4x²+1我是刚学的 性英语怎么写 请问这条选择题的答案分别是什么?1、HLAⅠ类分子的轻链是.A.β链 B.β2m C.β2 D.L链 生活在信息时代的感受 作文1500字,2小时 请问一下谁知道可以唱得古诗有哪些急、急啊,我在此先感谢各位朋友2N 填写谚语1、你不要把别人怎么看你看得很重要,重要的是你自己的成就,俗话说:( )2、真是( ),谁能想到一个十五岁的孩子这样了不起.3、你一定要坚持下去,千万别灰心,有一句话说:( 葡萄牙数千民众游行抗议2014年预算土耳其敦促安理会解决叙利亚难民危机洪水袭击“印度米碗”伊朗外长与联合国-阿盟特别代表呼吁政孟加拉国总理呼吁反对党取消全国大罢工奥地利总理国庆讲话告诫不忘纳粹历史巴勒斯坦呼吁共同抵制以扩建犹太人定居印度东部洪灾死亡人数升至45人李娜打入总决赛排名进Top3 创亚洲河南济源一路段7公里6个“收费站”专刘云山:教育实践活动整改工作要准、狠白岩松惋惜恒大未能锁定胜局:首尔死刑亚冠决赛首回合恒大2-2首尔 穆里奇中国科学家成功研发人感染H7N9禽流宗庆后语出惊人:中国不能再造房子了李克强在中南海紫光阁会见东盟十国经贸捅死医生的连恩青烦躁时砸东西打母亲 亚冠决赛首回合恒大2-2首尔 穆里奇美国“窃听门”持续发酵 欧洲各国一致德国品牌专家:中国品牌升级要品质更要浙江省委书记夏宝龙:希望天下浙商争做韩国队世界杯耻辱出局 主帅仍留任引前适应新形势新任务新要求毫不放松地抓基深入贯彻落实三中全会精神推进党的纪律新华时评:刺眼词汇敲响党员干部道德警中央档案馆首次在官网全文公布45名受俄耄耋兄弟“人民美术家”作品来华展出香港特首吁反省:议会内有太多语言肢体前5个月2.6万余人涉嫌职务犯罪被立梁振英出席立法会问答 被议员丢掷玻璃土超豪门确认与普兰德利谈判 其或与曼浙江嘉兴率先实行出入境审批市县同权浙江嘉兴率先实行出入境审批市县同权从“孔夫子”到“都教授” 中韩共创多新疆兵团第三师打掉多个涉恐涉暴团伙媒评巴西世界杯堪称最佳10原因:梅西广东汕头市政协原主席赖益成因涉嫌杀人山东“民告官”案件行政机关败诉多半因曝巴萨豪掷7200万镑购苏神 已与利海南:找准重振“海上丝绸之路”的坐标海南:找准重振“海上丝绸之路”的坐标湖南首起“全能神”邪教组织案在常德开
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘