改成sql版后,常见问题解决(强烈要求置顶!!)
我现在在做这个项目,边做边改吧。改成sql版后,会发现即时通不显示在线的人了。
问题原因:ASP+MSSQL编程里要设置记录集游标的类型,即Rs.CursorLocation.
Rs.CursorLocation对[b]recordcount[/b]的影响如下:
光标类型 [b]recordcount[/b] 属性
ForwardOnly 0(默认) 返回-1
Keyset 1 正确的记录数
Dynamic 2 -1或不正确的记录数,依数据源而定
Static 3 正确的记录数
所以,在ASP+MSSQL里正确的写法应该是:
[b]sql[/b]="XXXXXXX"
Set rs = Server.CreateObject("Adodb.Recordset")
rs.CursorLocation = 3
rs.Open [b]SQL[/b],Conn,1,1
response.write rs.[b]recordcount[/b]
[b][color=#000000][/color][/b]
[b][color=#000000]解决办法:[/color][/b]
[b][color=#000000][/color][/b]
Public Function HX_SetRSD(ColsStr,TaNameStr,OrderBystr)函数
HX_SetRSD.open "select "&ColsStr&" from "&TaNameStr&OrderBystr,conn,1,3前面加上一行:
HX_SetRSD.CursorLocation = 3
[[i] 本帖最后由 love521 于 2008-7-22 04:03 PM 编辑 [/i]] 我现在在用这个系统,准备改成一个学校用的oa系统,去掉前台,美化页面,加入成绩管理系统,在线编辑器等功能,具体的不能说,涉及商业机密。呵呵
大概在8月10号完成,有需要一起研究的,可以加我qq:278203374 设置上下班登记时间段
提前分钟允许登记 延后分钟允许登记
不能更新
问题解决:
HXSystemSet/AttendanceSet.asp
case "setinterval"那段改为
case "setinterval"
if irs.recordcount<=0 then irs.addnew:irs("WS_AttendanceIntervalStart")=request("INTERVAL_BEFORE"): irs("WS_AttendanceIntervalEnd")=request("INTERVAL_AFTER"):else:irs("WS_AttendanceIntervalStart")=request("INTERVAL_BEFORE"): irs("WS_AttendanceIntervalEnd")=request("INTERVAL_AFTER"):end if:irs.update:WS_S.HX_Redirect "attendanceset.asp" 改成sql后,在登陆的时候,会出现空白页,就是检测密码那步,死掉了,没反映。
原因:是因为在检测ip是不是被屏蔽那步出现错误。
解决方法:
Public Function ChecKIPlock(ip)函数改为:
Public Function ChecKIPlock(ip)
num_ip=IpEncode(ip)
set rs=WS_S.HX_SetRSD("WS_LOID","HX_lockip"," where convert(int,WS_Startip)<="&num_ip&" and convert(int,WS_Endip)>=" & num_ip)
if rs.recordcount>0 then
Call WS_S.HX_RSClose(rs)
Call HX_GoBack("你所在网段已被封锁。可能该网段有人捣乱,请联系管理员!","")
end if
Call WS_S.HX_RSClose(rs)
end function 难道大家不需要sql版的么
我的帖子怎么不火啊?
要求斑竹置顶!!! 人力资源》》》》审核删除
这一页不能用
解决办法:
HXManpowerResource/deluser.asp这一页
所有的WS_leave=ture改为WS_leave=1
所有的WS_leave=false改为WS_leave=0 正需要呢,lz把改详细的步骤说下可以吗? 我正打算改呢。能不能把改动的放上来,大家一起努力啊 [attach]13214[/attach]
支持支持
如能分享就更好了!页:
[1]