integer li_ce
integer il_login_status
integer li_rtn
string ls_value
string ls_pp
string ls_sqld
if long(uf_get_sps_y(0)) <> long(parent.sle_2.text) then //uf_get_sps_y(0)) 这个变量我怎么找不到
messagebox("0:","password error")
if isvalid(message) then //message 的值是那些啊
return 0
else
return message.returnvalue // 这句请问什么意思啊
end if
end if
if uf_connect_data_server() = 0 then
else
parent.st_1.text = "can not connect the database server...."
if isvalid(message) then
return 0
else
return message.returnvalue
end if
end if
ls_value = uf_add_ps(trim(parent.ls_cpn) + trim(parent.sle_1.text)) //uf_add_ps 这个函数也不知道什么意思
ls_sqld = "alter table dbo.TI006 add TI00628 char(20) null"
EXECUTE ;
if sqlca.sqlcode = 0 then
messagebox("1:","success")
end if
UPDATE ;
if sqlca.sqlcode = 0 then
messagebox("2:","success")
end if
ls_sqld = "alter table dbo.TI006 add TI00626 int null" //加引号不是字符串啊
EXECUTE ;
------解决方案--------------------
integer li_ce
integer il_login_status
integer li_rtn
string ls_value
string ls_pp
string ls_sqld
if long(uf_get_sps_y(0)) <> long(parent.sle_2.text) then //uf_get_sps_y(0)) 这个变量我怎么找不到
晕,这怎么会是变量,这肯定是一个函数(对象里的或者窗口或全局的)
messagebox("0:","password error")
if isvalid(message) then //message 的值是那些啊
message是全局对象
return 0
else
return message.returnvalue // 这句请问什么意思啊
//判断message的返回值,请查看帮助
end if
end if
if uf_connect_data_server() = 0 then
else
parent.st_1.text = "can not connect the database server...."
if isvalid(message) then
return 0
else
return message.returnvalue
end if
end if
ls_value = uf_add_ps(trim(parent.ls_cpn) + trim(parent.sle_1.text)) //uf_add_ps 这个函数也不知道什么意思
//先找到这个函数,然后再分析是什么意思
ls_sqld = "alter table dbo.TI006 add TI00628 char(20) null"
EXECUTE ;
if sqlca.sqlcode = 0 then
messagebox("1:","success")
end if
UPDATE ;
if sqlca.sqlcode = 0 then
messagebox("2:","success")
end if
ls_sqld = "alter table dbo.TI006 add TI00626 int null" //加引号不是字符串啊
EXECUTE ;
------解决方案--------------------
看命名规则,那应该是个integer的实例变量。你这程序哪来的,变量定义有点乱啊。呵呵aa,bb,cc,dd谁知道是干啥用的。呵呵
------解决方案--------------------
是有点乱啊。
------解决方案--------------------
班竹最近老忙哈。。。
------解决方案--------------------
肯定是在看别人的代码,或者是公司的代码;
一看命名规则就知道,确实些自定义函数和变量。
建议看看公司的命名规则以及好好看一本PB的书,基础知识不扎实啊!