当前位置:首页 » 操作系统 » 表格asp源码

表格asp源码

发布时间: 2022-09-19 05:17:04

❶ asp表格列求和(附源码

totalprice=totalprice+rs_buy("price")*rs_buy("shulian")

下面加一句

totalshuliang=totalshuliang + rs_buy("shulian")

最下面显示那里

<%=totalshuliang%>

❷ 如何从asp导出至Excel表格,要详细的源码

最简单的方法就是导出CSV文本文件了,每一行对应一条记录,可使用逗号分割
CSV文件我记得默认就是使用excel打开的

❸ 求通过asp把excel表格上传至服务器,然后导入到access数据库中的源码程序

上传?应该就是个复制的过程吧。。
这种源码网上肯定有的,就是难找。。

❹ 本人想写一段ASP代码实现表格的自动生成,如生成N行3列的单元格,每个单元格使用连续的数字填充

变量i是外循环变量,所以,不要在循环体内修改该变量的值,否则将影响到循环次数.
你可以改成这样:
<table border=1 width="95%">
<% for i= 0 to 8%>
<tr>
<% for m= 1 to 3 %>
<td height="21" ><a href="×××.asp?h=<%=(i*3)+m%>" ><%=(i*3)+m%><a/></td>
<%next%>
</tr>
<%next%>
</table>

❺ 求ASP源码高手!!!怎么让这行百度不顶在表格的上面...如图

在STYLE2的样式里加个属性:padding-top:10px,具体大小你自己调!

❻ 支持EXCEL导入的ASP源码

假设你的EXCEL都已经是标准格式的文件了,那么你可以使用以下代码进行操作:
变量定义及ADO对象创建
....
strConn
=
"Provider=Microsoft.Jet.OLEDB.4.0;"
&
_
"Data
Source="
&
strExcelFile
&
_
";Extended
Properties=Excel
8.0"
strToDBConn
=
"odbc;Driver={sql
Server};Server=IP地址;Database=数据库名;UID=登录用户;PWD=密码"
'//
以记录集的形式打开
Excel
文件
adoConn.Open
strConn
'//
将数据插入到指定的表中
strSQL
=
"INSERT
INTO
["
&
strToDBConn
&
"].SQL数据库中的表名
SELECT
EXCEL中的字段名(第一行)
FROM
EXECL工作表名"
adoConn.Execute
strSQL,
,
adExecuteNoRecords
'//
这里有可能会产生一个错误,“系统不支持所选择的排序。(-2147467259)”
'//
但实际上已经有执行成功了,所以忽略此错误
If
Err.Number
=
-2147467259
Then
Err.Clear
End
If

❼ asp 把表格导出excel表源码

一、用Excel对象,但要有Excel模板。速度略慢

<!--#includefile="../conn.asp"-->
<%
dims,sql,filename,fs,myfile,x
Setfs=server.CreateObject("scripting.filesystemobject")
'--假设你想让生成的EXCEL文件做如下的存放
filename=Server.MapPath("users.xls")
'--如果原来的EXCEL文件存在的话删除它
iffs.FileExists(filename)then
fs.DeleteFile(filename)
endif
'--创建EXCEL文件
setmyfile=fs.CreateTextFile(filename,true)
strSql="selectdjh,bmmc,jihua,mubiaofromscheme"
SetrstData=conn.execute(strSql)
ifnotrstData.EOFandnotrstData.BOFthen
dimtrLine,responsestr
strLine=""
ForeachxinrstData.fields
strLine=strLine&x.name&chr(9)
Next
'--将表的列名先写入EXCEL
myfile.writelinestrLine
DowhileNotrstData.EOF
strLine=""
foreachxinrstData.Fields
strLine=strLine&x.value&chr(9)
next
myfile.writelinestrLine
rstData.MoveNext
loop
endif
Response.Write"生成EXCEL文件成功,点击<ahref=""users.xls""target=""_blank"">下载</a>!"
rstData.Close
setrstData=nothing
Conn.Close
SetConn=nothing
%>

二、生成假的Excel,文件本身的格式是TXT,但扩展名使用的是XLS,用Excel也可以打开。速度快

<!--#includefile="../conn.asp"-->
<%
Response.ContentType="application/vnd.ms-excel"
%>
<tableborder="1"style="border-collapse:collapse;">
<tralign="center">
<td>编号</td>
<td>日期</td>
<td>部门</td>
<td>工作计划</td>
<td>工作目标</td>
</tr>
<%
setrs=server.createobject("adodb.recordset")
sql="selectdjh,rq,bmmc,jihua,mubiaofromschemewherebmmc='"&session("bmmc")&"'"
rs.opensql,conn,1,1
dowhilenotrs.eof
%>
<tr>
<td><%=rs("djh")%></td>
<td><%=rs("rq")%></td>
<td><%=rs("bmmc")%></td>
<td><%=rs("jihua")%></td>
<td><%=rs("mubiao")%></td>
</tr>
<%
rs.movenext
loop
%>
</table>
<%
rs.close
Conn.Close
SetConn=nothing
%>

❽ 如何将ASP页面中的表格生成一个Excel表,求源码

'给你个例子吧。保存为asp文件运行看看。具体就在第一句。

<%Response.ContentType="application/vnd.ms-excel"%>
<html>
<head>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<metaname="GENERATOR"content="MicrosoftFrontPage4.0">
<metaname="ProgId"content="FrontPage.Editor.Document">
<title>NewPage1</title>
</head>
<body>
<tableborder="0"width=100%>
<tr>
<tdcolspan="22"align=middle>PJ计画书</td>
</tr>
<tr>
<tdcolspan="4">第版</td>
<tdcolspan="18"></td>
</tr>
</table>
<tableborder="1"width=100%>
<tr>
<tdcolspan="3">案件No</td>
<tdcolspan="4"></td>
<tdcolspan="2">案件名</td>
<tdcolspan="13"></td>
</tr>
<tr>
<tdcolspan="3">主管部门</td>
<tdcolspan="4"></td>
<tdcolspan="2">顾客</td>
<tdcolspan="13"></td>
</tr>
<tr>
<tdcolspan="3">PJ责任者</td>
<tdcolspan="4"></td>
<tdcolspan="2">営业担当</td>
<tdcolspan="4"></td>
<tdcolspan="2">纳期</td>
<tdcolspan="3"></td>
<tdcolspan="2">事业种别</td>
<tdcolspan="2"></td>
</tr>
<trrowspan="2">
<tdcolspan="3"rowspan="2">请负金额</td>
<tdcolspan="4"rowspan="2"></td>
<tdcolspan="2"rowspan="2">开発原価</td>
<tdcolspan="4"rowspan="2"></td>
<tdcolspan="2">社员费</td>
<tdcolspan="2">外注费</td>
<tdcolspan="2">部材费</td>
<tdcolspan="3">冲PJ番号</td>
<tr><tdcolspan="2"></td>
<tdcolspan="2"></td>
<tdcolspan="2"></td>
<tdcolspan="3"></td>
</tr>
</tr>
<tr>
<tdcolspan="3">案件の概要</td>
<tdcolspan="19"></td>
</tr>
<tr>
<tdcolspan="22"></td>
</tr>
<tr>
<tdcolspan="2">SUB案件</td>
<td>工程</td>
<tdcolspan="2">责任者</td>
<tdcolspan="3">期间</td>
<tdcolspan="2">総工数(H)</td>
<tdcolspan="3">アウトプット</td>
<td>业务管理适用</td>
<tdcolspan="5">要员</td>
<td>外注</td>
<tdcolspan="2">実绩终了日</td>
</tr>
<tr>
<tdcolspan="2"></td>
<td></td>
<tdcolspan="2"></td>
<tdcolspan="3"></td>
<tdcolspan="2"></td>
<tdcolspan="3"></td>
<td></td>
<tdcolspan="5"></td>
<td></td>
<tdcolspan="2"></td>
</tr>
<tr>
<tdcolspan="22">マイルストーン</td>
</tr>
<tr>
<tdcolspan="7">设计検证完了</td>
<tdcolspan="8">予定</td>
<tdcolspan="7">実绩</td>
</tr>
<tr>
<tdcolspan="7"></td>
<tdcolspan="8"></td>
<tdcolspan="7"></td>
</tr>
<tr>
<tdcolspan="3">规模见积の根拠</td>
<tdcolspan="19"></td>
</tr>
<tr>
<tdcolspan="7">品质目标</td>
<tdcolspan="8">目标</td>
<tdcolspan="7">実绩</td>
</tr>
<tr>
<tdcolspan="7">故障率</td>
<tdcolspan="8"></td>
<tdcolspan="7"></td>
</tr>
<tr>
<tdcolspan="7">不稼动率</td>
<tdcolspan="8"></td>
<tdcolspan="7"></td>
</tr>
<tr>
<tdcolspan="7">プログラム完成度</td>
<tdcolspan="8"></td>
<tdcolspan="7"></td>
</tr>
<tr>
<tdcolspan="7"></td>
<tdcolspan="8"></td>
<tdcolspan="7"></td>
</tr>
<tr>
<tdcolspan="4">品质目标设定の根拠</td>
<tdcolspan="18"></td>
</tr>
<tr>
<tdcolspan="5"></td>
<tdcolspan="3">予定日</td>
<tdcolspan="4"></td>
<tdcolspan="2">実施日</td>
<tdcolspan="3"></td>
<tdcolspan="2">承认者</td>
<tdcolspan="3"></td>
</tr>
<tr>
<tdcolspan="5">要求事项レビュー(记録)</td>
<tdcolspan="17"></td>
</tr>
<tr>
<tdcolspan="5">管理手顺</td>
<tdcolspan="17"></td>
</tr>
<tr>
<tdcolspan="5">PJ区分</td>
<tdcolspan="17"></td>
</tr>
<tr>
<tdcolspan="5">PJ入力情报</td>
<tdcolspan="17"></td>
</tr>
<tr>
<tdcolspan="5">纳入物品</td>
<tdcolspan="17"></td>
</tr>
<tr>
<tdcolspan="5">合否判断基准</td>
<tdcolspan="17"></td>
</tr>
<tr>
<tdcolspan="5">设计制造の出荷判定责任者、またはサービスの合否判断责任者</td>
<tdcolspan="17"></td>
</tr>
<tr>
<tdcolspan="5">PJ终了要件</td>
<tdcolspan="17"></td>
</tr>
<tr>
<tdcolspan="4">作业标准</td>
<tdcolspan="18"></td>
</tr>
<tr>
<tdcolspan="4">作业手顺</td>
<tdcolspan="18"></td>
</tr>
<tr>
<tdcolspan="4">事前教育</td>
<tdcolspan="18"></td>
</tr>
<tr>
<tdcolspan="4">外注管理方法</td>
<tdcolspan="18"></td>
</tr>
<tr>
<tdcolspan="4">顾客所有物</td>
<tdcolspan="18"></td>
</tr>
<tr>
<tdcolspan="4">准备机器及び调达计画</td>
<tdcolspan="18"></td>
</tr>
<tr>
<tdcolspan="4">PJ会议</td>
<tdcolspan="18"></td>
</tr>
<tr>
<tdcolspan="4">计画承认</td>
<tdcolspan="14"></td>
<tdcolspan="4"></td>
</tr>
<tr>
<tdcolspan="4">PJ终了承认</td>
<tdcolspan="5"></td>
<tdcolspan="2">予定日</td>
<tdcolspan="5"></td>
<tdcolspan="2">実绩日</td>
<tdcolspan="4"></td>
</tr>
<tr>
<tdcolspan="4">记事栏</td>
<tdcolspan="18"></td>
</tr>
<tr>
<tdcolspan="4">変更理由</td>
<tdcolspan="18"></td>
</tr>
</table>
</body>
</html>

❾ asp如何将数据库中的数据输出到表格中并修改 asp输出方法

下面是asp中的代码

Set rs2=Server.CreateObject(ADODB.recordset)

sql=select * from eq where eqbumen='&dep;&' order by eqbumen desc

rs2.open sql,conn,1,1

set objExcel=CreateObject(Excel.Application)

objExcel.Workbooks.Open(server.mappath(\test)&\book1.xlt) '打开Excel模板

objExcel.Sheets(1).select '选中工作页

set sheetActive=objExcel.ActiveWorkbook.ActiveSheet

num=2 '从Excel的第2行开始

Do while not rs2.eof '循环直至数据集中的数据写完

strRange=b#&:k# '设定要填写内容的单元区域

sheetActive.range(strRange).font.size=10 '设定字体大小

sheetActive.range(strRange).WrapText=false '设定文字回卷

sheetActive.range(strRange).ShrinkToFit=true '设定是否自动适应表格单元大小

sheetActive.range(strRange).value=array(rs2(zcid),rs2(eqname),rs2(eqchangjia),rs2(eqxinghao),rs2(eqnengli),rs2(eqwei),rs2(eqxianzhuang),rs2(eqno),rs2(eqbumen),rs2(eqchejian)) '把数据集中的数据填写到相应的单元中

num=num+1

rs2.MoveNext

loop

function getTemporaryFile(myFileSystem)

dim tempFile,dotPos

tempFile=myFileSystem.getTempName

dotPos=instr(1,tempFile,.)

getTemporaryFile=mid(tempFile,1,dotPos)&xls; end function

set myFs=createObject(scripting.FileSystemObject)

filePos=server.mappath(\test)&\temp '要存放打印临时文件的临时目录

fileName=getTemporaryFile(myFs) '取得一个临时文件名

'myFs.DeleteFile filePos&*.xls '删除该目录下所有原先产生的临时打印文件

set myFs=nothing

objExcel.ActiveWorkbook.saveas filePos&filename;

objExcel.quit

set objExcel=Nothing。

❿ ASP循环表格代码

因为你设置了TD的WIDTH,所以,这里只改TABLE的WIDTH是没用的,还要改TD的WIDTH为更小的值,TABLE的宽度值是你的页面有效宽度的一半小一些,而TD的宽度是TABLE的宽度的一半,另外你的第二行TD还少了 colspan="2"

热点内容
内置存储卡可以拆吗 发布:2025-05-18 04:16:35 浏览:335
编译原理课时设置 发布:2025-05-18 04:13:28 浏览:378
linux中进入ip地址服务器 发布:2025-05-18 04:11:21 浏览:612
java用什么软件写 发布:2025-05-18 03:56:19 浏览:32
linux配置vim编译c 发布:2025-05-18 03:55:07 浏览:107
砸百鬼脚本 发布:2025-05-18 03:53:34 浏览:942
安卓手机如何拍视频和苹果一样 发布:2025-05-18 03:40:47 浏览:739
为什么安卓手机连不上苹果7热点 发布:2025-05-18 03:40:13 浏览:802
网卡访问 发布:2025-05-18 03:35:04 浏览:510
接收和发送服务器地址 发布:2025-05-18 03:33:48 浏览:371