Board logo

标题: 想给你女朋友一个惊喜吗?一个小程序让你实现这个愿望 [打印本页]

作者: valen886    时间: 2009-1-23 19:13     标题: 想给你女朋友一个惊喜吗?一个小程序让你实现这个愿望

想给你女朋友一个惊喜吗?一个小程序让你实现这个愿望
下面的内容大家可以自己改成喜欢的

复制这段代码:
<html>
<head>
<title>小芳我爱你</title><!--这里是标题-->
<hta:application sysmenu=no scroll=no border=none>
<script language="vbscript">
sub sub1
    me.close
end sub
me.resizeto 500,410    '这里设置窗口大小,单位为像素
me.moveto 260,100    '这里设置窗口位置,单位为像素
window.settimeout "sub1",100000    '这是设置时间,单位为毫秒,我这里设置为12秒
</script>
<body>
<CENTER>
<FONT style="COLOR:#33FF00; FILTER: shadow(color=black); FONT-FAMILY: 华文彩云; FONT-SIZE: 30pt; LINE-HEIGHT: 150%; WIDTH: 100%"><B>小芳我爱你</B></FONT></CENTER>
<hr>
<style type="text/css">  
.3dfont { FILTER: glow(color=ffffff,strength=0) shadow(color=cccccc,direction:135); POSITION: relative; WIDTH: 100% }  
</style>  
<table border="0" width="100%">  
<tr>
<td width="100%" class="3dfont"><font color=RED><CENTER> ☆☆☆☆☆☆ 最新通知 ☆☆☆☆☆☆</font>

<br>
<P align=left>
★小芳是世界上最漂亮的姑娘!</B><br><br>
小芳我真的好爱你,真的真的好爱你!</B><br><br>
<MARQUEE>同志们看完记得回帖哦!!!</body>
</html>


然后粘贴到记事本里面,另存为,再把文件名的后缀名改为hta就OK了,如果不会就到我这里复制一下吧,<惊喜.hta>.达到的效果自己双击就看的到,如感兴趣或有疑惑就发端消息给我吧,
欢迎各位,成功编辑以后,想关掉他可以按ALT+F4
作者: dhb002    时间: 2009-1-23 19:13

转的时候 稍微改下内容就好了 :lol
作者: cartoon    时间: 2009-1-23 19:13

各位试过没有。。
作者: jkl2006    时间: 2009-1-23 19:13

hta就是一个HTML应用程序(HTML Application),只要你双击就能运行 只要简单的用.hta为扩展名保存HTML页面就行了

感谢楼主,又学到了一个技巧!的确是一个很好的方法,配合使用HTML+CSS+DIV,真的是PERFECT




复制内容到剪贴板
代码:
hta就是一个HTML应用程序(HTML Application),只要你双击就能运行

只要简单的用.hta为扩展名保存HTML页面就行了

下面的一个标准的HTML应用程序:



<?XML:NAMESPACE PREFIX = HTA /><HTA:APPLICATION id=〃oHTA〃
APPLICATIONNAME=〃myApp〃
BORDER=〃thin〃
BORDERSTYLE=〃normal〃
CAPTION=〃yes〃
ICON=〃filename.ico〃
MAXIMIZEBUTTON=〃yes〃
MINIMIZEBUTTON=〃yes〃
SHOWINTASKBAR=〃no〃
INGLEINSTANCE=〃no〃
SYSMENU=〃yes〃
VERSION=〃1.0〃
WINDOWSTATE=〃normal〃>



HELLO, WORLD!





它多了HTA:APPLICATION标签。其实就是这个标签提供了一系列面向应用程序的功能。

它的各种属性:

APPLICATIONNAME属性(applicationName)
此属性为设置HTA的名称。

BORDER属性(border)
此属性为设置为HTA的窗口边框类型,默认值为 thick。
它可以设为 thick 指定窗口为粗边框
dialog window 指定窗口为对话框
none 指定窗口无边框
thin 指定窗口为窄边框

BORDERSTYLE属性(borderStyle)
此属性为设置HTA窗口的边框格式,默认值为 normal。
它可以设为
normal 普通边框格式
complex 凹凸格式组合边框
raised 凸出的3D边框
static 3D边框格式
sunken 凹进的3D边框

CAPTION属性(caption)
此属性为设置HTA窗口是否显示标题栏或标题,默认值为 yes。

