zypmuzi1 2015-10-20 08:13 采纳率: 0%
浏览 1411
已采纳

刚接触pb9代码中的一些字段不了解是什么含义,望大神们指教

string ls_userid
ulong ul_size = 300
is_currentdirectory = fill(char(0),300)
GetCurrentDirectoryA(ul_size,is_currentdirectory)

is_userinifile = is_currentdirectory+"\enjoy.ini"

if Len (is_userinifile) > 0 then
ls_userid = ProfileString (is_userinifile, "logon", "userid", "")
end if

sle_userno.text = ls_userid
if Len (sle_userno.text) > 0 then
if Len (sle_password.text) > 0 then
cb_in.SetFocus()
else
sle_password.SetFocus()
end if
else
sle_userno.SetFocus()
end if

uf_add_stores()
if ddlb_store.TotalItems( )=0 then
ddlb_store.visible = false
dw_1.object.t_stores.visible = '0'
end if

if gnv_app.sADUser<>'' then
if (not isnull(gnv_app.is_userno) and gnv_app.is_userno<>'') then
sle_userno.text = gnv_app.is_userno
sle_password.enabled = false
sle_userno.enabled = false
end if
end if

if gnv_app.isrunas = 'OA' then
//DW_1.MODIFY('P_1.filename="..\picture\loginRMIS_OA_bg.jpg"')
p_market.picturename = "..\picture\logo_OA.jpg"
elseif gnv_app.isrunas = 'WMS' then
p_market.picturename = "..\picture\logo_WMS.jpg"

end if
if (fileexists("..\picture\market.jpg")) then
p_market.picturename = "..\picture\market.jpg"
p_enjoyit.visible = false
end if
p_market.visible = false

  • 写回答

2条回答 默认 最新

  • threenewbee 2015-10-21 00:11
    关注

    字段的含义属于你的业务逻辑,你得问相关的人。大致来说,这些代码加载用户信息。

    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论
查看更多回答(1条)

报告相同问题?

悬赏问题

  • ¥15 远程桌面文档内容复制粘贴,格式会变化
  • ¥15 关于#java#的问题:找一份能快速看完mooc视频的代码
  • ¥15 这种微信登录授权 谁可以做啊
  • ¥15 请问我该如何添加自己的数据去运行蚁群算法代码
  • ¥20 用HslCommunication 连接欧姆龙 plc有时会连接失败。报异常为“未知错误”
  • ¥15 网络设备配置与管理这个该怎么弄
  • ¥20 机器学习能否像多层线性模型一样处理嵌套数据
  • ¥20 西门子S7-Graph,S7-300,梯形图
  • ¥50 用易语言http 访问不了网页
  • ¥50 safari浏览器fetch提交数据后数据丢失问题