http://www.599cn.comzh-cn创业中国源码论坛_源码网_商业源码下载_599cn.com！http://www.599cn.com/Rss Generator By Dvbbs.Netcloversuper@163.comimages/logo.gifhttp://www.599cn.com/dispbbs.asp?BoardID=24&ID=117049&Page=1zz222010-9-4 14:22:00]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117050&Page=1wdtder2010-9-4 14:22:002、2E:\web\linkbasic\home.html
打开的是同一个文件夹。
为什么2里面JPG图片都不能显示出来！
而1就可以显示出来！
]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117051&Page=1zhaoke07272010-9-4 14:22:00Provider=VFPOLEDB.1;Data Source= "&server.mappath( "\data\3158888.mdb ")
;Collating Sequence=MACHINE
是这样写嗯

]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117052&Page=1天南地北上2010-9-4 14:22:00在机房里面学生投票的时候只能获取代理服务器的ip地址（机房通过代理软件sygate上网），一个班级只能有一个人投票，因为每个人的ip的地址都是代理服务器的ip地址，现寻求高手唉晕解决这个问题，拜求了，倾偶所有分数。
]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117053&Page=1hx0011yy2010-9-4 14:22:00
以前是默认的20分钟后过期

最近不告诉怎么的了,刚登陆不一会就会退出来到登陆窗口了的

这个是为什么呢?

极度郁闷ing
]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117054&Page=1鬼泣2010-9-4 14:22:00
a.asp页面代码

Card NO.:



b.asp页面代码

set objRec=server.createobject( "adodb.recordset ")
strcard_num=request.form( "card_num ") '跪求这里这样写对嗯？
strBody = "Card NO.: " & strcard_num & "
"

上面的Card NO.是一个18位的序号，为了保密，偶只想显示最后四位，其他的都以*号代替，跪求该怎么实现呢？
别人告诉偶用 right(number,4)，可是偶不晓得这个函数该怎么使用，所以请唉晕，谢谢
]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117041&Page=1南天一柱2010-9-4 14:21:00]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117042&Page=1xiaoyu282010-9-4 14:21:00那位告诉的大大随手指点偶一下下啦??
]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117043&Page=1刘伟2010-9-4 14:21:00 月 日


response.Write(sj)不取值，跪求错在哪儿了
]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117044&Page=1xuesn2010-9-4 14:21:00]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117045&Page=1夜勿眠2010-9-4 14:21:00]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117046&Page=1qihaibin2010-9-4 14:21:00
]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117047&Page=1sszxf2010-9-4 14:21:00xmldoc.Load( "F:/BLOG/BLOG/Message.xml ");


用什么方法可以将绝对路径改为相对路径呢



]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117048&Page=1mlmlhx2010-9-4 14:21:00
为何在

for i=1 to n
x(i)=rs( "AAAA ")
next

中，将AAAA的值分别赋予x的循环值?
偶现在得到的x1,x2……xn的值都是一样的，不告诉为什么？后面的rs( "AAAA ")需要做什么修正嗯？
]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117032&Page=1分析家2010-9-4 14:20:00
偶现在用下面的方法,找不到该 条记录

select * from news where ist like '%1% ' order by addtime desc

望高手指点!
]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117033&Page=1leonheart2010-9-4 14:20:00
]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117034&Page=1ahua6712010-9-4 14:20:00
class_sys.asp关于判断登陆的代码，但是不告诉怎么应用到自己的程序中去。

