仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 467|回复: 7
打印 上一主题 下一主题

[学习教程] ASP编程:如何在ASP程序中打印Access报表(无组件...

[复制链接]
因胸联盟 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:50:15 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
专业性的服务。有的ASP商提供垂直型的应用服务,针对某一特定行业提供应用服务。access|程序|打印|无组件  今朝,B/S形式(扫瞄器/服务器形式)成为企业网上首选的盘算形式。因为B/S形式的特别性,在C/S下绝对较易完成的Excel报表打印功效在B/S下却成为一个难点。自己经由过程研讨写了一个基于ASP程序的打印Acess报表的程序。本程序的特性是不必任何组件。
  
Print.asp
------------------------------------------------

<html><title>打印Excel报表</title>
<%
把持剧本言语
response.write"<scriptlanguage="&"VBScript"&">"
%>
//*****************本程序由火星事情室供应(andy2001p@hotmail.com)******************
//*******************版权一切 随便拷贝********************************
functionccprint()
SetxlApp=CreateObject("EXCEL.APPLICATION")
SetxlBook=xlApp.Workbooks.Open("c:ook1.xlt")
setxlsheet1=xlBook.ActiveSheet

<%
ii=1
dowhileii<11
response.write"n"&ii&"=fmp.n"&ii&".value"
%>
//隔一行!
<%response.write"xlSheet1.cells("&ii+4&",2).value=n"&ii%>
//隔一行!
<%response.write"m"&ii&"=fmp.m"&ii&".value"%>

//隔一行!
<%response.write"xlSheet1.cells("&ii+4&",3).value=m"&ii%>
//隔一行!
<%
ii=ii+1
loop%>
xlSheet1.Application.Visible=True

endfunction
//*****************本程序由火星事情室供应******************
<%
response.write"</script>"
%>


<html><title>打印Excel报表</title>
<body>
<center>
<h2><fontcolor=red>先生表(Demo)</font></h2>
<p></p>
<formname="fmp"method="post"action="">
<%
db="zhk.mdb"
Setconn=Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&Server.MapPath(""&db&"")
conn.Openconnstr
setrsd=server.createobject("adodb.recordset")
str="select*fromcjb00"
rsd.openstr,conn
%>
<tablewidth="396"height="58"border="1"bordercolor="#00FF00"bgcolor=lightyellow>
<trbgcolor=deepskyblue>
<th><b>姓名</b></th>
<th><b>学号</b></th>
</tr>
<%
n=1
dowhilenotrsd.eof
%>
<tralign=center>
<td>
<inputname="<%="n"&n%>"type="hidden"value="<%=rsd("姓名")%>">
<%=rsd("姓名")%>
</td>
<td>
<inputname="<%="m"&n%>"type="hidden"value="<%=rsd("学号")%>">
<%=rsd("学号")%>
</td>
</tr>
<%
m=m+1
n=n+1
rsd.MoveNext
loop
%>
<%rsd.close
setrsd=nothing
conn.close
setcnn=nothing%>
</table>
<p>
<inputname="Submit2"type="button"onclick="ccprint()"onDblClick="ccprint()"value="打印">
<br>
</p>
</form>
</center>
</body>
</html>
------------------------------------------------------------

在程序写好后,你必需在 C 盘根目次下建个Excel模板文件! 在IE的平安设置中将平安级别调为最低或自界说平安级别中启用第二项就能够了!
本程序由Andylee(火星)供应,假如成心见请接洽:
Email:andy2001p@hotmail.com
QQ:16685104
TEL:0595-2092139
</p>对于中小型web应用来说,php有很强的竞争力,linux+apache+mysql+php(lamp)的组合几乎可以胜任绝大多数网站的解决方案,对于大型应用来讲,对于系统架构要求更高,需要有成熟的框架支持,jsp的struts是个不错的框架,国内介绍它的资料也非常多,应用逐渐广泛起来。asp就不用说了,
乐观 该用户已被删除
沙发
发表于 2015-1-28 06:43:47 | 只看该作者
尽管MS自己讲C#内核中更多的象VC,但实际上我还是认为它和Java更象一些吧。首先它是面向对象的编程语言,而不是一种脚本,所以它具有面向对象编程语言的一切特性,比如封装性、继承性、多态性等等,这就解决了刚才谈到的ASP的那些弱点。
飘灵儿 该用户已被删除
板凳
发表于 2015-2-5 14:07:05 | 只看该作者
跟学别的语言一样,先掌握变量,流程控制语句(就是ifwhileselect)等,函数/过程,数组
活着的死人 该用户已被删除
地板
发表于 2015-2-12 03:13:28 | 只看该作者
那么,ASP.Net有哪些改进呢?
愤怒的大鸟 该用户已被删除
5#
发表于 2015-3-2 21:25:58 | 只看该作者
ASP.Net和ASP的最大区别在于编程思维的转换,而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程,而那些脚本语言属于弱类型、面向结构的编程语言,而非面向对象,这就明显产生以下几个问题:
第二个灵魂 该用户已被删除
6#
发表于 2015-3-11 06:25:28 | 只看该作者
不能只是将它停留在纸上谈兵的程度上。
爱飞 该用户已被删除
7#
发表于 2015-3-17 22:26:11 | 只看该作者
我可以结合自己的经验大致给你说一说,希望对你有所帮助,少走些弯路。
8#
发表于 2015-3-25 04:19:40 | 只看该作者
Server:这个表示的服务器,操作服务器的一些东西使用这个,如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2025-1-9 04:48

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表