LOCAL query_tmp1
query_tmp1=thisform.grid1.RecordSource
IF EOF(query_tmp1)
    RETURN
ENDIF
SELECT (query_tmp1)
SCATTER memv
SELECT 报名数据库
LOCATE FOR ALLTRIM(学生姓名)==ALLTRIM(M.学生姓名) AND ALLTRIM(身份证)==ALLTRIM(m.身份证)
IF FOUND()
    m.学生代码=学生代码
ELSE
    APPEND BLANK
    m.学生代码=PADL(CEILING(RECCOUNT()/50),2,'30')+PADL(iif(RECCOUNT()%50=0,50,RECNO()%50),2,'0')
ENDIF
GATHER memv
SELECT (query_tmp1)
REPLACE 学生代码 WITH m.学生代码
REPORT FORM 报表1  RECORD RECNO()  preview
GO TOP IN (query_tmp1)
  （  这一个代码在打印的时候是从30场开始打印的 当打印到39考场的时候就又从1001开始打印了 不知道那里出现问题了请老师们看看）

这一个代码在打印的时候是从31场开始打印的 当打印到39考场的时候就又从1001开始打印了 不知道那里出现问题了请老师们看看

本来是50人一考场的数据  从0101开始到0150  满50人就顺延到第二考场0201开始到0250 以此类推  因为需要多台机器一块报名 所以就把 源代码里面的 m.学生代码=PADL(CEILING(RECCOUNT()/50),2,'0')+PADL(iif(RECCOUNT()%50=0,50,RECNO()%50),2,'0')   红色的0 改成30了 打印是从3101开始的  结果当打印到39场3950号码以后再打印的时候就成1001了，从40场就不能顺延打印了，老师能否给帮忙修改一下具体的代码，直接把这一句代码修改一下。谢谢

我现在的报名已经从40场开始了（4001---）， 按照你上边的方法改过代码 是不是打上几场以后就又不能打印了，还要再修改代码吗
谢谢

m.学生代码=STR(CEILING(RECCOUNT()/50)+39,2)+PADL(iif(RECCOUNT()%50=0,50,RECNO()%50),2,'0')   现在我是从40场开始 就目前这个编码 能不能先打印到第60场50个学生也就是6050这个号码呀 ，主要是现在正在招生 出现问题了 ，以后再慢慢调吧

这样准考证号码就 成6位的了300101开始了

我总体的意思就是 50人一考场0101-0150  满50人就顺延到下一考场 因为我是用的是两台计算机 所以就把m.学生代码=PADL(CEILING(RECCOUNT()/50),2,'30')红色的30变了一下，想从31场开始在另一台机器上，结果当报到39场50号的时候，下一场4001的时候，就变成了1001了，一下子就出现这个问题了 。其实我就是想把报名的数据分配给两台计算机，同时报名还不能重复考场号，一般的情况都是招生报名的名额在3500人左右。最好能随机编场。

谢谢老师们  真的帮大忙了  以后还能不能把考生的准考证号码随机编场 ？

考场号：PADL(CEILING(RECNO()/50)+50,2,'0')
考生号：PADL(iif(RECNO()%50=0,50,RECNO()%50),2,'0')
 能不能在前面加个2015 最后成为 2015+考场号+考生号
  谢谢老师