。PSR是PB的報表保存格式。
導入到PB,然後導出到Excel。
如果沒有,請再次嘗試以下方法:
PB(PowerBuilder)有壹種特殊的文件格式(本文稱為PSR文件),以PSR結尾保存報表。當壹份報告以PSR格式保存時,我們經常不知道如何再打開它。
下面將介紹打開方法:
1.首先創建壹個空的庫文件(PBL文件),這裏命名為psropen,它在庫文件中的應用也命名為psropen。
2.創建另壹個窗口w_psropen,稍微調整壹下它的屬性,比如寬度,高度,標題等。
3.在窗口中添加按鈕CB _ 1、CB _ 2、CB _ 3和CB _ 4,分別命名為另存為、打印、選擇文件和返回。
4.向窗口添加數據窗口dw_1。
5.單擊按鈕時保存的代碼:
字符串?ls_File,?ls_Path,?ls_Ext
GetFileSaveName("保存?報告“,?ls_Path,?ls_File,?“psr”,?“PSReport?文件
(*.psr),*。psr,?"?+?& amp
“短信?文件?(*.txt),*。txt,?HTML?文件?(*.htm),*。htm,?Excel5?文件
(*.xls),*。xls”)
如果?Trim(ls_Path)?& lt& gt?""?然後
ls_Ext?=?下(右(ls_Path,3))
選擇?案子?ls_Ext
案子?" psr "
dw_1。另存為(ls_Path,PSReport!,?真實)
案子?"文本"
dw_1。另存為(ls_Path,文字!,?真實)
案子?" htm "
dw_1。另存為(ls_Path,HTMLTable!,?真實)
案子?" xls "
dw_1。另存為(ls_Path,Excel5!,?真實)
案子?其他
MessageBox("保存?報告“,?“那個?類型?的?文件?得救了?是嗎?確定了?經過
那個?擴展。?"?+?& amp
“用嗎?。psr?為了什麽?PSReport,?。txt '?為了什麽?文字,?。htm?為了什麽?超文本標記語言
表,?還是?。xls?為了什麽?& amp?Excel5?",?感嘆!,?好吧!)
返回
結束?選擇
結束?如果
6.選擇點擊的文件按鈕的代碼:
字符串?ls_File,?ls_Path,?ls_Ext
龍?c?=0,鋰長度,鋰位置
GetFileOpenName("打開PSR報告",ls_Path,?ls_File,?“psr”,?“PSReport?文件
(*.psr),*。psr,?"?)
如果?Trim(ls_Path)?& lt& gt?""?然後
ls_Ext?=?下(右(ls_Path,3))
選擇?案子?ls_Ext
案子?" psr "
dw_1.setredraw(false)
dw_1.dataobject?=?ls _路徑
dw_1.setredraw(true)
dw _ 1 . modify(" data window . print . preview = Yes ")
案子?其他
MessageBox("打開PSR報告",“這個程序只能打開。PSR文件!?",?感嘆!,
好吧!)
返回
結束?選擇
結束?如果
7.點擊打印按鈕代碼:dw_1.print()
8.返回按鈕點擊代碼:關閉(父)
9.補充:?應用psropen的開放事件。打開(w_psropen).然後保存運行,就大功告成了!
註意:
1.窗口中特別增加了“另存為”按鈕,提示PSR文件格式是如何生成的。另外,當數據窗口的預覽屬性為假時,可以修改PSR文件的數據!修改後,PSR文件數據的修改功能可以通過保存到相同的文件名來實現(只要保存時可以修改原數據窗口)。
2.PBDWE60.DLL和PBVM60.DLL是支持這壹程序的必要文件。
3.該程序已在PB6.5下調試通過。