ASP 读取Excel背景颜色

jjcl521 2011-06-27 04:52:53


<%
Dim conn
Dim Drivers
Dim rs
Dim Sql

set conn=Server.CreateObject("ADODB.Connection")
Driver = "Driver={Microsoft Excel Driver (*.xls)};"
DBPath = "DBQ="&server.MapPath("111.xls")
conn.open Driver&DBPath

Set rs=Server.CreateObject( "ADODB.Recordset")
Sql= "select * from [Sheet1$] "
rs.Open Sql,conn,2,2
%>
<center>

<table name="tab" id="tab" bgcolor=#cccccc cellspacing="1" cellpadding="0" margin=0 width=100% align="center">
<tr>
<%
for i=0 to rs.Fields.Count-1
%>
<td bgcolor= "#ffffff"> <%=rs(i).Name%></td>
<%
next
%>
</tr>
<%
do while Not rs.EOF
%>
<tr>
<%
for i=0 to rs.Fields.Count-1
%>
<td bgcolor= "#ffffff"> <%=rs(i).value%> </td>
<%
next
%>
</tr>

<%
rs.MoveNext
Loop
rs.close
set rs=nothing
conn.close
set conn=nothing
%>



此段代码能读取excel的文本信息,
请问利用什么方法读取背景颜色呢?
...全文
97 5 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
jjcl521 2011-06-27
  • 打赏
  • 举报
回复
[Quote=引用 4 楼 aspwebchh 的回复:]

背景色也能读?
[/Quote]
不知道,我没读出来
刚看见利用这个不知道能读不?Excel.Application
挨踢直男 2011-06-27
  • 打赏
  • 举报
回复
背景色也能读?
灬上海爽爷 2011-06-27
  • 打赏
  • 举报
回复
jjcl521 2011-06-27
  • 打赏
  • 举报
回复
[Quote=引用 1 楼 xocom 的回复:]

为什么 不写入模板EXCEL,在模板里设置颜色呢?
[/Quote]
什么意思?不太明白
紫气东来_999 2011-06-27
  • 打赏
  • 举报
回复
为什么 不写入模板EXCEL,在模板里设置颜色呢?

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