  | 
				VFP 愛用者社區 本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.   
				 | 
			 
		 
		 
	
		| 上一篇主題 :: 下一篇主題   | 
	 
	
	
		| 發表人 | 
		內容 | 
	 
	
		sky
 
 
  註冊時間: 2006-09-01 文章: 12
 
  第 1 樓
  | 
		
			
				 發表於: 星期二 十月 31, 2006 12:10 pm    文章主題: vfp6.0列印報表的問題 | 
				     | 
			 
			
				
  | 
			 
			
				各位先進:
 
      小弟之前使用vfp6.0做的一個列印報表的程式,因為使用者需要在報表每一頁下方印上  "第n頁  共n頁"  ,我知道在vfp9.0中有一個系統變數  _pagetotal可以做 "共n頁" ,但是vfp6.0沒有,我是先將報表列印到檔案(xxxxx.txt),再取其_pageno值當成總頁數,最後再實際從列表機印出,可是我檢視檔案(xxxxx.txt)與實際從列表機印出的報表,每頁的筆數並不相同,導致總頁數不同,請問各位先進,我應該如何解決這個問題,謝謝。 | 
			 
		  | 
	 
	
		| 回頂端 | 
		 | 
	 
	
		  | 
	 
	
		小賴
 
 
  註冊時間: 2004-12-27 文章: 477
 
  第 2 樓
  | 
		
			
				 發表於: 星期二 十月 31, 2006 1:22 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				好像應該是先執行帶NOCONSOL參數的REPORT; 再取得_PAGENO
 
不是先列印至檔案
 
 
REPORT  FORM ......NOCONSOL
 
nTotalPage = _PAGENO
 
REPORT  FORM ........TO PRINTER PROMPT | 
			 
		  | 
	 
	
		| 回頂端 | 
		 | 
	 
	
		  | 
	 
	
		sky
 
 
  註冊時間: 2006-09-01 文章: 12
 
  第 3 樓
  | 
		
			
				 發表於: 星期二 十月 31, 2006 1:35 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				謝謝小賴前輩,可是我的程式有加noconsole,還是一樣無法得到總頁數,我的程式如下:
 
......
 
REPORT FORM 檢查單.frx  noconsole  TO file c:\cl.txt ascii
 
pgtotal=0
 
pgtotal= _pageno
 
...... | 
			 
		  | 
	 
	
		| 回頂端 | 
		 | 
	 
	
		  | 
	 
	
		區榮熾
 
 
  註冊時間: 2005-11-14 文章: 191
 
  第 4 樓
  | 
		
			
				 發表於: 星期一 一月 14, 2008 11:18 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				TO  sky
 
我剛學會,分享給你,若你仍未解的話:
 
 
1, 在你表單或程式內設公用變數
 
     publi  pgtotal
 
2, 再加上
 
    REPORT FORM 檢查單.frx noconsole 
 
     pgtotal= _pageno 
 
    REPORT FORM 檢查單.frx Preview  noconsole 
 
3, 在報表內, 你放 "第 "+Alltr(str(_pageno))+" 頁/共 "+ Alltr(Str(pgtotal))+" 頁" 到新欄位內就會秀出
 
4, 重點是第一次執行報表是計算總頁數( _pageno)  (這動作看不到的)
 
5, 第二次執行是正式印出報表
 
 
全部OK就執行表單或程式,看可否如意
 
謹供分享....... | 
			 
		  | 
	 
	
		| 回頂端 | 
		 | 
	 
	
		  | 
	 
	
		 | 
	 
 
  
  	 
	    
  	   | 
 	
您 無法 在這個版面發表文章 您 無法 在這個版面回覆文章 您 無法 在這個版面編輯文章 您 無法 在這個版面刪除文章 您 無法 在這個版面進行投票 您 無法 在這個版面附加檔案 您 無法 在這個版面下載檔案
  | 
   
  
		 |