excel导出问题

[layeryli]

导出EXCEL时先弹出保存EXCEL的对话框，单击“保存”会再弹出来一个对话框提示保存为html，而且只有一台客户端是这样，并且也不是每次都这样，又是也会导出成功，头都大了，大家帮忙啊

[机器人]

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
' ページを初期化するユーザー コードをここに挿入します。
If Not Page.IsPostBack Then
Dim FilePath As String = Session("FilePath").ToString()
If FilePath Is Nothing Then
Response.Write("<h1>Server is unusable!</h1>")
Else
Try

Dim fs As System.IO.FileStream = System.IO.File.OpenRead(FilePath)
Dim FileData(fs.Length) As Byte
fs.Read(FileData, 0, CType(fs.Length, Integer))
fs.Close()
Session.Clear()
Response.ClearHeaders()
Response.AddHeader("Content-Type", "application/vnd.ms-excel")
Response.AddHeader("Content-Disposition", "inline;filename=" + FilePath)
Response.AddHeader("Content-Length", FileData.Length.ToString())
Response.BinaryWrite(FileData)
Catch ex As Exception
Response.Write("<h1>Server is unusable!</h1>")
End Try
Response.End()
End If
End If
End Sub

希望这段代码能对你有所帮助。

[layeryli]

谢谢 fangxinggood(JustACoder)
我的代码也是这样的，但现在的情况时其他机器都正常，只有一台机器的下载不正常
会不会是中毒了？

[layeryli]

up

[rainhj]

我的一开始也出这个问题，后来加上一句：
Response.ContentType = "application/ms-excel";
就好了！

[ghao0]

up

[layeryli]

估计是office版本的问题，谢谢各位了，结贴