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 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66
| <!DOCTYPE html>
<html>
<head>
<title>Lancement-Macro</title>
<script type="text/JavaScript">
var myArray = ['Macro-001.mcr', 'Macro-002.mcr'];
function lance(Numero_Macro) {
var wScript = new ActiveXObject("Wscript.Shell");
var myMacro = wScript.CurrentDirectory + "\\" + myArray[Numero_Macro];
wScript.run(myMacro);
return false;
}
<!-- Disable
function disableselect(e){
return false
}
function reEnable(){
return true
}
//if IE4+
document.onselectstart=new Function ("return false")
document.oncontextmenu=new Function ("return false")
//if NS6
if (window.sidebar){
document.onmousedown=disableselect
document.onclick=reEnable
}
//-->
</script>
<meta charset="utf-8">
<style type="text/css">
body {
background-color: #000;
overflow: hidden;
background-image: url();
background-repeat: no-repeat;
}
img {
border: none;
}
body,td,th {
color: #FFF;
}
</style>
</head>
<body onclick="clickfunc(event)">
<p>
<hta:application border="none" singleinstance="none" windowstate="maximize" scroll="no" caption="no" innerborder="no"></hta:application>
</p>
<tr>
<td width="45"> </td>
<td width="237"><a href="" onClick="lance(0);return false;"><img src="eg.v.png" width="41" height="33" onMouseOver="this.src='es.v.png'" onMouseOut="this.src='eg.v.png'" /></a></td>
<td width="125"><p><a href="" onClick="lance(1);return false;"><img src="er.v.png" width="41" height="33" onMouseOver="this.src='es.v.png'" onMouseOut="this.src='er.v.png'" /></a></p>
<p> </p></td>
<script>
function clickfunc(event) {
var allObj = document.querySelectorAll("*");
for (var i = 0; i < allObj.length; i++)
allObj[i].onclick = null ;
}
</script>
</body>
</html> |