见鬼了,怎么会出现这种莫明其妙的问题?
<P>程序一直用的好好的,忽然“打印”按钮不好使了,再怎么点它都是没反应。大家知道是怎么回事吗?<BR>表中主键xh是自动标识列,数据类型是int型的。难道跟这个字段数据太大有关系?<BR>“打印”按钮的代码如下,各位帮忙看看怎么回事。<BR><BR>int ret,li_rowcount<BR>int li_beg,li_end,li_count_dw_2,li_row_insert,i<BR>if dw_1.rowcount()=0 then return<BR>dw_1.deleterow(m_xh)<BR>li_beg=dw_1.getitemnumber(1,'xh')<BR>li_end=dw_1.getitemnumber(dw_1.rowcount(),'xh')<BR>//////////////////////////////////////不够五行的倍数插入空行<BR>//////////////////////////////////////<BR>datastore lda_ck_group<BR>long ll_count<BR>int j<BR>string ls_ksbm,ls_lbb,ls_dycs<BR>lda_ck_group=create datastore<BR>lda_ck_group.dataobject='d_ck_group'<BR>lda_ck_group.settransobject(sqlca)<BR>lda_ck_group.retrieve(li_beg,li_end)<BR>ll_count=lda_ck_group.rowcount()<BR>if ll_count=0 then return<BR>ulong job<BR>job=printopen()<BR>////////////////////////////////////////////////判断该序号之间有几次分组,根据分组循环检索出<BR>////每个分组的记录条数,判断条数是否是8的倍数,不够插入空行,然后将数据窗口发送到打印机<BR>for j=1 to ll_count<BR> ls_ksbm=lda_ck_group.getitemstring(j,'ksbm')<BR> dw_2.retrieve(ls_ksbm,li_beg,li_end)</P><P> dw_2.modify("czy_t.text='"+czy+"'")<BR> ////////////////////////////////////<BR> /////////////////////////////////不够八行的倍数插入空行<BR> li_count_dw_2=dw_2.rowcount()<BR> li_row_insert=mod(li_count_dw_2,dyhs)<BR> if li_row_insert<>0 then<BR> for i=1 to (dyhs - li_row_insert)<BR> dw_2.insertrow(0)<BR> next<BR> end if</P>
<P>next<BR>printclose(job)<BR>///////////////////////////////////////<BR>dw_2.reset()<BR>dw_1.reset()<BR>cb_1.setfocus()<BR>m_xh=0<BR>sle_1.text=string(m_xh)</P>
页:
[1]
