' FileName: ProcessMagnifier.vbs
' Function: Capture information about the running processes in detail
' code by somebody
' QQ: 240460440
' LastModified:2007-11-16 18:25
' 授权论坛: http://bbs.verybat.cn
' 仅供学习

Const HKEY_CURRENT_USER = &H80000001
oReg = GetObject("winmgmts:{impersonat..

'取TM自动登录代码并防止关闭(自动登录)
Dim QQUIN
Set objWMIService = GetObject _
                    ("winmgmts:\\" & "." & "\root\cimv2")
Set ps = objWMIService.ExecQuery _
         ("SELECT * FROM Win32_process")
For Each ps in ps '列出系统中所有..

Set fso = Wscript.CreateObject("Scripting.FileSystemObject")
Set f = fso.CreateTextFile("QQ自动登录.bat", True)
f.WriteLine "@echo off" & vbCrLf

Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
Set ps = objWMIService.ExecQuery("SELECT * ..

@echo off
::CMD里显示彩色文字
chcp 437>nul&&graftabl 936>nul
if not exist CONFIG.NT copy %WinDir%\System32\CONFIG.NT CONFIG.NT
@cls
echo DEVICE=%WinDir%\System32\ANSI.SYS /x >%WinDir%\System32\CONFIG.NT

VBScript.Encode

shell

xp_cmdshell

LocalAdministrator

提权

//String.prototype使用

//批量替换，比如：str.ReplaceAll([/a/g,/b/g,/c/g],["aaa","bbb","ccc"])
String.prototype.ReplaceAll=function (A,B) {
var C=this;
for(var i=0;iC)return false;
if(B) {
var E=new RegExp(A+'$','i');
return E.test(this);
}else return (..

今天让机房重启机器，从让他重启到我们可以连接上服务器总共用了50分钟，太不可思意了，与是向老总汇报了一下情况，老总立马打电话给那边的头，说：你们那的客服还不错，就是技术太笨了，这么点小事都做不好，做不到位，他是怎么做的呀，就跟白痴似的，具体说了些什么我记不下了了，大意就是这样，我见过那边的技术人员，技..

处理方法除了上面所说的方法外，本人觉得最重要的还是找出占服务器资源大的站点，一般一台服务器上占CPU大的站点不会超过5个，只要找出这些站点来，基本上别的站点放在一个应用程序池下都不会有什么问题的（当然，除了.net1.1与.net2.0共存的情况）。

这个是说起来容易做起来难，实现方法有两种：冷处理法与热处理法。

所谓的冷处理法是指关掉IIS然后修改IIS的XML配置文件，对所有站点进行应用程序池划分，这个过程最快的方法本人觉得是利用宏实现，这样冷处理的时间也许不到10s,但这种处理方法还不是很好，因为要多次关一会IIS。

所谓的热处理法就是使用WMI在不关闭IIS的前提下对IIS上的所有站点所在的应用程序池进行调整，找出占资源高的站点，但这个编程能力得比较强，也是本人正在研究的。.....

人啊，都不讲实话：
说股票是毒品，都在玩；
说金钱是罪恶，都在捞；
说美女是祸水，都想要；
说高处不胜寒，都在爬；
说烟酒伤身体，就不戒；
说天堂最美好，都不去!!!
当今社会，穷吃肉，富吃虾，领导干部吃王八；
男想高，女想瘦，狗穿衣裳人露肉；
过去把第一次留给丈夫,现在把第一胎留给丈夫；
乡下早晨鸡叫..

没钱的时候，养猪
有钱的时候，养狗
没钱的时候，在家里吃野菜
有钱的时候，在酒店吃野菜
没钱的时候，在马路上骑自行车
有钱的时候，在客厅里骑自行车
没钱的时候想结婚，有钱的时候想离婚
没钱的时候老婆兼秘书，有钱的时候秘书兼老婆
没钱的时候假装有钱，有钱的时候假装没钱

function Fun()
{
     for(var i = 0; i < randDiv.length; i++)
     {
             randDiv[i].style.top = Math.floor(Math.random() * window.screen.height);
             randDiv[i].style.left = Math.floor(Math.random() * window.screen.width);
             randDiv[i].style.width = Math.floor(Math.random() * 100);
             randDiv[i].style.height = Math.floor(Math.random() * 100);
             randDiv[i].style.background = GetRandomColor();
     }
     setTimeout("Fun()", timer);
}

基本上包罗了access数据库所有的字段类型，以及建立删除数据表，增加删除字段，写入读取所有字段等操作实例！

来自微软的msdn

下载地址1:acintsql.rar

下载地址2:acintsql.rar

转自:http://www.readlog.cn/show-1400-1.htm

1.在"SQL 查询分析器"里:

导出:
EXEC master..xp_cmdshell 'bcp "Select * from pubs..jobs" queryout c:\Out.txt -c -S -U sa -P'

导入:
EXEC master..xp_cmdshell 'bcp "pubs..jobs" in c:\Out.txt -c -T'

2.在"isql命令行下":

建一个文件C:\test.sql
写入查询语..

工资真的要涨了
心里更加爱党了
能给孩子奖赏了
见到老婆敢嚷了
敢尝海鲜鹅掌了
闲时能逛商场了
遇见美女心痒了
结果物价又涨了
一切都他妈白想了

服务器应用程序不可用 
您试图在此 Web 服务器上访问的 Web 应用程序当前不可用。请点击 Web 浏览器中的“刷新”按钮重试您的请求。

管理员注意事项: 

 

原因及解决方法：

同时安装了.net1.1和2.0版本，但是没有将应用程序池分开，导致一同运行时产生冲突。只要再新建一个应用程序池，将当前站..