蓝图湾

蓝图湾


	博客首页
	博客主人
	聚合订阅
	标签列表
	引用列表
	控制面板

博客日历

« July 2025 »
日	一	二	三	四	五	六
		1	2	3	4	5
6	7	8	9	10	11	12
13	14	15	16	17	18	19
20	21	22	23	24	25	26
27	28	29	30	31

日志分类

[RSS] 默认分类 [6]
[RSS] 原创文章 [51]
[RSS] 随笔涂鸦 [4]
[RSS] 网文采撷 [58]
[RSS] 典藏软件 [21]
[RSS] 自编程序 [3]
[RSS] 学习笔记 [54]
[RSS] 内部资料 [5]
[RSS] 非技术类 [2]

日志排序

时间

点击

引用

日志归档

三月, 2006
四月, 2006
五月, 2006
六月, 2006
七月, 2006
十月, 2006
十一月, 2006
十二月, 2006
一月, 2007
二月, 2007
三月, 2007
四月, 2007

全部...

搜索文章


高级搜索

搜索评论

最新评论

目前无任何评论

07-17 - System

更多...

博客统计

分类: 9
文章: 204
评论: 0
标签: 3
附件: 103
引用: 0
今日访问: 18648
总访问量: 24988186

友情连接

安全天使
天下网盟
河北电信测速
河北网通测速
世界网络
网世界
TT购物
sysinternals
analogx
LinuxTOY
中国站长站
中国网管论坛
mikrotik官网
鬼仔的Blog
可疑文件检测
异次元の世界
水晶泡泡淘宝店
够趣堂
死性不改
可疑文件检测2
Go Daddy
一人游走
一个空间
可疑文件检测3
腾讯哈勃分析系统
软件缘
微步云沙箱
安芯网盾
在线工具
网吧维护工具

程序版权



冀ICP备05030027号

浏览模式

标准模式

列表模式

所有时间均为 GMT +8:00 北京时间

各版本万象密码的查询脚本

各版本万象密码的查询脚本

各版本万象密码的查询脚本:

1.查询万象2003脚本内容:

do
sid=inputbox("请输入卡号:","查询万象密码")
if sid="" then
wscript.quit
elseif IsNumeric(sid)<>0 then
exit do
else
wscript.echo "您输入的卡号格式不正确"
end if
loop until(1<>1)
Set conn = wscript.CreateObject("ADODB.Connection")
abc=" DBQ="+"Oct2003.mdb"+"; pwd=" +"chrdwhdhxt"+"; DRIVER={Microsoft Access Driver (*.mdb)};"
conn.open abc
Set RS = Conn.Execute( "SELECT sname,spassword,scardid,sidcard from tusers where scardid='"&sid&"'")
while not RS.EOF
ssname= RS( 0 ).value
sspassword= RS( 1 ).value
sscardid=RS( 2 ).value
ssidcard=RS( 3).value
rs.movenext
wend
if ssname="" then
wscript.echo "没有此卡号"
else
wscript.echo "姓名:" & ssname & ",密码:"& sspassword & ",卡号:" &sscardid & ",身份证:" & ssidcard
end if
wscript.quit

2.查询万象2004 ACCESS版本的密码脚本内容:

do
sid=inputbox("请输入卡号:","查询万象密码")
if sid="" then
wscript.quit
elseif IsNumeric(sid)<>0 then
exit do
else
wscript.echo "您输入的卡号格式不正确"
end if
loop until(1<>1)
Set conn = wscript.CreateObject("ADODB.Connection")
abc="Provider=Microsoft.Jet.OLEDB.4.0;Password=万象网管是一个发展了5年的成熟的产品;User ID=datamaintain;Data Source=2004mem.mdb;Persist Security Info=True;Jet OLEDB:System database=SICENT.MDW;Jet OLEDB:Database Password=zhrmghg1949jgqz"
conn.open abc
Set RS = Conn.Execute( "SELECT sname,spassword,scardid,sidcard from tusers where scardid='"&sid&"'")
while not RS.EOF
ssname= RS( 0 ).value
sspassword= RS( 1 ).value
sscardid=RS( 2 ).value
ssidcard=RS( 3).value
rs.movenext
wend
if ssname="" then
wscript.echo "没有此卡号"
else
wscript.echo "姓名:" & ssname & ",密码:"& sspassword & ",卡号:" &sscardid & ",身份证:" & ssidcard
end if
wscript.quit

