File download and Web Open

1 'clientに　デ?タファイルに　ダウンロ?ド

objPage.Response.Clear()

objPage.Response.ClearHeaders()

objPage.Response.Buffer = False

Dim strName As String = HttpUtility.UrlEncode("?求明??") & ".xls"

objPage.Response.AppendHeader("Content-Disposition", "attachment; filename=" & strName)

objPage.Response.AddHeader("Content-Length", File1.Length.ToString())

objPage.Response.WriteFile(TmpFileName)

objPage.Response.Flush()

objPage.Response.End()

2 Open

Response.ClearContent()

Response.ClearHeaders()

Response.ContentType = "application/pdf"

Response.WriteFile("c:/crystalreport1.pdf")

Response.Flush()

Response.Close()

3 DataGrid ColumnEdit

{0:###,##0}