|
将DW数据窗口导出为EXCEL文件的方法(整理)(5) RETURN 1 end function public function integer uf_toexcel (datawindow adw_data, readonly string as_title); /**********************************************************/ //Function : 转换数据到 excel //parm : // 1. adw_data : 包含源数据的对象 // 2. as_title : excel 的标题 //return : 1 is success and -1 is fail //Author : hzh //date : 2003.12.08 /**********************************************************/ IF THIS.uf_setdatasource(adw_data) <> 1 THEN RETURN -1 IF NOT IsValid(ids_data) THEN RETURN -1 IF ids_data.RowCount() < 1 THEN RETURN -1 THIS.uf_initcolumn()
THIS.uf_datatoexcel(as_title) RETURN 1 end function private function integer uf_setdatasource (datawindow adw_data);/**********************************************************/ //Function : 设置数据存储 //parm : None //return : //Author : hzh
|