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

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

编辑:说三道四文库 发布时间:2017-10-17 08:20
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如何打印呢?有没有方便一点的方法?如果是打印页面呢?
将光标限制在某区域-Delphi资料 将文件放入回收站-Delphi资料 禁止用户切换任务-Delphi资料 控制面板大全-Delphi资料 控 制 系 统 菜 单-Delphi资料 拦截消息处理过程-Delphi资料 利用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资料 哪有读取gif、jpg文件并显示的源程序? 如何改变DataGrid中某个数据的显示! 不知道为什么 数据窗口的数据怎么修改?(急,在线等) 这个图片怎么找不到?? 我开发了一个计算机安全产品,谁能帮我申请一下计算机安全产品销售许可证?? 如果两个条件一个都不满足,是用and还是or? 屏幕突然出现马赛克,然后死机了,为什么 vb访问数据(sql server)时出现数据只读 关于sql语言左连接的问题,help 请问java里边一个截取String的问题 没有相对应的菜单信息,这是怎么回事呀? XML文件里面只能有英文? 为何我删除一万条纪录也会提示数据库事务日志已满? 有关Table控件动态添加row的问题!!!! 我开发了一个计算机安全产品,谁能帮我申请一下计算机安全产品销售许可证?? 为什么mysocket.Connect()函数返回0仍然建立了连接? 我错过了看 <我从校园出来的这几年>,现在找不到了.请各位指点 EXCEL中表达式求值? -->>50分一个小问题:如何改变一个只读属性文件夹为可写属性文件夹? 应用程序运行出错的问题:字体变大,网页变形,残不忍读! 帮朋友做的网站自动生成系统,大家提提意见 vb访问数据(sql server)时出现数据只读 能够登陆但是使用出错的问题!!!急!!!!!! 请问有一VC执行程序 但是老出错,有什么办法可以得到原代码 或者是查看内部运行原理然后修改某接口吗?多谢 如何在服务器端获取手机号码! 如何用java把日期插入数据库,要变成字符吗 在线等待!!!!!!!!!!!!!!!!!急!!!!! 高分请教高手,如何让oracle 8i自动执行一段已经写好的sql??? modem编程的问题? TMD,还真是热闹啊,没有我的份怎么行,哈哈!!!!!! 请问各位你们是多大才想到好好学习的?也可以说是学习上开窍的,我儿子今年10岁,只想玩,如何让他意识到学习才是他的主业,玩是副业? 如果Session为过期或者为空,强制返回登录页,应该怎么写?在那里写? 请各位大侠赐教,急用!!!数据库查询问题 两个可能常用的技巧,要你解决!:) 问的问题没人回答,可否删除帖子? 再PB环境中,数据窗口打不开,急!!!! 公司正在成立===问题大家解决 请问有三个Radio按钮,名字都叫radioTest,值不同,我想在提交表单之前得到被选中的Radio的值,如何实现 应用程序运行出错的问题:字体变大,网页变形,残不忍读! 如何关闭excel 请大家谈谈J2ME和J2EE的发展 主键重复,在存储过程中怎么抓不住 负载很重的FreeBSD服务器,运行Apache和cgi程序,大家有什么好主意么? 关于samba,求助 问题:有没有谁想过通过读取(伪)汇编码把相应的C代码恢复出来? jceweb.ear ,JCE_Test_Web.war 两个存储过程问题,一个是除0溢出,一个是删除问题 触发器设置问题~急呀! 结合 jsp-->Excel ? 请问 高手请进,急,在线等待! 下列物质属于纯净物的是()A纯净水B清新的空气C24K黄金D氦氖激光气 各类名言 造影剂化学成分是什么 有道典型的工程问题,抽考考到了修一条公路 甲队修2天后,乙队又修了3天,共修了全程的2/5,剩下的甲和乙共修4天,那么甲单独修要多少天 求一切名言要一切名言,要最短的越多越好,要短的10个字的左右 从物理角度来说造影剂有哪些的特征? 请问不锈钢罐的容量怎么算?1立方水等于多少斤水/谢谢各位了 在百度上搜“动手制作可以吃的植物细胞模型” 联系的客观性原理.急用! 1 亩鱼塘能养殖多少尾鱼苗 最大密度平均深度大概2M左右谢谢了谢谢了, zrbv—450/750—3*10PC25 打雷的时候为什么会跳闸 as the saying goes 与as we know有何不同 荣威750是什么意思? 武汉哪里有20%人血白蛋白急,医院药房都可以人命关天的事,不要只是一个复制粘贴!不然我宁愿弃分. 已知函数f(x)=1/3x立方+bx平方+cx+bc,如果函数f(x)在x=1处有极值-3/4,求b、c的值 BV-450/750-(4*4)什么意思关于导线的 咩话是啥? 用烧杯烧水为什么要盖上盖子 有道神题,请大神们解答一下,谢谢了大神们. --currently it is more and more difficult to find a good job in the fiece job-hunting market.-___.but highil-qualified graduates are always in great demand.A.No kidding.B.That sounds reasonable.为什么选A? 在质谱中,什么电子容易被电子电离源电离是碳碳西格玛键上的电子,碳氢西格玛键上的电子,分子中杂原子上的非键电子还是分子中不饱和的派电子?为什么 北京奥运会吉祥物分别是什么意思? 励志名言全部一定是全部,知道的少了也没事也可以写 如果想用稳恒电流场来模拟两个等量同号电荷的电场,该怎样安排实验 塑壳断路器的作用和用途以及原理大神们帮帮忙塑壳断路器的作用和用途以及原理, 英语翻译bios的具体内容给翻译一下. 醋用完后为什么要盖紧化学试卷上的...语言表达啊. 怎么消除汽车零件的剩磁 the policy being carried out in job enables women to enjoy the equal rights.为什么是being carried 而不是carried 测电容电路中的电荷放大电路是什么作用? 电磁阀铁性如何消除剩磁?电磁阀通电后,动铁芯(材料:Cr13Al4N6)在线圈通电后受到磁化,断电后有小量的磁性(剩磁)保留在动铁芯上,这样对电磁阀的性能有一定的影响,请问如何消除这些 a doctor is a job he enjoys 选什么?A To being B Be C Being D Going to 家里的醋用过要及时盖严,为什么 秦始皇统一六国是历史必然吗? 急求各类名言警句!我们平时所学所看到的名言警句都是很混乱的,没有进行分类,我现在急需要分好类的名言警句.比如说可以分成读书类(读书破万卷,下笔如有神)、珍惜时间类(光阴似箭, 红细胞渗透脆性试验偏低有什么影响我的红细胞渗透脆性试验(ROFT)- 40会有什么影响帮帮 为什么小米手机那么难买啊? 各类名言警句一类一句,作者朝代,种类繁多 我们能不断找自己的短处,发现与学习别人的长处.我们会飞快地进步.(用关联词成一句话)要正确的答案 小米手机为什么那么难买 各类名言 氦氖激光,二氧化碳激光,点阵激光有什么区别?我换湿疹有五年了,反复发作,全是瘙痒,又是还有水泡出水,吃药效果不好,我去大医院治疗,建议我用氦氖激光,但是我不知道是什么作用,能不能详 为什么买个小米2S还要抢购呢?难不成小米手机就那么好吗? 各种名言警句要说出这个名言警句包含着什么人生道理,如贵在坚持、讲究诚实. 氦氖激光,二氧化碳激光,点阵激光有什么区别?_湿疹 小米手机难买吗?大家帮帮忙. 英语翻译who knows what happend you often told me i hurt you so much you can't believe me .as you can't change~i will leave .but i really want to know ,why you can't see and feeling my love am i a animal in your heart?anything all you first~i choo 为什么负电荷受力方向与与电场强度方向相同? 小米手机为什么要抢着买而不是正常买?怎么回事?老早就想问这问题了老听人说抢小米,为什么不多生产小米? 急求所有名人名言如果有那就非常感谢了 如何判断电场强度的方向?是位于改点的正电荷受力的方向. 茶蛋是什么意思 匀变速直线运动的规律的应用汽车以10m/s的速度在平直公路上行驶,突然发现前方sm处有一辆自行车以4m/s的速度作同方向的匀速直线运动,若汽车立即关闭油门作加速度为-6m/s2的减速运动,汽车 挖一个长40m,宽25m,均深2m的游泳池……1.要挖出多少立方米的图土?2.沿着游泳池的周围走一圈,至少要多少m? 我想知道这是什么茶🍵 加强CT的造影剂副作用因为妈妈的腰部有个血管瘤,所以医生建议做一个加强CT,昨天做的时候注射了静脉的造影剂,今天左手有点肿,而且手有点疼,请问这正常么? 一个养鱼池长25m宽15m深2m底部铺有10cm厚的沙子1最多能储水多少立方米2如果养鱼池注水后,水面距上沿有2dm,注入的水的体积是多少? 现在有个子曰茶,这个是什么意思啊? 将18g不纯的氯化铜样品(杂质不溶于水,也不参加反应)跟一定量的氢氧化钠恰好完全反应可得到溶质质量分数为20%的溶液58.5g.求样品中氯化铜的质量分数;加入氢氧化钠溶液的质量分数. 浙江温岭村民收获“巨无霸”番薯 重达奶茶MM棒球帅气照 青春女神美翻了英国少年考好成绩卖关子 慈父见成绩单澳大利亚蓝山火情缓解 居民返家解救被美国小学大会上警察枪支走火 致3名儿美国就宠物食品安全发出警告 恐引发致女子梦游跌落地铁 幸得乘客跳下月台救沙特再拒入“非常” 指安理会未实现中美医学杂志报告显示 感染艾滋病毒婴儿法国教育官员称将出台法律维护创业大学新西兰千名儿童参与马拉松共庆世界儿童俄外长:俄美涉叙计划表明双方有能力应阿富汗情侣私奔 疑遭女方家属私自处决泰国北部发生重大交通事故 造成22人澳大利亚蓝山火情缓解 居民返家解救被奥巴马频接监听\"投诉\" 向默克尔韩国欲开设首个裸体海滩 以吸引外国游美国就宠物食品安全发出警告 恐引发致美国小学大会上警察枪支走火 致3名儿女子梦游跌落地铁 幸得乘客跳下月台救沙特再拒入“非常” 指安理会未实现中李永波否认林丹单飞 受访称从没有听说为经济发展民生改善提供新动力山西女篮负于沈部遭遇赛季首败检察官进校园泰国军方直升机坠毁9人遇难把协商平台搬到市民中间(议政)用法治规范红头文件(点睛)四县(区)探索基层治理新路李克强向第四届布鲁塞尔“中欧论坛”致“锦织圭热”别成口头羡慕(体坛观澜)义乌小商品将直达马德里促进劳动关系和谐稳定全省可查诚信记录和业务水平失业,南欧青年心中之痛(记者观察)来,一起穿越曳曳星际(发现·探索星空中办发文:适当提高基层干部待遇印尼政府调高补贴燃油价格如何破解“垃圾围村”难题(委员手记)人民日报刊文:一些纪检干部醉心升职却世界互联网大会永久落户乌镇“欢迎您到塔州!”
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