|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
asp可以轻松地实现对页面内容的动态控制,根据不同的浏览者,显示不同的页面内容。而浏览者一点觉察不出来,就像为他专门制作的页面一样。使用各种各样的组件,asp可以完成无比强大的功能。客户端 本程序属于一种出格的办法。利用局限对照无限,并且有必定的伤害性。自创了asp后门里的一些办法。上面是程序代码。
<%
dimremoteaddr
ifRequest.ServerVariables("HTTP_X_FORWARDED_FOR")=emptythen
remoteaddr=Request.ServerVariables("REMOTE_ADDR")
else
remoteaddr=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
endif
Response.Write(GetMac(remoteaddr))
因为读取某IP的网卡MAC地点
本程序经由过程挪用arp命令经由过程查询本机arp表读取特定IP的MAC地点
利用本程序需注重以下事项:
本程序必要“WSCRIPT.SHELL”和“Scripting.FileSystemObject”两个组件,请确保您的服务器能够一般利用这两个组件
本程序必要挪用cmd.exe程序,请确保IIS宾客帐号对程序有会见权限。
本程序必要一时文件保留了局,请确保IIS宾客帐号对一时目次有写权限。
functionGetMac(IP)
OnErrorResumeNext
DimoScript
DimoFileSys,oFile
DimAll,szTempFile,ipc,phyc,typec
DimTempPath
SetoScript=Server.CreateObject("WSCRIPT.SHELL")
SetoFileSys=Server.CreateObject("Scripting.FileSystemObject")
TempPath="d: emp"一时目次
szTempFile=TempPath&oFileSys.GetTempName()猎取一时文件名
CalloScript.Run("cmd.exe/cping-n2"&IP,0,True)包管arp表中有此IP
CalloScript.Run("cmd.exe/carp-a"&IP&">"&szTempFile,0,True)
SetoFile=oFileSys.OpenTextFile(szTempFile,1,False,0)
All=oFile.ReadAll()
oFile.Close
If(IsObject(oFile))Then
CalloFileSys.DeleteFile(szTempFile,True)
EndIf
arr=Split(All,vbCrLf)
IfUBound(arr)=4Then
ipc=InStr(1,arr(2),"InternetAddress")
phyc=InStr(1,arr(2),"PhysicalAddress")
typec=InStr(1,arr(2),"Type")
Iftypec>phycAndphyc>ipcAndipc>0Then
GetMac=Ucase(Trim(CStr(Mid(arr(3),phyc,typec-phyc))))
EndIf
EndIf
Endfunction
%>实现规模效益。与传统的用户拥有硬件软件所有权和使用权以及传统的应用服务商提供一对一的服务模式不同,ASP拥有应用系统所有权,用户拥有使用权,应用系统集中放在ASP的数据中心中,集中管理,分散使用,以一对多的租赁的形式为众多用户提供有品质保证的应用技术服务,实现规模效益。 |
|