| 视动工坊:动易认证设计师 | ||
| 动易模板大赛连续两次获奖 | ||
| 现共完成动易模板100余个 | ||
| 热诚欢迎定制改制动易模板 | ||
| Q Q: | 363881827 | |
| 手机: | 13153001848 | |
| Tel: | 0531-83711777 | |
| Mail: | wsdjqwj2003@163.com | |
一、修改js/checklogin.js
查找代码(共有三处)
| root.item(0).getElementsByTagName("article").item(0).text |
| root.item(0).getElementsByTagName("groupname").item(0).text |
二、修改根目录下的UserLogin.asp
请把UserLogin.asp文件中的177-185行:
| Response.Write "待签文章:" & vbCrLf If Trim(UnsignedItems & "") = "" Then Response.Write " <b><font color=gray>0</font></b> 篇" Else Dim UnsignedItemNum, arrUser arrUser = Split(UnsignedItems, ",") UnsignedItemNum = UBound(arrUser) + 1 Response.Write " <b><font color=red>" & UnsignedItemNum & "</font></b> 篇" End If |
| Response.Write "用户组别:" & vbCrLf Response.Write " <font color=blue>" &GroupName & "</font>" |
