SQL中分頁方法收集

----   一、   预备知识     
 //1/8英寸   =   0.125   英寸   =   1.875   毫米   
 ///1   英寸   =   25.4   毫米   
   
  ----   计算机与打印机的 通讯 使用ASCII码进行，其中标准ASCII码包括可打印字符及非打印字符（控制码），打印机使用控制码来定制打印机。大多数打印机指令使用控制码escape作为其指令序列的第一个序列码。下面介绍本文用到的几个指令码序列：    
   
  设置换行量（行距）1/8   英寸  
   
  ASCII码   ESC   0  
   
  十进制码   27   48  
   
  设置以行为单位的页长  
   
  ASCII码   ESC   C   n  
   
  十进制码   27   67   n  
   
  其中n   为每页行数范围（1-127）  
   
  ----   二、   PB中控制码的传送及定制页长的实现    
   
  ----   在PB中通过函数Printsend(printjobnumber,string,{zerochar})来实现向打印机发送控制码。各参数定义如下：    
   
  printjobnumber:   由printjob()函数返回的打印作业号；  
   
  string:   控制字符串，使用ASCII码；  
   
  zerochar:   用来替代string中的 数字 0；  
   
  ----   由于字符串中，0终止字符串，如果string   中包含0，则需利用其他字符来表示0，参数zerochar即为此用途而设，当PB发送控制字符串给打印机时，把替代的字符zerochar转化为0。    
   
  ----   下面是具体的完成定制页长打印数据窗口的 程序 （定制页长为2.75英寸）：    
   
  long   ll_job  
   
  dw_print.reset()  
   
  ll_job   =   printopen()  
   
  if   ll_job   =   -1   then  
   
  messagebox(gs_title,"打印机未准备好")  
   
  return  
   
  end   if  
   
  //定制行距1/8英寸  
   
  PrintSend(ll_job,   CHAR(27)+CHAR(48))    
   
  //设定页长22行  
   
  PrintSend(ll_job,   CHAR(27)+CHAR(67)+CHAR(22))  
   
  printdatawindow(ll_job,dw_print)  
   
  printclose(ll_job)