Dec
17

The ajax to get the info what you need

本文提供一个思路,通过客户端与服务端获取信息,具体什么意思大家自己琢磨,本文只提供Client端代码,Server端代码自己去写,什么语言均可以!

Client端代码如下:

<html>
<head>
<script language="javascript"></script></head></html>
4 Comments
Nov
27

JSP 修改 文件修改时间的小SHELL

很多网站的管理员通过查看文件的修改时间定位被入侵后流下的网马与后门,因此修改文件的创建与修改时间可以有效的预防后门的泄露。

昨天研究了下,JSP只提供了修改“文件修改时间”的接口,却没有提供修改“文件创建时间”的接口,因此貌似只能修改“文件修改时间”,kj021320的JSP SHELL有这个功能,不过只能修改年月日,而且昨晚我遇到的RESIN 2.1.9 运行不了kj021320的那个SHELL,于是决定自己写个小的shell!

主要功能:
1.文件的时间属性查看,包括修改时间与创建时间;
2.文件修改时间的修改,精确到秒;

代码如下:
(Apache Tomcat/6.0.18下运行通过!)

<%@ page import="java.io.*" %>
<%@ page import="java.util.*, java.text.*" %>
<%@ page language="java" import="java.util.Enumeration" contentType="text/html; charset=GB2312"%>

<html>
<head>
<title>JSP timeshell by oldjun</title>
</head></html>
7 Comments
Aug
7

VB打造QQ批量登陆器

QQ太多,每天要输入真的很麻烦,网上有一些批量的登录器,可是谁也不知道有没有在登录的同时也往作者的邮箱里发一封包含qq号与密码的邮件~

于是想自己写,因为asp比较熟,所以选择VB,网上找了2个模块,于是可以直接写程序了,以前没写过application,第一次写,遇到不少困难,不过最后还是搞定了~

下面放主代码,主要是ACCESS数据库的操作:

Private Sub form_Load()
Dim i As Integer
Dim mdbpath As String
Dim strqqpath As String

getvalue strqqpath

If strqqpath = "" Then
qqpath.Text = "未检测到QQ目录,请自行设置!"
Else
qqpath.Text = strqqpath
End If
       
appdisk = Trim(App.Path)
If Right(appdisk, 1) <> "\" Then appdisk = appdisk & "\"
mdbpath = appdisk
If Dir(mdbpath & "qqlogin.mdb") = "" Then

Dim pstr As String
pstr = "Provider=Microsoft.Jet.O...
3 Comments
Jul
25

javascript判断checkbox多选框数目

今天要用到一个js程序,要实现以下两点功能(checkbox是asp生成的,并非静态的html):
1.判断checkbox的数目,当超过设置的数目时显示只能选这么多,即时控制,而不是提交时判断;
2.提交form的时候,判断是否选择了要求的数目,否则不予提交。

写了好久,终于试成功了,因为asp生成的input,name不能相同,不然以后不好控制,所以document.getElementsByName不好取值,于是换思路写。

以下是用静态页面测试的代码(第二个函数也可以使用参数或者name的值):

<script LANGUAGE="JavaScript">function doCheck(ctrl,checkboxname,MaxSelect,MaxCheckbox) {
   var NumChecked = 0;
   var thisCtrl;
   var i;
   i = 1;
   while ((i <= MaxCheckbox) && (NumChecked </script>
5 Comments
Jul
6

DZ6.0的前台用户名自修改插件

最近一直在改论坛,于是写个这个页面,其实不算插件了,根本不是当成插件来写的,就是一个简单页面而已。

说过程:

1.进后台创建一个changename的模板,贴上代码后提交:

{template header}

<div id="nav">
<a href="index.php">$bbname</a> <b>&raquo;</b> 用户名修改系统
</div>

<div class="mainbox">
<h1 align="left">修改须知</h1>

<table cellspacing="0" cellpadding="4px" border="0" align="center">
<div align="left">
a.如果没有特别需要,请勿修改用户名;<br>

b.修改用户名需要花费5000论坛币的手续费,请三思而后行;<br>

c.修改完请重新登陆,如果有问题,请及时与管理员联系!
</div>

</table>

</div>

<table cellspacing="0" cellpadding="4px" border="0" align="center">
<form action='?action=changename' method=post>
<font color=blue>新用户名:</font></form></br></br>
5 Comments