人才系统中ADODB.Field 错误 '800a0bcd'解决办法

风吹着

inc目录下Commoncode.asp文件1812行代码


***********行业***************
......
......
'***********行业多***************

修改为


'***********行业***************
Function Membertrade(str)
if str<>\"\" and not isnull(str) then
Set rs= Server.CreateObject(FR_HR_Rs)
sql=\"select trade_name from job_trade where trade_id=\";str
rs.open sql,conn,1,1
if rs.recordcount <> 0 then  
Membertrade=rs(\"trade_name\")
'Membertrade=\"无\"
else
Membertrade=\"无\"
'Membertrade=rs(\"trade_name\")
End if
rs.close
end if
End Function
'***********行业多***************

风吹着

这里的人气不很高啊，建议官方将软件全部开源，兴许会旺起来的~

admin

好象官方没有做任何加密吧