ICON属性(icon)
此属性为设置应用程序的图标。

MAXIMIZEBUTTON属性(maximizeButton)
此属性为设置是否在HTA窗口中显示最大化按钮,默认值为 yes。

MINIMIZEBUTTON属性(minimizeButton)
此属性为设置是否在HTA窗口中显示最小化按钮,默认值为 yes。

SHOWINTASKBAR属性(showInTaskBar)
此属性为设置是否在任务栏中显示此应用程序,默认值为 yes。

SINGLEINSTANCE属性(singleInstance)
此属性为设置是否此应用程序同时只能运行一次。次属性以APPLICATIONNAME属性作为标识,默认值为 no。

SYSMENU属性(sysMenu)
此属性为设置是否在HTA窗口中显示系统菜单,默认值为 yes。

VERSION属性(version)
此属性为设置应用程序的版本,默认值为空。

WINDOWSTATE属性(windowState)
此属性为设置HTA窗口的初始大小,默认值为 normal。
它可以设为 normal 默认大小
minmize 最小化
maximize 最大化

以上括号中的是在脚本引用的属性。在脚本中以上属性皆为只读属性。此外,在脚本中还可以使用commandLine属性来检索应用程序启动时的参数。
在HTA中还可以使用html中的绝大多数标签、脚本等。

将用了fso的页面作成hta,双击运行时就没有安全警告的
var Controller = WScript.CreateObject("WSHController");
var RemoteScript = Controller.CreateScript("test.js", "remoteserver");
WScript.ConnectObject(RemoteScript, "remote_");
RemoteScript.Execute();

while (RemoteScript.Status != 2) {
WScript.Sleep(100);
}

WScript.DisconnectObject(RemoteScript);

function remote_Error()
{
var theError = RemoteScript.Error;
WScript.Echo("Error " + theError.Number + " - Line: " + theError.Line + ", Char: " + theError.Character + "\nDescription: " + theError.Description);
WScript.Quit(-1);
}
就算错,我也错到底!我的空间,我的世界

作者: 名山大川    时间: 2009-1-23 19:13

在黑基就试过了的
作者: userchm    时间: 2009-1-23 19:13

看看,支持下你!!/:A029?
作者: li00020    时间: 2009-1-23 19:13

试了 就是不太好关
這女孒,,  
?佷有前途△Δ°
作者: liqun    时间: 2009-1-23 19:13

回复 9楼 ヾ尛娘耔゛ 的帖子
還好..
關了mshta.exe就行了
作者: 1988827yjb    时间: 2009-3-30 19:58

:time: :time: :time: :time: 关不掉
作者: wolf2009    时间: 2009-3-31 10:51

我喜欢这样的小程序:victory:
作者: 1988827yjb    时间: 2009-3-31 18:20

:lol :lol :lol 下的朋友下心点/...我关不掉 哈
作者: lufeng13520    时间: 2009-5-10 18:15

太棒了!.em66. .em66.
作者: LJF    时间: 2009-5-11 16:53

试试 大声的:D
作者: hayraym    时间: 2009-5-12 18:13

试过了
可以
谢谢
作者: lichun_530    时间: 2009-5-15 15:25

顶顶顶,看看看,试试试!
作者: 农夫    时间: 2009-7-27 15:06

试了一下,又发现HTML的一种格式.
作者: guiguzi5    时间: 2009-9-4 17:38

试试看!!!!
作者: guiguzi5    时间: 2009-9-4 17:38

试试看!!!!
作者: 遥忆心痕    时间: 2009-9-12 16:35

谢了,呵呵
顶一下
作者: 柔肠寸断    时间: 2009-9-15 00:48

,,,,,,,,,,,,,,,,
作者: 591225640    时间: 2009-10-19 14:06

大哥我怎么不能改啊 我改了以后出现错误
作者: guoyan___2008    时间: 2009-12-31 18:01

我不会哦!~
作者: guoyan___2008    时间: 2009-12-31 23:49

做出来了呢!~听棒哦!~
作者: ALJ    时间: 2010-9-18 22:06

支持一下,嘿嘿
作者: fuzhuo111    时间: 2010-11-9 15:19

发个效果图看看嘛
作者: pullboy2011    时间: 2011-5-29 16:05

DDDD支持啊。真棒不错的想法




欢迎光临 【3.A.S.T】网络安全爱好者 (http://3ast.com/) Powered by Discuz! 7.2