Public Function CheckUserLogined()
On Error Resume Next
Dim Logined, rsLogin, sqlLogin, sSql, user_info ,tLogined ,i
Logined = True
l_uName = filt_badstr(DecodeCookie(request.Cookies(cookies_name)( "username ")))
l_uPass = filt_badstr(DecodeCookie(request.Cookies(cookies_name)( "password ")))
If l_uName = " " Then
Logined = False
End If
If l_uPass = " " Then
Logined = False
End If
sSql = "userid,user_level,user_showlogword_num,user_upfiles_max,user_upfiles_size,user_dir,isubbedit,user_domain, "
sSql = sSql & "user_domainroot,lockuser,user_folder,adddate,user_info,user_Icon1,user_Icon2,user_group,lastcomment, "
sSql = sSql & "lastmessage,scores,Nickname,comment_count,message_count,newbie,lastlogintime,log_count,user_siterefu_num " & str_domain
If Logined = True Then
If Session ( "CheckUserLogined ") = " " Then
'除了str_domain，0-25列
sqlLogin = "select " & sSql & " from oblog_user where lockuser=0 and Username= ' " & l_uName & " ' and Password= ' " & l_uPass & " ' And isdel=0 "
Set rsLogin = Execute(sqlLogin)
If rsLogin.EOF Then
CheckUserLogined = False
Exit Function
Else
If rsLogin(9) = 1 Then
Set rsLogin = Nothing
adderrstr ( "当前用户已被系统锁定，无法进行操作，请联系管理员！ ")
showerr
End If
For i = 0 To 25
tLogined = tLogined & "$$$ " & rsLogin(i)
Next
tLogined = Replace (tLogined, "$$$ ", " ",1,1,0)
' tLogined = Right (tLogined,Len(tLogined)-3)
If str_domain " " Then tLogined = tLogined & "$$$ " &rsLogin( "custom_domain ")
Session ( "CheckUserLogined ") = tLogined
End If
End If
tLogined = Session ( "CheckUserLogined ")
tLogined = Split (tLogined, "$$$ ")
' Response.Write tLogined(18)
' Response.Write tLogined(19)
' Response.Write tLogined(20)
' Response.Write UBound(tLogined)
If UBound(tLogined) > 26 Or UBound(tLogined) = -1 Then
Session ( "CheckUserLogined ") = " "
Response.Redirect (blogurl & "login.asp ")
Exit Function
End if
l_uId = Int(tLogined(0))
l_ulevel = Int(tLogined(1))
l_uShowlogWord = Int(tLogined(2))
l_uDir = tLogined(5)
l_isUbb = Int(tLogined(6))
l_uDomain = tLogined(7) & ". " & tLogined(8)
l_uFolder = tLogined(10)
l_uGroupId=Int(tLogined(15))
l_uUpUsed=Int(tLogined(4))
l_uLastComment=tLogined(16)
l_uLastMessage=tLogined(17)
l_uScores=Int(tLogined(18))
l_uNickname=tLogined(19)
l_uCommentCount=Int(tLogined(20))
l_uMessageCount=Int(tLogined(21))
If l_uNickname= " " Then l_uNickname=l_uName
If InStr(tLogined(11), "$ ") Then
user_info = Split(tLogined(11), "$ ")
l_uFrame = user_info(1)
Else
l_uFrame = 1
End If
If true_domain = 1 Then
'判断用户绑定的顶级域名
l_ucustomdomain = tLogined(26)
If l_ucustomdomain " " Then
l_uDomain = l_ucustomdomain
End If
End If
l_uNewBie=Int(tLogined(22))
l_uIco=ProIco(tLogined(13), 1)
l_uLastLogin=tLogined(23)
l_ulogcount=Int(tLogined(24))
l_uvisitcount=Int(tLogined(25))
l_uAddtime=tLogined(11)
If IsNumeric(l_uGroupId) Then
'获得组信息
GetGroupInfo
'判断
Set rsLogin=Execute( "Select top 1 groupid,g_points,g_autoupdate From oblog_groups Where g_level> " & l_Group(2,0) & " Order By g_level ")
If Not rsLogin.Eof Then
If rsLogin( "g_autoupdate ")=1 Then
'判断是否需要升级
If l_uScores> =Int(rsLogin(1)) Then
Execute ( "update oblog_groups set g_members=g_members-1 WHERE groupid = " &l_uGroupId)
Execute ( "Update oblog_user Set user_group= " & rsLogin(0) & " Where userid= " & l_uid)
Execute ( "update oblog_groups set g_members=g_members+1 WHERE groupid = " &rsLogin(0))
Call GetGroupInfo
'用户升级后需重新载入Session
Session ( "CheckUserLogined ") = " "
End If
End If
End If
End If
Set rsLogin = Nothing
End If
If Err Then
Err.Clear
Session ( "CheckUserLogined ") = " "
Logined = False
Response.Redirect (blogurl & "login.asp ")
End if
CheckUserLogined = Logined
End Function
]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117035&Page=1jydg2010-9-4 14:20:00偶有一个数据库名为NEWS 库里有一个表NL NL表里有3个字段 编号（主健）新闻标题 日期（降）

只要点新闻标题A这个标题时，就调出页面A或http://www.21cn.com/news/news.html

]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117036&Page=1踏雪寻梅2010-9-4 14:20:00]]>http://www.599cn.com/dispbbs.asp?BoardID=24&ID=117037&Page=1loyalxuan2010-9-4 14:20:00不能执行。。。执行后无提示 页面左下脚会有个漏斗提示框
多刷新几遍就会影响到应用池 提示Service Unavailable
]]>