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(eqweizhi),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。

　　1、選中姓名這一列的資料，選中的標誌就是表格的粗黑線，之後，依次在“開始”選項卡上選擇：“編輯”-“排序和篩選”-“自定義排序”。

　　2、excel如何把相同名字或者相同的資訊排列在一起

　　3、這時，會彈出“排序”視窗，在列的主要關鍵字中選擇“姓名”，“排序依據”和“次序”執行預設選項即可。

　　4、excel如何把相同名字或者相同的資訊排列在一起

　　5、點選“確定”選項之後，再次回到Excel介面，就會發現姓名這一列中相同的資訊已經排列到一塊啦。

　　6、excel如何把相同名字或者相同的資訊排列在一起

　　7、下面小編就來說明排序的深層次原因，按照以上同樣的方法再次進入“排序”視窗，在上方點選“選項”，就可以看到Excel排序的規則。

　　8、excel如何把相同名字或者相同的資訊排列在一起

　　9、預設的情況下，在你選擇相應的資料之後，就會進行排序，在方向上是“按列排序”，在方法上是“字母排序”，再這樣的規則之下，我們才能保證Excel中相同的資訊會排列在一起。

　　1、首先找到桌面上的excel表格。

　　2、雙擊開啟它。

　　3、可以看到下方有幾個工作表，在開啟的第一個上點選右鍵，選擇選定全部工作表。

　　4、比如想隱藏A列，選中A列，同時右鍵，選擇隱藏。

　　5、會發現A列不見了，就被隱藏起來了。

　　6、若想顯示，選中全部工作表，在字母欄上右鍵，取消隱藏。

　　7、就可以看到剛才隱藏的就又回來了。