web中导出EXCEL时，如何显示保存对话框，在线（急！） [问题点数：0分]
-
本版专家分：0结帖率 100% -
回复次数7楼主web中导出EXCEL时，如何显示保存对话框，在线（急！）问题点数：0分
-
-
CSDN今日推荐
-
本版专家分：93482
-
- 黄花 2004年12月 .NET技术大版内专家分月排行榜第二
-
-
蓝花
2004年9月 .NET技术大版内专家分月排行榜第三
2004年8月 .NET技术大版内专家分月排行榜第三
-
-
#1 得分：0string path = Server.MapPath(this.xlfile.Text+".xls");
System.IO.FileInfo file = new System.IO.FileInfo(path);
Response.Clear();
Response.Charset="GB2312";
Response.ContentEncoding=System.Text.Encoding.UTF8;
// 添加头信息，为"文件下载/另存为"对话框指定默认文件名
Response.AddHeader("Content-Disposition", "attachment; filename=" + Server.UrlEncode(file.Name));
// 添加头信息，指定文件大小，让浏览器能够显示下载进度
Response.AddHeader("Content-Length", file.Length.ToString());
// 指定返回的是一个不能被客户端读取的流，必须被下载
Response.ContentType = "application/ms-excel";
// 把文件流发送到客户端
Response.WriteFile(file.FullName);
// 停止页面的执行
Response.End();
-
本版专家分：76
-
#2 得分：0如果你的网页的meta设置是gb2312，那么charset最好设置成utf-8,和contentencoding一样。
如果你有checkbox，选择导出的话，那么在判断时，!checked的项设置dataGrid1.items[i].style["display"] = "none",以防出现乱码
-
本版专家分：4122 -
#3 得分：0<table width="100%" border=1 cellspacing=1 cellpadding=1 id="table" >
<tr class="tr" align="center">
<td>time</td>
<td>name</td>
<td>size</td>
<td>age</td>
<td>address</td>
</tr>
<tr class="td" >
<td>2004/11/22</td>
<td>abc</td>
<td>ee</td>
<td>dfasd</td>
<td>xxx</td>
</tr>
</table>
<script language="javascript">
function exportExcel(atblData){
if (typeof(EXPORT_OBJECT)!="object"){
document.body.insertAdjacentHTML("afterBegin",
"<OBJECT style='display:none' classid=clsid:0002E510-0000-0000-C000-000000000046 id=EXPORT_OBJECT></Object>");
}
with (EXPORT_OBJECT){
DataType = "HTMLData";
HTMLData =atblData.outerHTML;
try{
("e:\\JSP\\abc.xls", 1);
ActiveSheet.clear();
}
catch (e){ }
}
}
</script>
-
本版专家分：0
-
#4 得分：0理解错了，我用的是下面的代码
int rowIndex=1;
string User_ID="3";
Sql.TSqlDB db=new Sql.TSqlDB();
string strSel="select * from tb_sjsj where User_ID='"+User_ID+"' order by id asc";
SqlDataAdapter sqldata=new SqlDataAdapter(strSel,db.SqlConn);
DataSet myset=new DataSet();
sqldata.Fill(myset,"tb_sjsj");
db.SqlConn.Close();
Excel.Application app = new Excel.ApplicationClass();
Object oMissing = System.Reflection.Missing.Value;
Excel.Workbook oBook = app.Workbooks.Add(oMissing);
app.Cells[1,1]="编号";
app.Cells[1,2]="用户编号";
app.Cells[1,3]="序号";
app.Cells[1,4]="井号";
//将所得到的表的列名,赋值给单元格
app.Cells[1,5]="油田";
app.Cells[1,6]="区块";
app.Cells[1,7]="依据地质方案 ";
app.Cells[1,8]=" 施工目的";
app.Cells[1,9]=" 设计日期 ";
app.Cells[1,10]="设计人";
app.Cells[1,11]=" 套管状况 ";
app.Cells[1,12]=" 设计工序1 ";
app.Cells[1,13]="设计工序2";
app.Cells[1,14]="设计工序3";
app.Cells[1,15]="设计工序4 ";
app.Cells[1,16]=" 设计工序5";
app.Cells[1,17]=" 设计工序6 ";
app.Cells[1,18]="设计工序7";
app.Cells[1,19]=" 存在问题 ";
app.Cells[1,20]="分合注 ";
app.Cells[1,21]=" 层数 ";
app.Cells[1,22]=" 最小层间距 ";
app.Cells[1,23]="封隔器型号";
app.Cells[1,24]="封隔器深度";
app.Cells[1,25]="校深 ";
app.Cells[1,26]=" 备注";
foreach(DataRow row in myset.Tables["tb_sjsj"].Rows)
{
rowIndex++;
int colIndex=0;
foreach(DataColumn col in myset.Tables["tb_sjsj"].Columns)
{
colIndex++;
app.Cells[rowIndex,colIndex]=row[col.ColumnName].ToString().Trim();
}
}
app.Visible=true;
oBook.Saved = true;
app.UserControl = false;
-
本版专家分：782 -
#5 得分：0study
-
本版专家分：4604
-
#6 得分：0简单点，先保存在服务器端，然后Response.Redirect("xls文件");
-
本版专家分：6342 -
#7 得分：0<%@ Page Language="VB" AutoEventWireup="True" Debug="true" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<%@ Import Namespace="System.Drawing" %>
<%@ Import Namespace="System.Drawing.Color" %>
<html>
<script runat="server">
dim MyConnection as OleDbConnection
dim cmdSelect as OleDbCommand
dim dtrReader as OleDbDataReader
Sub Page_Load(sender As Object, e As EventArgs)
MyConnection = New OleDbConnection( "Provider=Microsoft.Jet.OLEDB.4.0; Data Source =" + Server.MapPath(".")+"/db/kk.mdb")
If Not IsPostBack Then
BindGrid()
End If
End Sub
Sub BindGrid()
Dim MyCommand As OleDbDataAdapter = new OleDbDataAdapter("select * from [board]", MyConnection)
Dim DS As DataSet = new DataSet()
MyCommand.Fill(DS,"min")
MyDataGrid.DataSource =DS.Tables("min").DefaultView
MyDataGrid.DataBind()
End Sub
Sub Mydatagrid_PageIndexChanged(s as object,e as DataGridPageChangedEventargs)
MyDataGrid.CurrentPageIndex=e.newPageIndex
BindGrid()
End Sub
Sub Button1_Click(sender As Object, e As System.EventArgs)
'-------------------
MyDataGrid.AllowPaging = "false"
BindGrid()
'-------------------
MyDataGrid.SelectedItemStyle.BackColor=Color.white
MyDataGrid.AlternatingItemStyle.BackColor=Color.white
MyDataGrid.ItemStyle.BackColor=Color.white
MyDataGrid.HeaderStyle.BackColor=Color.white
MyDataGrid.HeaderStyle.ForeColor=Color.red
'----------
dim resp as HttpResponse = Page.Response
resp.ContentEncoding = System.Text.Encoding.GetEncoding("GB2312")
Response.ContentType = "application/vnd.ms-excel"
Response.Charset = ""
Me.EnableViewState = False
Dim tw As New System.IO.StringWriter()
Dim hw As New System.Web.UI.HtmlTextWriter(tw)
MyDataGrid.RenderControl(hw)
Response.Write(tw.ToString())
Response.End()
'-------------------
MyDataGrid.AllowPaging = "true"
BindGrid()
End Sub
</script>
<body>
<form runat="server">
<asp:Label id="lblFile" forecolor="red" runat="server"/><BR>
<asp:Button id="button1" onclick="Button1_Click" text="Write To Excle File" runat="server"/>
<BR>
<asp:datagrid id="MyDataGrid"
runat="server"
CellPadding="4"
BackColor="White"
BorderColor="#330033"
BorderWidth="1px"
BorderStyle="None"
AllowPaging="true"
pageSize="10"
OnPageIndexChanged="Mydatagrid_PageIndexChanged"
>
<PagerStyle Mode="NumericPages"
Font-Bold="true"
BackColor="#F2F2F2"
HorizontalAlign="right">
</PagerStyle>
<SelectedItemStyle BackColor="#FFCC66"></SelectedItemStyle>
<AlternatingItemStyle BackColor="#FFCC99"></AlternatingItemStyle>
<ItemStyle BackColor="White"></ItemStyle>
<HeaderStyle Font-Bold="True" HorizontalAlign="Center" ForeColor="#330033" BorderColor="Black" BackColor="#FF9900"></HeaderStyle>
</asp:datagrid>
</form>
</body>
</html>
- 其他相关推荐
- SAP 导出本地文件时弹出文件路径选择对话框
- SPAN {font-family: "Yahei Mono";font-size: 10pt;color: #000000;background: #F2F9FB;}.L1S31 {font-style: italic;color: #808080;}.L1S32 {color: #3399FF;}.L1S33 {colo
- 页面web 导出excle表格 模版另存为类型方法 数据导出
- 关于web页面表格导出excle的小结 由于项目的需要，原有的项目共有导出的excle的功能耗时严重，本人历时不到两天重新总结整理一个简单实用的方法，网上也有好多。 参考说明，欢迎学习指正。 导出的excle的功能是同过把页面查询出来的表的数据直接通过一个自定义的模版里另存为excle表的形式，实现的导出功能。 优点：相对其他方法而言，非常简便 实用，没有繁琐的逻辑写入写出字段
- 收藏--页面导出为Excel文件中时间格式的问题
- 在页面生成报表时允许用户选择他prefer的时间格式，有下面四种时间格式可供选择： Default Option: yyyy-mm-dd Descriptive (1-Jan-07) Short Date: mm/dd/yy Short Date: dd/mm/yy 另外，用户可以选择报表是页面形式还是导出为Excel文件。原有的处理在页面上显示时间格式没有任何问题，但是昨天发
- NOPI导出EXCEL/xls/xlsx并输出到WEB页面
- 操作NOPI导入/导出/下载EXCEL,在WEB生成TABLE预览数据
- ASP.NET 弹出保存对话框
- string fileName = id + ".xlsx"; string path = Path.Combine(ExportPath, fileName); NPOIExcelHelper.DataTable2Excel(table, path, "sheet1"); HttpContext.Re
- 使用NOPI导出Excel并将文件保存到服务器
- 1.NOPI下载2.解压压缩文件将dll文件添加引用3.添加如下命名空间，代码如下图（使用的是vb写的转为c#只需要变一下声明方式就好，由于需要将导出的excel文件通过邮件附件的形式发送，所以将文件保存到服务器，考虑到这样下去服务器文件将会过多，所以每次发送的时候都先清空服务器该用户名文件夹下的文件然后再保存）Imports BLLImports NPOI.XSSF.UserModelImpor
- WEB页面点图或按钮后弹出另存对话框
- 实在没好办法....感觉就用到iframe效果理想一点.下面以点图举例,按钮实现就不用说了吧......http://www.brcn.net/bbs/image/shengdan/logo4.jpg onclick=SavePic(this.src)> function SavePic(src) { //设置Iframe加载为目标图片地址
- Web文件下载等待效果的实现
- 项目中需要实现导出Excel的功能，Excel不是保存在服务器上的文件，而是动态生成的。由于查询条件和数据大小的影响，生成Excel的时间不固定（大约5~10秒左右），因此需要做下载等待效果，防止用户多次点击下载。实现下载等待效果的关键是获取到后台导出Excel完成的时间或者捕获到Excel开始下载的事件。可以从两个方面入手，一个是在浏览器端触发onload事件。一个是在服务器端完成Excel导出
- 对已经存在Excel文件修改后保存时，会弹出一个询问对话框
- 对已经存在Excel文件修改后保存时，会弹出一个询问对话框： --------------------------- 在当前位置发现已经存在名为“RESUME.XLW” 的文件。您希望将该文件替换掉吗? --------------------------- 在保存前设置DisplayAlerts属性，即可屏蔽该对话框。如下所示：
- Web导出excel的几种方法
- 在项目中我们经常遇到需要将报表导出成excel下载保存下来，在不同的要求和不同的资源情况下我们有不同的处理方式。在这里我将谈谈我所遇到的几种情况和遇到的一些问题。 总的来说可以分为：服务器端生成和浏览器端生成2种方法。 一、 服务器端生成就是：根据用户请求，获取相应的数据，使用poi/jxl, jacob/jawin+excel或是用数据拼html的table或是cvs纯文本的数据格式