3.查询万象2004 SQL版本的密码脚本内容:

do
sid=inputbox("请输入卡号:","查询万象密码")
if sid="" then
wscript.quit
elseif IsNumeric(sid)<>0 then
exit do
else
wscript.echo "您输入的卡号格式不正确"
end if
loop until(1<>1)
Set conn = wscript.CreateObject("ADODB.Connection")
abc="driver={sql server};server=192.168.0.233;uid=sa;pwd=123456;"&"database=wx2004;"
conn.open abc
Set RS = Conn.Execute( "SELECT sname,spassword,scardid,sidcard from tusers where scardid="&sid)
while not RS.EOF
ssname= RS( 0 ).value
sspassword= RS( 1 ).value
sscardid=RS( 2 ).value
ssidcard=RS( 3).value
rs.movenext
wend
if ssname="" then
wscript.echo "没有此卡号"
else
wscript.echo "姓名:" & ssname & ",密码:"& sspassword & ",卡号:" &sscardid & ",身份证:" & ssidcard
end if
wscript.quit

其实各版本只是连接数据库的方式不同，还是数据库的路径或IP，及sicent.mdw路径自行更改.

Submitted by 多情浪子 on 2007, April 26, 3:10 PM

阅读全文 | 网文采撷 | 评论(8) | 引用(0) | 附件:0 | 点击:4539

CPU参数说明

Submitted by 多情浪子 on 2007, February 27, 1:07 AM

阅读全文 | 网文采撷 | 评论(2) | 引用(0) | 附件:0 | 点击:4510

cmd的终极防守

翻开网络上的入侵资料看看吧！大多数的入侵都是在cmd下完成的，比较典型的有溢出得到一个system权限的cmdshell，然后种植一个Tcmd之类绑定了cmd.exe的后门。也有利用web程序的漏洞得到一个webshell然后利用低权限的cmdshell来提升权限，最后再种植后门……各种各样的攻击都说明入侵和cmd.exe是相关的，因为一个cmd.exe就是一个用户与系统交互的一个接口，是入侵者进入系统的首要目标。当然，我们不能在这里坐以待毙，如何防止别人通过溢出得到你的cmdshell，如何知道别人已经进入系统并且获得cmdshell，如何在人家登陆到我们机器的时候抓住入侵者呢？现在就让我们打造一个cmd下的终极防线吧。

Submitted by 多情浪子 on 2006, December 12, 11:47 AM

阅读全文 | 网文采撷 | 评论(0) | 引用(0) | 附件:0 | 点击:4458

低格全攻略

DM 低格分区教程!!! 下载下来慢慢看!!!中英文对照!!!

(1)、直接调用BIOS ROM中的低格程序

　　在很多计算机的BIOS ROM中存放着低格程序，存放地址从C8005H地址开始，具体操作如下：

　　A：＼＞Debug
　　-G C800 ：0005（//这时屏幕显示信息(不同版本的BIOS显示的信息可能不同)，回车后提示：）
　　Current Interleave is 3 select new interleave or Return for current（//这是要求用户选择交叉因子，按回车表示取默认值3，也可输入新的交叉因子值，硬盘的交叉因子一般是3，所以直接回车即可。屏幕接着提示：）
　　Are you dynamically configuring the drive-answer Y/N﹖
　　Press“Y”to begin formatting the drive C： with interleave 03（//键入“Y”后开始对硬盘进行低格）
　　Formatting ……（//完成后询问是否处理坏磁道）
　　Do you want to format bad track-answer Y/N？

Submitted by 多情浪子 on 2007, November 4, 12:15 PM

阅读全文 | 网文采撷 | 评论(8) | 引用(0) | 附件:0 | 点击:4453

注册表修改大全

注册表修改大全 请按Ctrl+F找

Submitted by 多情浪子 on 2006, July 1, 8:24 AM

阅读全文 | 网文采撷 | 评论(1) | 引用(0) | 附件:0 | 点击:4415

锐起无盘读写缓存技术简介

读缓存

