欢迎来到Doc100.Net免费学习资源知识分享平台!
您的位置:首页 > 程序异常 >

foxpro反向开发的,二进制有关问题不知怎么解决

更新时间: 2014-01-05 02:27:23 责任编辑: Author_N1

 

FOXPRO反向开发的,二进制问题不知如何解决?
本来通过表单实现可视开发程序,但由于所要开发的表单风格相同的太多,所以,就通过程序对FOXPRO表单自身的表(只要USE **.SCX)进行添加-修改实现自动生成所要的表单,但发现OBJCODE这个字段是用二进制加密的,无法进行有效的操作,导致无法继续,哪位大家,可以指导指导!
下面是二进制的文件与原文件,如何进行互换,请给个方法,谢谢了!
原字段(METHODS):
PROCEDURE Click
bh=bbc.BMID
IF bh=0
MESSAGEBOX("选择要修改的记录",48,"警告",6000)
ELSE
DO FORM 部门档案_edit.SCX WITH bh TO cRetValue
IF cRetValue
thisform.list1.rowsource="SELECT 部门编号, 部门名称  FROM  DSH!机构人员 WHERE  部门属性=1 INTO CURSOR ABC"
thisform.list1.Refresh
bmbh=ALLTRIM(thisform.list1.Value)
thisform.grid1.recordsource="SELECT 部门编号, 部门名称, 部门属性, 部门类型, 助记码, 负责人, 否用, BMID  FROM  DSH!机构人员 WHERE 部门编号=bmbh ORDER BY 机构人员.部门编号 INTO CURSOR BBC"
thisform.grid1.Refresh
ENDIF
ENDIF
ENDPROC


二进制备注字段(OBJCODE):

    ?  ?                        眕
   %   "      `     @          ?
  U    F?  ? Q? ?
 欞 ? ? U  机构人员 THISFORM RELEASEO G
?
 7?  ?? 暵? DSH? Q? 机构人员 T? ? ?
 P SELECT 部门编号, 部门名称  FROM  DSH!机构人
员 WHERE  部门属性=1  INTO CURSOR ABC? T? ? ?
 s SELECT 部门编号,部门名称,部门属性,部门类型
,助记码,负责人,否用,BMID FROM 机构人员 ORDER BY 部
门编号  INTO CURSOR BBC T? ? ?   T? ? ?
 ? ?    欬C? ? ?
  U   PUB DSH 机构人员 THISFORM LIST1    R
OWSOURCE GRID1  RECORDSOURCE FONTSIZE
 COLUMNCOUNT AUTOFIT Unload,      Initj    
 1 q A Q ? 3 a ? ? ? 
1a111                       Q      
   l         )   ?                  
二进制
上一篇:上一篇
下一篇:下一篇

 

随机推荐程序问答结果

 

 

如对文章有任何疑问请提交到问题反馈,或者您对内容不满意,请您反馈给我们DOC100.NET论坛发贴求解。
DOC100.NET资源网,机器学习分类整理更新日期::2014-01-05 02:27:23
如需转载,请注明文章出处和来源网址:http://www.doc100.net/bugs/t/10003/
本文WWW.DOC100.NET DOC100.NET版权所有。