ASP中如何將服務器中的數據下載到本地電腦

建議保存成壹個逗號分隔文件(*.csv)，可以用excel打開，這樣數據表中的每個字段顯示壹列。範例如下：

第壹步：數據庫查詢，保存在記錄集中。

Dim sql : sql = "select * from table"

Set rs = conn.Execute(sql)

第二步：設置文件名。

Dim filename : filename = year(now()) & month(now()) & day(now())

filename = filename & ".csv"

第三步：文件類型

response.contenttype = "application/octet-stream"

response.addheader "Content-Type","application/octet-stream"

response.addheader "Content-Disposition","attachment;filename="""& filename &""""

第四步：字段頭，表頭信息

response.write "字段1,字段2,字段3,...."&vbNewLine

第五步：輸出被下載數據

while not Rs.eof

a=rs("字段1")

b=rs("字段2")

c=rs("字段3")

tmpstr= a & "," & b & "," & c

response.write tmpstr

Rs.movenext

wend

Rs.close

set Rs=nothing

conn.close

Set conn = nothing

最後，說明壹下，訪問這個文件會自動打開下載對話框的。

上一篇:＋86和－54的原碼,反碼和補碼

下一篇:源碼時代在報名合同裏有簽就業最低保障薪資，這個靠譜不？