在数据服务开启以后有磁盘映像数据的读取动作时，数据服务会不断检查此磁盘映像已经使用了多少缓存空间，如果没有达到设定值的话，数据服务就会申请一块内存把刚刚读到的磁盘映像数据保存在里面，直至申请的内存总数已经达到设定值。以后再有任何客户机需要读取磁盘映像数据时，数据服务先检查数据是否已经在内存里，如果在的话就直接从内存里读出来返回给客户机，如果不在的话就从磁盘映像文件里读出来返回给客户机。

由于我们的读缓存设计的比较简单，并没有做更深入的数据置换机制，所以最先读到的数据会一直保留在缓存中而永远不会被释放（一直到数据服务重启）。而对于无盘的系统盘，最新读的数据肯定是启动时需要的数据（大约100M左右），所以我们的读缓存最适合的就是系统盘。对于其他盘，一般系统启动以后都会先读取一下磁盘的目录区，根据磁盘大小不同大约会有5~10M的数据，这些数据都是每次系统启动以后必读的数据，也很适合于放置在读缓存中。

根据以上的原理，系统盘大约设置128M~512M左右的缓存即可，而其他磁盘只需要设置10~20M缓存就可以了。除了系统启动数据和游戏盘的目录区数据，其他数据都是比较随机没有什么规律的，因为每台客户机上的使用者不同，使用的软件不同，玩的游戏不同，很难有一个比较好的缓存算法，缓存算法设计不好的话不仅不会改善反而会恶化性能。

写缓存

我们目前采用的写缓存容量是固定的1M，也就是说只要设置了“使用写缓存”，每台客户机启动后会为它使用的每个磁盘分配1M的写缓存，比如客户机使用了2个磁盘，分别是系统盘/游戏盘，就会为这台客户机分配2M的写缓存。

写缓存主要目的是增大写数据的块，以提高磁盘的写效率。这就象拷贝一个1G的大文件会比拷贝1000,000个1K的小文件快的多，由于无盘的客户机数量比较多，写临时文件非常分散，每次写临时文件都被分散成很小的块，导致磁盘的磁头频繁的移动以搜索写的位置，这会极大降低写的效率。采用了写缓存以后，几K的小块会被合并成一个近1M的大块再写入临时文件，从而提高了写效率。

以上的读写缓存实际上在Windows服务器系统中也已经有了类似的缓存优化，我们所做的就是针对无盘的特殊读写方式做了更深一步的优化。而第三方的缓存软件如“SuperCache”，等也做的很专业，使用了这些第三方软件后的效果有时候会比我们自己内嵌的缓存算法更好，所以我建议大家多做尝试，不同的硬件环境不同的系统都会有不同的结果。

Submitted by 多情浪子 on 2009, August 20, 12:54 AM

阅读全文 | 网文采撷 | 评论(0) | 引用(0) | 附件:0 | 点击:4385

Windows xp服务详解

WindowsXP 有很多服务，有很多是普通用户很少用到的。关闭不需要的服务，可以节省更多的系统资源，并让电脑运行的更顺畅。这在低配置的机器上非常有效。

调整方法：运行services.msc命令。

Submitted by 多情浪子 on 2007, July 17, 2:59 PM

阅读全文 | 网文采撷 | 评论(0) | 引用(0) | 附件:0 | 点击:4307

VBS修改网关和DNS

Const T_GATEWAY = \"1.1.1.1\" \'网关
Const T_NEWDNS1 = \"2.2.2.2\" \'DNS1
Const T_NEWDNS2 = \"3.3.3.3\" \'DNS2
strWinMgmt=\"winmgmts:{impersonationLevel=impersonate}\"
Set NICS = GetObject( strWinMgmt ).InstancesOf(\"Win32_NetworkAdapterConfiguration\")
For Each NIC In NICS
If NIC.IPEnabled Then
NIC.SetDNSServerSearchOrder Array(T_NEWDNS1,T_NEWDNS2)
NIC.SetGateways Array(T_GATEWAY)
End If
Next

Submitted by 多情浪子 on 2007, December 16, 5:37 AM

阅读全文 | 网文采撷 | 评论(1) | 引用(0) | 附件:0 | 点击:4306

共有58条记录, 8条/页

« 1 2 3 4 5 6 7 8 »